fp-register

Vocabulary

cpu.arm.64.assembler

Definition

IN: cpu.arm.64.assembler

TUPLE: fp-register < register ;

Methods

USING: cpu.arm.64.assembler cpu.arm.64.assembler.private kernel
;

M: fp-register encode-type drop 1 ;


USING: accessors combinators cpu.arm.64.assembler
cpu.arm.64.assembler.private ;

M: fp-register encode-width
    width>> {
        { 32 [ 0 ] }
        { 64 [ 1 ] }
        { 128 [ 2 ] }
        [ register-width-error ]
    } case ;


USING: accessors combinators cpu.arm.64.assembler
cpu.arm.64.assembler.private ;

M: fp-register encode-width*
    width>> {
        { 32 [ 0 1 ] }
        { 64 [ 1 1 ] }
        { 128 [ 2 1 ] }
        [ register-width-error ]
    } case ;


USING: accessors combinators cpu.arm.64.assembler
cpu.arm.64.assembler.private ;

M: fp-register encode-width**
    width>> {
        { 8 [ 0 1 0 0 ] }
        { 16 [ 1 1 0 1 ] }
        { 32 [ 2 1 0 2 ] }
        { 64 [ 3 1 0 3 ] }
        { 128 [ 0 1 1 4 ] }
        [ register-width-error ]
    } case ;


USING: accessors combinators cpu.arm.64.assembler
cpu.arm.64.assembler.private ;

M: fp-register encode-width***
    width>> {
        { 16 [ 3 ] }
        { 32 [ 0 ] }
        { 64 [ 1 ] }
        [ register-width-error ]
    } case ;


USING: accessors cpu.arm.64.assembler
cpu.arm.64.assembler.private kernel make math.parser
prettyprint.custom prettyprint.sections ;

M: fp-register pprint*
    [ [ fp-prefix % ] [ n>> # ] bi ] "" make text ;