(SHIFT) ( dst src op -- )


Vocabulary
cpu.x86.assembler.private

Inputs
dstan object
srcan object
opan object


Outputs
None

Definition
USING: cpu.x86.assembler.operands kernel ;

IN: cpu.x86.assembler.private

:: (SHIFT) ( dst src op -- )
src CL eq?
[ dst { op t 211 } 1-operand ]
[ dst src { op t 192 } immediate-1 ] if ; inline