timestamptomsecs bug with cross compilation
Original Reporter info from Mantis: xinyiman
-
Reporter name: francesco sammarco
Original Reporter info from Mantis: xinyiman
- Reporter name: francesco sammarco
Description:
I installed lazarus 2.1.0 and fpc 3.3.1 using fpcupdeluxe (64-bit version for windows). I have also installed the cross compiler for 32-bit windows. Then I created this simple program
procedure TForm1.Button1Click(Sender: TObject);
var
curmilli,latermilli:comp;
begin
curmilli:=timestamptomsecs(datetimetotimestamp(now));
showmessage('Waiting');
latermilli:=timestamptomsecs(datetimetotimestamp(now));
showmessage(IntToStr(QWord(latermilli)-QWord(curmilli)));
end;
When I compile for 64-bit windows everything works, when I compile for 32-bit windows (with the cross compiler) I get the error: External: SIGFPE
Mantis conversion info:
- Mantis ID: 35147
- OS: 10
- OS Build: 64 bit
- Platform: Windows
- Version: 3.3.1
- Monitored by: » Starchild (Starchild)