load-vregs ( n loc-class -- vregs )

Vocabulary

compiler.cfg.stacks

Inputs

n	an object
loc-class	an object

Outputs

vregs

an object

Definition

USING: accessors compiler.cfg.stacks.local kernel math ;

IN: compiler.cfg.stacks

: load-vregs ( n loc-class -- vregs )
    [ (load-vregs) ] [ new swap neg >>n inc-stack ] 2bi ;