Hi *, I encounter strange thing under FPC 2.7.1 and Win64 target. Can anybody test this program: ======================== const test: array[0..0] of currency = (-10); var c:currency;
begin c := -10; writeln(c); writeln(test[0]); readln; end. ======================== Results: -1.000000000000000000E+01 -1.000000000000000000E-03 Thanks -Laco. _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
