skip-word ( lexer -- )
The lexer

Prev:	skip-blank ( lexer -- )
Next:	with-lexer ( lexer quot -- newquot )

Vocabulary
lexer

Inputs

lexer

a lexer

Outputs
None

Generic word contract
Skips until the end of the current token.

The default implementation treats a single " as a word by itself; otherwise it searches forward until a whitespace character or the end of the line.

Notes
Custom lexers can implement this generic word.

Definition

IN: lexer

GENERIC: skip-word ( lexer -- )

Methods

USING: lexer lexer.private ;

M: lexer skip-word [ (skip-word) ] change-lexer-column ;


USING: html.templates.fhtml kernel lexer lexer.private math
sequences ;

M: template-lexer skip-word
    [
        2dup swap tail-slice "%>" head?
        [ drop 2 + ] [ (skip-word) ] if
    ] change-lexer-column ;