only-classoid? ( obj -- ? )

Vocabulary

classes.algebra

Inputs

obj

an object

Outputs

?

an object

Definition

USING: classes kernel ;

IN: classes.algebra

: only-classoid? ( obj -- ? )
    dup classoid? [ class? not ] [ drop f ] if ;