handle-elif ( preprocessor-state sequence-parser -- )

Vocabulary

c.preprocessor

Inputs

preprocessor-state	an object
sequence-parser	an object

Outputs

None

Definition

USING: accessors kernel sequences sequences.parser ;

IN: c.preprocessor

: handle-elif ( preprocessor-state sequence-parser -- )
    skip-whitespace/comments take-rest swap elifs>> push ;