[global-getter] ( box -- quot )

Vocabulary

variables

Inputs

box

an object

Outputs

quot

an object

Definition

USING: accessors ;

IN: variables

: [global-getter] ( box -- quot ) '[ _ value>> ] ;