59 lines
2.0 KiB
Ruby
59 lines
2.0 KiB
Ruby
module Vm
|
|
module NameExpression
|
|
|
|
# attr_reader :name
|
|
# compiling name needs to check if it's a local variable
|
|
# or an argument
|
|
# whichever way this goes the result is stored in the return slot (as all compiles)
|
|
def on_KnownName statement
|
|
name = statement.name
|
|
[:self , :space , :message].each do |special|
|
|
return send(:"load_special_#{special}" , statement ) if name == special
|
|
end
|
|
raise "Unknow 'known' expression #{name}"
|
|
end
|
|
|
|
def on_ArgumentName(statement)
|
|
name = statement.name
|
|
index = @method.has_argument(name)
|
|
raise "no arg #{name}" unless index
|
|
named_list = use_reg :NamedList
|
|
ret = use_reg @method.arguments_type(index)
|
|
#puts "For #{name} at #{index} got #{@method.arguments.inspect}"
|
|
add_slot_to_reg("#{statement} load args" , :message , :arguments, named_list )
|
|
add_slot_to_reg("#{statement} load #{name}" , named_list , index + 1, ret )
|
|
return ret
|
|
end
|
|
|
|
def on_LocalName( statement )
|
|
name = statement.name
|
|
index = @method.has_local( name )
|
|
raise "must define local '#{name}' before using it" unless index
|
|
named_list = use_reg :NamedList
|
|
add_slot_to_reg("#{name} load locals" , :message , :locals , named_list )
|
|
ret = use_reg @method.locals_type( index )
|
|
add_slot_to_reg("#{name} load from locals" , named_list , index + 1, ret )
|
|
return ret
|
|
end
|
|
|
|
def load_special_self(statement)
|
|
ret = use_reg @type
|
|
add_slot_to_reg("#{statement} load self" , :message , :receiver , ret )
|
|
return ret
|
|
end
|
|
|
|
def load_special_space(statement)
|
|
space = Parfait.object_space
|
|
reg = use_reg :Space , space
|
|
add_load_constant( "#{statement} load space", space , reg )
|
|
return reg
|
|
end
|
|
|
|
def load_special_message(statement)
|
|
reg = use_reg :Message
|
|
add_transfer( "#{statement} load message", Risc.message_reg , reg )
|
|
return reg
|
|
end
|
|
end #module
|
|
end
|