enumeration-member-word? ( object -- ? )

Vocabulary

classes.enumeration

Inputs and outputs

object	an object
?	a boolean

Word description

Tests if the object is an instance of the enumeration-member-word class.

Definition

USING: kernel words ;

IN: classes.enumeration

: enumeration-member-word? ( object -- ? )
    dup word?
    [ "enum-elt-value" word-prop [ t ] [ f ] if ] [ drop f ] if
    ;