[global-getter] ( box -- quot )

Vocabulary

variables

Inputs

box

an object

Outputs

quot

an object

Definition

USING: accessors kernel ;

IN: variables

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