intersection-class? ( object -- ? )
Factor handbook » The language » Objects » Classes » Intersection classes

Prev:

intersection-class

Vocabulary
classes.intersection

Inputs and outputs

object	an object
?	a boolean

Word description
Tests if the object is an instance of the intersection-class class.

Definition

USING: classes kernel words ;

IN: classes.intersection

: intersection-class? ( object -- ? )
    dup class?
    [ "metaclass" word-prop intersection-class eq? ] [ drop f ]
    if ;