scalar-value ( literal-insn rep -- byte-array )


Vocabulary
compiler.cfg.gvn.simd

Inputs
literal-insnan object
repan object


Outputs
byte-arrayan object


Definition
USING: accessors alien.c-types combinators cpu.architecture
endian kernel math ;

IN: compiler.cfg.gvn.simd

: scalar-value ( literal-insn rep -- byte-array )
{
{ float-4-rep [ obj>> float>bits 4 >le ] }
{ double-2-rep [ obj>> double>bits 8 >le ] }
[ [ val>> ] [ rep-component-type heap-size ] bi* >le ]
} case ;