check-declaration ( declaration -- declaration )

Vocabulary
stack-checker.known-words

Definition

USING: arrays classes combinators.short-circuit kernel
sequences stack-checker.errors ;

IN: stack-checker.known-words

: check-declaration ( declaration -- declaration )
    dup { [ array? ] [ [ classoid? ] all? ] } 1&&
    [ bad-declaration-error ] unless ;