Explorar o código

+ AArch64 support

git-svn-id: trunk@29948 -
Jonas Maebe %!s(int64=10) %!d(string=hai) anos
pai
achega
bff3feae7b
Modificáronse 1 ficheiros con 6 adicións e 0 borrados
  1. 6 0
      tests/tbs/tb0193.pp

+ 6 - 0
tests/tbs/tb0193.pp

@@ -57,6 +57,12 @@ end;
  end;
  end;
 {$define implemented}
 {$define implemented}
 {$endif cpumips}
 {$endif cpumips}
+{$ifdef cpuaarch64}
+  adrp x0,stacksize@PAGE
+  ldr  x0,[x0,stacksize@PAGEOFF]
+end;
+{$define implemented}   
+{$endif cpuaarch64}
 {$ifndef implemented}
 {$ifndef implemented}
  {$error This test does not supported this CPU}
  {$error This test does not supported this CPU}
 end;
 end;