define-global-getter ( type word -- )

Vocabulary

alien.parser

Inputs

type	an object
word	an object

Outputs

None

Definition

USING: kernel words ;

IN: alien.parser

: define-global-getter ( type word -- )
    [ nip ] [ global-quot ] 2bi ( -- value ) define-declared ;