Array of AnsiChar bug

administrator% cat chars01.pas

{$mode delphiunicode}

program chars01;

type chars = array[ 0..3] of AnsiChar;

procedure test;

var ch: chars; begin ch := ''; if ch <> '' then writeln( 'error') end;

begin test end.

administrator% /usr/local/lib/fpc/3.3.1/ppca64 chars01.pas Free Pascal Compiler version 3.3.1 [2026/01/23] for aarch64 Copyright (c) 1993-2026 by Florian Klaempfl and others Target OS: Darwin for AArch64 Compiling chars01.pas chars01.pas(13,9) Fatal: Internal error 200306016 Fatal: Compilation aborted

Assignee Loading
Time tracking Loading