At 16:33 26-8-2004, you wrote:
Hi!
In FPC 1.9.4 there is a bug concerning comparison of a string if it is
empty. The program to test is
Program Bug;
Var SS : ShortString;
AS : AnsiString;
Begin
SS := 'asdf';
AS := 'asdf';
WriteLn('SS > '''': ', SS > '');
WriteLn('Length(SS) > 0: ' , Length(SS) > 0);
WriteLn('AS > '''': ', AS > '');
WriteLn('Length(AS) > 0: ' , Length(AS) > 0);
End.
This should emit 4 times "TRUE" but gives a "FALSE" for the first line.
I compiled it with FPC 1.9.4
Free Pascal Compiler version 1.9.4 [2004/08/12] for i386
Copyright (c) 1993-2004 by Florian Klaempfl
from the Debian package fp-compiler_1.9.4-5_i386.deb.
There is a bug ID 2388 which was marked "Fixed" on 2003-10-24. Since
1.9.4 is newer, I'm concerned this was forgotten. Shall I re-submit this
bug?
No problem here with current cvs:
C:\fpc\tests\webtbs>tw2388
SS > '': TRUE
Length(SS) > 0: TRUE
AS > '': TRUE
Length(AS) > 0: TRUE
Peter
_______________________________________________
fpc-devel maillist - [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-devel
