define-predicate ( class quot -- ) (original) (raw)
define-predicate ( class quot -- )
Vocabulary
classes
Inputs
class | a class |
---|---|
quot | a quotation with stack effect ( obj -- ? ) |
Outputs
None
Word description
Defines a predicate word for a class.
Notes
Calling this word directly is not necessary in most cases. Higher-level words call it automatically.
Definition
: define-predicate ( class quot -- )
[ predicate-word ] dip ( object -- ? ) define-declared ;