j-bits ( imm -- bits )

Vocabulary

cpu.riscv.32.assembler

Inputs

imm

an object

Outputs

bits

an object

Definition

USING: kernel math math.bitwise ;

IN: cpu.riscv.32.assembler

:: j-bits ( imm -- bits )
    imm 21 signed-immediate :> n imm 1 bitand 0 =
    [ ] [ imm 21 invalid-riscv-immediate ] if n -20 shift
    31 shift n -1 shift 10 bits 21 shift bitor n -11 shift
    1 bits 20 shift bitor n -12 shift 8 bits 12 shift bitor ;