memory-branch ( cell: memory-cell flag: boolean -- result: fixnum )


Vocabulary
compiler.cfg.memory-optimization.validation

Inputs
cella memory-cell
flaga boolean


Outputs
resulta fixnum


Definition
USING: accessors kernel math typed ;

IN: compiler.cfg.memory-optimization.validation

TYPED:: memory-branch
( cell: memory-cell flag: boolean -- result: fixnum )
cell value>> :> before flag
[ before 3 bitand ] [ before 1 bitand ] if
:> bits cell value>> bits bitxor ; inline