Hi
in this example ( i ) always print a constant value in watch window ,
and dose not changed even after ftol function call . otherwise if i
initialize the valriable ( i ) , it shows its value correctly in
watches window .
/------------------------------------------------------
program test;
{$ifdef FPC}{$mode objfpc}{$h+}{$endif}
{$ifdef mswindows}{$apptype console}{$endif}
function ftol (const f : single) : integer; assembler;
asm
fld f
push %eax
fistpl (%esp)
pop %eax
end;
var
f : single = 15.19;
i : int32;
begin
i := ftol(f);
writeln('i = ', i);
readln;
end.
/------------------------------------------------------
------------------------------------------------------------------------------
What NetFlow Analyzer can do for you? Monitors network bandwidth and traffic
patterns at an interface-level. Reveals which users, apps, and protocols are
consuming the most bandwidth. Provides multi-vendor support for NetFlow,
J-Flow, sFlow and other flows. Make informed decisions using capacity planning
reports.http://sdm.link/zohodev2dev
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
