Torsten Rüger
a496ea7e4b
Finally! If i remember the module was from before i had any non Object superclasses unified code, unified bugs :-) just makes sense
59 lines
1.4 KiB
Ruby
59 lines
1.4 KiB
Ruby
#
|
|
# In many respects a MetaClass is like a Class. We haven't gone to the full ruby/oo level
|
|
# yet, where the metaclass is actually a class instance, but someday.
|
|
|
|
# A Class in general can be viewed as a way to generate methods for a group of objects.
|
|
|
|
# A MetaClass serves the same function, but just for one object, the class object that it
|
|
# is the meta_class of.
|
|
# This is slightly different in the way that the type of the class must actually
|
|
# change, whereas for a class the instance type changes and only objects generated
|
|
# henceafter have a different type.
|
|
|
|
# Another current difference is that a metaclass has no superclass. Also no name.
|
|
# There is a one to one relationship between a class instance and it's meta_class instance.
|
|
|
|
module Parfait
|
|
class MetaClass < Behaviour
|
|
|
|
attr_reader :clazz
|
|
|
|
def self.type_length
|
|
4
|
|
end
|
|
def self.memory_size
|
|
8
|
|
end
|
|
|
|
def initialize( clazz )
|
|
type = Object.object_space.get_type_by_class_name(:Object)
|
|
raise "No type for #{clazz.name}" unless type
|
|
super( type )
|
|
@clazz = clazz
|
|
end
|
|
|
|
def rxf_reference_name
|
|
@clazz.name
|
|
end
|
|
|
|
def inspect
|
|
"MetaClass(#{@clazz.name})"
|
|
end
|
|
|
|
def to_s
|
|
inspect
|
|
end
|
|
|
|
# Nil name means no superclass, and so nil returned
|
|
def super_class
|
|
return nil
|
|
end
|
|
|
|
# no superclass, return nil to signal
|
|
def super_class_name
|
|
nil
|
|
end
|
|
|
|
end
|
|
end
|