core: Add the shuffler words but without primitives.

[factor.git] / basis / cpu / x86 / assembler / assembler.factor

diff --git a/basis/cpu/x86/assembler/assembler.factor b/basis/cpu/x86/assembler/assembler.factor
index 2d5b77fd73909e566c0fc7eb407985376d2eddc2..1670db2f59f0d9e0e487cb7d7cca8b2b42b29b47 100644 (file)
--- a/basis/cpu/x86/assembler/assembler.factor
+++ b/basis/cpu/x86/assembler/assembler.factor
@@ -147,7 +147,7 @@ M: register displacement, drop ;
 : 1-operand ( operand reg,rex.w,opcode -- )
     ! The 'reg' is not really a register, but a value for the
     ! 'reg' field of the mod-r/m byte.
-    first3 [ [ over ] dip prefix-1 ] dip opcode, swap addressing ;
+    first3 [ overd prefix-1 ] dip opcode, swap addressing ;
 
 : immediate-operand-size-bit ( dst imm reg,rex.w,opcode -- imm dst reg,rex.w,opcode )
     over integer? [ first3 0b1 opcode-or 3array ] when ;