(take-c-identifier) ( sequence-parser -- string/f )

Vocabulary

c.lexer

Inputs

sequence-parser

an object

Outputs

string/f

an object

Definition

USING: kernel sequences.parser ;

IN: c.lexer

: (take-c-identifier) ( sequence-parser -- string/f )
    dup current c-identifier-begin?
    [ [ current c-identifier-ch? ] take-while ] [ drop f ] if ;