[fpc-pascal] Is this an error ?

[JoshyFun]

Hello FPC-Pascal,

Can anybody explain me if this code is expected to fail with a SIGFPE
in 64 bits windows 2.2.4 fpc:

procedure test;
var
  i6: int64;
  qw: QWord;
  r: int64;
begin
  i6:=40;
  qw:=40;
  r:=(integer(-1)*i6) div qw;
end;

Replacing "qw" with an int64 runs fine.

-- 
Best regards,
 JoshyFun