(get-rounding-mode) ( fp-env -- mode )

Vocabulary

math.floats.env.private

Inputs

fp-env

an object

Outputs

mode

an object

Definition

IN: math.floats.env.private

GENERIC: (get-rounding-mode) ( fp-env -- mode )

Methods

USING: accessors assocs math.bitwise math.floats.env.private
math.floats.env.x86 ;

M: sse-env (get-rounding-mode)
    mxcsr>> sse-rounding-mode-bits mask
    sse-rounding-mode>bit value-at ; inline


USING: accessors assocs math.bitwise math.floats.env.private
math.floats.env.x86 ;

M: x87-env (get-rounding-mode)
    control>> x87-rounding-mode-bits mask
    x87-rounding-mode>bit value-at ; inline