check-nesting ( preprocessor-state -- preprocessor-state )

Vocabulary

c.preprocessor

Inputs

preprocessor-state

an object

Outputs

preprocessor-state

an object

Definition

USING: accessors kernel math ;

IN: c.preprocessor

: check-nesting ( preprocessor-state -- preprocessor-state )
    [ 1 + ] change-include-nesting dup
    [ include-nesting>> ] [ include-nesting-max>> ] bi >
    [ include-nested-too-deeply ] when ;