Fix bug with short operand words

slava 2006-02-24 07:41:12 +00:00
parent ae697d92ae
commit b08e6c40ec
1 changed files with 1 additions and 1 deletions

View File

@ -206,7 +206,7 @@ UNION: operand register indirect ;
: short-operand ( reg rex.w n -- ) : short-operand ( reg rex.w n -- )
#! Some instructions encode their single operand as part of #! Some instructions encode their single operand as part of
#! the opcode. #! 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 -- ) : 1-operand ( op reg rex.w opcode -- )
#! The 'reg' is not really a register, but a value for the #! The 'reg' is not really a register, but a value for the