2014-10-03 14:32:54 +03:00
|
|
|
module Register
|
|
|
|
# name says it all really
|
|
|
|
# only arg is the method object we want to call
|
|
|
|
# assembly takes care of the rest (ie getting the address)
|
|
|
|
|
|
|
|
class FunctionCall < Instruction
|
2015-07-27 12:13:39 +03:00
|
|
|
def initialize source , method
|
|
|
|
super(source)
|
2014-10-03 14:32:54 +03:00
|
|
|
@method = method
|
|
|
|
end
|
|
|
|
attr_reader :method
|
2015-07-24 13:23:56 +03:00
|
|
|
|
|
|
|
def to_s
|
2015-07-25 09:30:58 +03:00
|
|
|
"FunctionCall: #{method.name}"
|
2015-07-24 13:23:56 +03:00
|
|
|
end
|
2015-10-18 19:27:46 +03:00
|
|
|
end
|
2015-07-24 13:23:56 +03:00
|
|
|
|
2015-10-28 21:39:59 +02:00
|
|
|
def self.issue_call compiler , callee
|
2015-10-29 22:31:28 +02:00
|
|
|
source = "_issue_call(#{callee.name})"
|
2015-11-04 20:22:28 +02:00
|
|
|
return_label = Label.new("_return_label" , "#{compiler.clazz.name}.#{compiler.method.name}" )
|
2015-11-03 11:20:49 +02:00
|
|
|
ret_tmp = compiler.use_reg(:Label)
|
|
|
|
compiler.add_code Register::LoadConstant.new(source, return_label , ret_tmp)
|
|
|
|
compiler.add_code Register.set_slot(source, ret_tmp , :new_message , :return_address)
|
2015-10-18 19:27:46 +03:00
|
|
|
# move the current new_message to message
|
2015-10-29 22:31:28 +02:00
|
|
|
compiler.add_code RegisterTransfer.new(source, Register.new_message_reg , Register.message_reg )
|
2015-10-18 19:27:46 +03:00
|
|
|
# do the register call
|
2015-10-29 22:31:28 +02:00
|
|
|
compiler.add_code FunctionCall.new( source , callee )
|
2015-11-03 11:20:49 +02:00
|
|
|
compiler.add_code return_label
|
2015-11-07 21:59:39 +02:00
|
|
|
# move the current message to new_message
|
|
|
|
compiler.add_code Register::RegisterTransfer.new(source, Register.message_reg , Register.new_message_reg )
|
|
|
|
# and restore the message from saved value in new_message
|
|
|
|
compiler.add_code Register.get_slot(source , :new_message , :caller , :message )
|
2014-10-03 14:32:54 +03:00
|
|
|
end
|
2015-07-24 13:23:56 +03:00
|
|
|
end
|