Explorar o código

* Values outside signed 32-bit can only be assigned to a 64-bit register in one instruction, not to memory

git-svn-id: trunk@19512 -
pierre %!s(int64=14) %!d(string=hai) anos
pai
achega
d3e50e9aa8
Modificáronse 1 ficheiros con 4 adicións e 3 borrados
  1. 4 3
      tests/webtbs/tw17337.pp

+ 4 - 3
tests/webtbs/tw17337.pp

@@ -4,7 +4,7 @@
 
 {$asmmode att}
 
-procedure test_gas;   
+procedure test_gas;
 var
   test : qword;
 begin
@@ -14,12 +14,13 @@ begin
   if (test < qword($ffffffff)) then
     runerror(2);
 asm
-  movq $0xffffffff,test
+  movq $0xffffffff,%rax
+  movq %rax,test
 end;
   if test <> $ffffffff then
     runerror(5);
 end ;
-  
+
 var
   test : qword;
 begin