make-local ( name -- word )

Vocabulary

locals.parser

Inputs

name

an object

Outputs

word

an object

Definition

USING: accessors kernel locals.types make splitting ;

IN: locals.parser

: make-local ( name -- word )
    check-local-name "!" ?tail
    [ <local-reader> dup <local-writer> dup name>> ,, ]
    [ <local> ] if dup dup name>> ,, ;