[fpc-devel]Which bug: FPC or Delphi?

[Peter Vreman]

> Hello,
> 
> I found a important difference between FPC (1.1) and Delphi 3.0.
> This sample:
> 
> {$apptype console}
> {$ifdef fpc}
> {$mode delphi}
> {$endif}
> var
>  x:integer;
> begin
>  readln(x);
> 
>  writeln(cardinal(x)>100);
> end.
> 
> after accepting -1 returns "false" if it is compiled with Delphi but "true" if it is
compiled with FreePascal.

Kylix returns also true, so it's a bug in D3.