assert-no-inputs ( quot -- )

Vocabulary

generators

Inputs

quot	a quotation

Outputs

None

Word description

Throws a has-inputs error if the input quotation accepts inputs. Otherwise does nothing.

Definition

USING: combinators.smart math ;

IN: generators

: assert-no-inputs ( quot -- )
    inputs [ has-inputs ] unless-zero ;