also bei mir sieht es so aus ... k.A. wo bei dir das fmul her kommt
Delphi-Quellcode:
asm
// c1 := c1 + cAdd;
fild qword ptr [&c1]
fild qword ptr [&cAdd]
faddp st(1)
fistp qword ptr [&c1]
wait
// if c1 = Extended(10000000000001) then
fld tbyte ptr [10000000000001]
fild qurd ptr [&c1]
fcompp
fstsw ax
sahf
jnz ...
end;
vielleicht fällt dir das fi... bzw. f.. auf > i für Integer
ein Problem seh ich nur beim Vergleich ... wo Delphi aus dem 10000000000001 einen Extended macht ... typlose Umwandlungen wesehn nur in Integertypen und Extended (nach Currency wandelt Delphi keine Konstanten von alleine um)