current-char ( lexer -- ch/f )

Vocabulary

strings.parser.private

Inputs

lexer

an object

Outputs

ch/f

an object

Definition

USING: accessors kernel kernel.private lexer sequences ;

IN: strings.parser.private

: current-char ( lexer -- ch/f )
    { lexer } declare [ column>> ] [ line-text>> ] bi ?nth ;