class-of ( object -- class ) (original) (raw)
Vocabulary
classes
Inputs
object | an object |
---|
Outputs
class | a class |
---|
Word description
Outputs an object's canonical class. While an object may be an instance of more than one class, the canonical class is either its built-in class, or if the object is a tuple, its tuple class.
Examples
USING: classes prettyprint ; 1.0 class-of .
float
USING: classes prettyprint ; IN: scratchpad TUPLE: point x y z ; T{ point f 1 2 3 } class-of .
point
Definition
GENERIC: class-of ( object -- class )
Methods
USING: classes classes.builtin kernel kernel.private ;
M: object class-of tag type>class ; inline
USING: classes classes.tuple.private kernel kernel.private
slots.private words ;
M: tuple class-of layout-of 2 slot { word } declare ; inline