define-boa-check ( class -- )

Vocabulary

classes.tuple.private

Inputs

class

an object

Outputs

None

Definition

USING: kernel words ;

IN: classes.tuple.private

: define-boa-check ( class -- )
    dup boa-check-quot "boa-check" set-word-prop ;