64bit – losLab Software

ftol and the 64bit Delphi inline asm changes

function _ftol( f: double) : Integer; cdecl;
begin
  asm
    lea    eax, f
    fstp  qword ptr [eax]
  end;
  result := Trunc(f);
end;

function _ftol( f: double) : Integer; cdecl;

begin

asm

lea eax, f

fstp qword ptr [eax]

end;

result := Trunc(f);

end;

Above is a Delphi inline asm version of the ftol (Floating Point to Integer Conversion) function used by our HotPDF Delphi PDF component. When compiling above Delphi codes in the 64-bit target platform, Delphi will raise below error: [dcc64 Error] E1025 Unsupported language feature: ‘ASM’ The reason is: The 64-bit Delphi compiler DCC64 does […]