* changed x86_64 assembler code to PIC

git-svn-id: trunk@9199 -

tests/tbs/tb0193.pp

@@ -5,14 +5,15 @@
 var
   stacksize : ptrint;external name '__stklen';
 
-function getstacksize:longint;assembler;
+function getstacksize:ptrint;assembler;
 asm
 {$ifdef CPUI386}
         movl    stacksize,%eax
 end ['EAX'];
 {$endif CPUI386}
 {$ifdef CPUX86_64}
-        movl    stacksize,%eax
+        movq    stacksize@GOTPCREL(%rip),%rax
+        movq    (%rax),%rax
 end ['EAX'];
 {$endif CPUX86_64}
 {$ifdef CPU68K}