Hi, Attached is a application that demonstrates a bug in FormatFloat. All tests pass when run under Delphi, but test four fails under Free Pascal.
Here is the application output: ------------------------------------------- $ ./project1 Time:00.001 N:7 E:0 F:1 I:0 TTestFormatFloat Time:00.001 N:7 E:0 F:1 I:0 00.000 Test1 00.000 Test2 00.000 Test3 00.000 Test4 Failed: Failed on 4 expected: <$ 0.01> but was: <$ 0.00> 00.000 Test5 00.000 Test6 00.000 Test7 Number of run tests: 7 Number of errors: 0 Number of failures: 1 List of failures: Failure: Message: TTestFormatFloat.Test4: Failed on 4 expected: <$ 0.01> but was: <$ 0.00> Exception class: EAssertionFailedError Exception message: Failed on 4 expected: <$ 0.01> but was: <$ 0.00> ------------------------------------------- -- Graeme Geldenhuys General error, hit any user to continue.
project1.lpr
Description: Binary data
_______________________________________________ fpc-devel maillist - [email protected] http://lists.freepascal.org/mailman/listinfo/fpc-devel
