assure-same-class ( obj1 obj2 -- )


Vocabulary
inverse

Inputs
obj1an object
obj2an object


Outputs
None

Definition
USING: classes kernel ;

IN: inverse

: assure-same-class ( obj1 obj2 -- )
[ class-of ] same? assure ; inline