Browse Source

* fixed wrong opcode size

git-svn-id: trunk@22855 -
Jonas Maebe 12 years ago
parent
commit
2f2f394bee
1 changed files with 1 additions and 1 deletions
  1. 1 1
      rtl/x86_64/cpu.pp

+ 1 - 1
rtl/x86_64/cpu.pp

@@ -133,7 +133,7 @@ unit cpu;
         // older FPCs don't know the xgetbv opcode
         // older FPCs don't know the xgetbv opcode
         .byte 0x0f,0x01,0xd0
         .byte 0x0f,0x01,0xd0
         andl $0xffffffff,%eax
         andl $0xffffffff,%eax
-        shll $32,%rdx
+        shlq $32,%rdx
         orq %rdx,%rax
         orq %rdx,%rax
       end;
       end;