RLDICR ( ra rs sh me -- ) (original) (raw)

RLDICR ( ra rs sh me -- )

Vocabulary
cpu.ppc.assembler

Inputs

Outputs
None

Definition

USING: kernel math ;

IN: cpu.ppc.assembler

: RLDICR ( ra rs sh me -- )
[ swap ] 2dip over [ 31 bitand ] [ ] [ -5 shift ] tri*
1 swap 0 30 md-insn ;