|
@@ -11,7 +11,7 @@ type
|
|
procedure testatt; virtual;
|
|
procedure testatt; virtual;
|
|
end;
|
|
end;
|
|
|
|
|
|
-procedure tc.testintel; assembler;
|
|
|
|
|
|
+procedure tc.testintel; assembler; nostackframe;
|
|
asm
|
|
asm
|
|
mov ecx,[eax]
|
|
mov ecx,[eax]
|
|
jmp [ecx + vmtoffset tc.v]
|
|
jmp [ecx + vmtoffset tc.v]
|
|
@@ -19,7 +19,7 @@ end;
|
|
|
|
|
|
{$asmmode att}
|
|
{$asmmode att}
|
|
|
|
|
|
-procedure tc.testatt; assembler;
|
|
|
|
|
|
+procedure tc.testatt; assembler; nostackframe;
|
|
asm
|
|
asm
|
|
movl (%eax),%ecx
|
|
movl (%eax),%ecx
|
|
jmpl +vmtoffset tc.v(%ecx)
|
|
jmpl +vmtoffset tc.v(%ecx)
|