global-loc>local ( loc height-state -- loc' )
Local stack analysis

Prev:	peek-loc ( loc -- vreg )
Next:	local-loc>global ( loc height-state -- loc' )

Vocabulary
compiler.cfg.stacks.local

Inputs

loc	a loc
height-state	a height-state

Outputs

loc'

a loc

Word description
Translates an absolute stack location to one that is relative to the given height state.

Examples

USING: compiler.cfg.stacks.local compiler.cfg.registers namespaces prettyprint ; D: 7 T{ height-state f 3 0 0 0 } global-loc>local .
D: 4

See also
height-state, local-loc>global

Definition

USING: accessors kernel math ;

IN: compiler.cfg.stacks.local

: global-loc>local ( loc height-state -- loc' )
    [ clone dup >loc< ] dip swap [ ds-height ] [ rs-height ] if
    - >>n ;