mds-insn ( rs ra rb mb xo rc opcode -- )

Vocabulary

cpu.ppc.assembler

Inputs

rs	an object
ra	an object
rb	an object
mb	an object
xo	an object
rc	an object
opcode	an object

Outputs

None

Definition

USING: kernel math math.bitwise ;

IN: cpu.ppc.assembler

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