68 lines
1.3 KiB
Ruby
68 lines
1.3 KiB
Ruby
module Sol
|
|
module Named
|
|
attr_reader :name
|
|
def initialize name
|
|
@name = name
|
|
end
|
|
def each(&block)
|
|
end
|
|
end
|
|
|
|
class LocalVariable < Expression
|
|
include Named
|
|
def to_slot_definition(compiler)
|
|
slot_def = compiler.slot_type_for(@name)
|
|
SlotMachine::Slotted.for(:message , slot_def)
|
|
end
|
|
def to_s(depth = 0)
|
|
name.to_s
|
|
end
|
|
def each(&block)
|
|
block.call(self)
|
|
end
|
|
end
|
|
|
|
class InstanceVariable < Expression
|
|
include Named
|
|
def to_slot_definition(_)
|
|
SlotMachine::Slotted.for(:message , [ :receiver , @name] )
|
|
end
|
|
# used to collect type information
|
|
def add_ivar( array )
|
|
array << @name
|
|
end
|
|
def to_s(depth = 0)
|
|
at_depth(depth , "@#{name}")
|
|
end
|
|
def each(&block)
|
|
block.call(self)
|
|
end
|
|
end
|
|
|
|
class ClassVariable < Expression
|
|
include Named
|
|
def each(&block)
|
|
block.call(self)
|
|
end
|
|
end
|
|
|
|
class ModuleName < Expression
|
|
include Named
|
|
def ct_type
|
|
get_named_class.single_class.instance_type
|
|
end
|
|
def to_slot_definition(_)
|
|
return SlotMachine::Slotted.for( get_named_class, [])
|
|
end
|
|
def get_named_class
|
|
Parfait.object_space.get_class_by_name(self.name)
|
|
end
|
|
def each(&block)
|
|
block.call(self)
|
|
end
|
|
def to_s
|
|
@name.to_s
|
|
end
|
|
end
|
|
end
|