var
f,f1:single;
begin
if f=f1 then
f:=f1;
汇编:
var
f: System.Single;
f1: System.Single;
begin
00000000 : // -- Line #67 --
00000000 : 83 C4 F8 ADD ESP,-8
00000000 : // -- Line #68 --
00000003 : D9 04 24 FLD DWORD PTR [ESP]
00000006 : D8 5C 24 04 FCOMP DWORD PTR [ESP+4]
0000000A : DF E0 FSTSW AX
0000000C : 9E SAHF
00000000 : // -- Line #71 --
0000000D : 59 POP ECX
0000000E : 5A POP EDX
0000000F : C3 RET NEAR

-----------------------------------------------
var
f,f1:double;
begin
if f=f1 then
f:=f1;
汇编:
var
f: System.Double;
f1: System.Double;
begin
00000000 : // -- Line #67 --
00000000 : 83 C4 F0 ADD ESP,-16
00000000 : // -- Line #68 --
00000003 : DD 04 24 FLD QWORD PTR [ESP]
00000006 : DC 5C 24 08 FCOMP QWORD PTR [ESP+8]
0000000A : DF E0 FSTSW AX
0000000C : 9E SAHF
00000000 : // -- Line #71 --
0000000D : 83 C4 10 ADD ESP,16
00000010 : C3 RET NEAR