tuple-class-unchanged? ( class superclass slots -- ? )


Vocabulary
classes.tuple.private

Definition
USING: classes kernel words ;

IN: classes.tuple.private

: tuple-class-unchanged? ( class superclass slots -- ? )
[ [ superclass ] [ bootstrap-word ] bi* = ]
[ [ "slots" word-prop ] dip = ] bi-curry* bi and ;