md-insn ( rs ra sh mb xo sh5 rc opcode -- )

Vocabulary

cpu.ppc.assembler

Inputs

rs	an object
ra	an object
sh	an object
mb	an object
xo	an object
sh5	an object
rc	an object
opcode	an object

Outputs

None

Definition

USING: kernel math math.bitwise ;

IN: cpu.ppc.assembler

:: md-insn ( rs ra sh mb xo sh5 rc opcode -- )
    mb [ 31 bitand 1 shift ] [ -5 shift ] bi bitor
    :> mb rs ra sh mb xo sh5 rc opcode
    [ { 0 1 2 5 11 16 21 } bitfield ] dip insn ;