Fix bug with short operand words

2006-02-24 07:41:12 +00:00 · 2006-02-24 07:41:12 +00:00 · b08e6c40ec
parent ae697d92ae
commit b08e6c40ec
1 changed files with 1 additions and 1 deletions
--- a/library/compiler/x86/assembler.factor
+++ b/library/compiler/x86/assembler.factor
@ -206,7 +206,7 @@ UNION: operand register indirect ;
 : short-operand ( reg rex.w n -- )
    #! Some instructions encode their single operand as part of
    #! the opcode.
-    >r dupd prefix-1 register r> + assemble-1 ;
+    >r dupd prefix-1 reg-code r> + assemble-1 ;

 : 1-operand ( op reg rex.w opcode -- )
    #! The 'reg' is not really a register, but a value for the