parse-def ( name/paren -- def ) (original) (raw)

parse-def ( name/paren -- def )
Utility words used by locals parsing words

Next:	parse-multi-def ( -- multi-def assoc )

Vocabulary
locals.parser

Inputs

name/paren	a string

Outputs

def	a multi-def

Word description
Parses the lexical variable bindings following a :> token.

Definition

USING: kernel ;

IN: locals.parser

: parse-def ( name/paren -- def )
dup "(" = [ drop parse-multi-def ] [ parse-single-def ] if
update-locals ;