expect ( str -- )

Vocabulary

calendar.parser

Inputs

str

an object

Outputs

None

Definition

USING: io kernel sequences ;

IN: calendar.parser

: expect ( str -- )
    read1 swap member? [ "Parse error" throw ] unless ;