Currency bug on Win64 only
Original Reporter info from Mantis: lacak @lacak.sk
-
Reporter name: LacaK
Original Reporter info from Mantis: lacak @lacak.sk
- Reporter name: LacaK
Description:
See Steps To Reproduce
Steps to reproduce:
var
c: currency;
i1: int64;
i2: int64 absolute c;
begin
c := 68719476736;
i1 := Trunc(c*10000);
writeln(c,', ',i1,', ',i2);
readln;
end.
Additional information:
Win32 (as expected): 6.871947673600000000E+10, 687194767360000, 687194767360000
Win64 (wrong) : 6.871947673600000000E+10, 53550614319 , 687194767360000
Mantis conversion info:
- Mantis ID: 33758
- Platform: Win64
- Version: 3.0.4