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

Vocabulary

c.preprocessor

Inputs

preprocessor-state	an object
sequence-parser	an object

Outputs

None

Definition

USING: accessors assocs kernel sequences sequences.parser
splitting ;

IN: c.preprocessor

:: handle-define ( preprocessor-state sequence-parser -- )
    sequence-parser take-define-identifier :> ident
    sequence-parser skip-whitespace/comments take-rest :> def
    def "\\" ?tail [ readlns append ] when
    :> def def ident preprocessor-state symbol-table>> set-at ;