@@ -29,6 +29,12 @@ asm
mr r6,y
end;
{$endif CPUPOWERPC}
+{$ifdef CPUARM}
+asm
+ mov r2,x
+ mov r3,y
+end;
+{$endif CPUARM}
{procedure nothing(x,y: longint);
begin
@@ -46,6 +46,16 @@ asm
li r12,0
+ // doesn't matter, there is no static register used anymore for self,
+ // and self is now loaded on-demand instead of always
+ mov r0,0
+ mov r1,0
+ mov r2,0
+ mov r3,0
var
@@ -17,5 +17,8 @@ asm
{$ifdef CPU68K}
jsr {$ifdef dummy}free1{$else}free2{$endif}
{$endif CPU68K}
+{$ifdef ARM}
+ bl {$ifdef dummy}free1{$else}free2{$endif}
+{$endif ARM}
end.