class-participants ( class -- seq )
Factor handbook » The language » Objects » Classes » Intersection classes

Prev:	define-intersection-class ( class participants -- )
Next:	intersection-class

Vocabulary
classes

Inputs

class

a class

Outputs

seq	a sequence of intersection participants, or f

Word description
If class is an intersection class, outputs a sequence of its participant classes, otherwise outputs f.

Definition

USING: kernel words ;

IN: classes

: class-participants ( class -- seq )
    dup class? [ "participants" word-prop ] [ drop f ] if ;