2019-10-03 20:07:55 +02:00
|
|
|
module SlotMachine
|
2017-09-14 15:07:02 +02:00
|
|
|
|
|
|
|
# A dynamic call calls a method at runtime. This off course implies that we don't know the
|
|
|
|
# method at compile time and so must "find" it. Resolving, or finding the method, is a
|
2018-04-08 17:51:20 +02:00
|
|
|
# a seperate instruction though, and here we assume that we know this Method instance.
|
2017-09-14 15:07:02 +02:00
|
|
|
#
|
2018-03-10 14:17:36 +01:00
|
|
|
# Both (to be called) Method instance and the type of receiver are stored as
|
|
|
|
# variables here. The type is used to check before calling.
|
2017-09-14 15:07:02 +02:00
|
|
|
#
|
2018-04-08 17:51:20 +02:00
|
|
|
# Setting up the method is not part of this instructions scope. That setup
|
2018-03-10 14:17:36 +01:00
|
|
|
# includes the type check and any necccessay method resolution.
|
2019-10-03 23:36:49 +02:00
|
|
|
# See sol send statement
|
2017-09-14 15:07:02 +02:00
|
|
|
#
|
|
|
|
class DynamicCall < Instruction
|
2018-03-17 14:33:39 +01:00
|
|
|
attr :cache_entry
|
2017-09-14 15:07:02 +02:00
|
|
|
|
2018-03-10 14:17:36 +01:00
|
|
|
def initialize(type = nil, method = nil)
|
2018-03-17 14:33:39 +01:00
|
|
|
@cache_entry = Parfait::CacheEntry.new(type, method)
|
2017-09-14 15:07:02 +02:00
|
|
|
end
|
2018-03-14 15:55:21 +01:00
|
|
|
|
2018-04-17 19:26:15 +02:00
|
|
|
def to_s
|
|
|
|
str = "DynamicCall "
|
2020-03-03 15:44:21 +01:00
|
|
|
str += cache_entry.cached_method&.name if cache_entry and cache_entry.cached_method
|
2018-04-17 19:26:15 +02:00
|
|
|
str
|
|
|
|
end
|
|
|
|
|
2018-03-21 07:21:10 +01:00
|
|
|
# One could almost think that one can resolve this to a Risc::FunctionCall
|
|
|
|
# (which btw resolves to a simple jump), alas, the FunctionCall, like all other
|
|
|
|
# jumping, resolves the address at compile time.
|
|
|
|
#
|
|
|
|
# Instead we need a DynamicJump instruction that explicitly takes a register as
|
|
|
|
# a target (not a label)
|
|
|
|
def to_risc(compiler)
|
2020-03-03 15:44:21 +01:00
|
|
|
entry = compiler.load_object(@cache_entry)[:cached_method].to_reg
|
|
|
|
compiler.add_constant( @cache_entry)
|
2018-05-29 19:26:00 +02:00
|
|
|
return_label = Risc.label(self, "continue_#{object_id}")
|
2020-03-03 15:44:21 +01:00
|
|
|
return_address = compiler.load_object(return_label)
|
|
|
|
|
|
|
|
compiler.build(to_s) do
|
|
|
|
message[:next_message][:return_address] << return_address
|
2018-08-16 09:43:41 +02:00
|
|
|
message << message[:next_message]
|
2020-03-03 15:44:21 +01:00
|
|
|
add_code Risc::DynamicJump.new("DynamicCall", entry )
|
2018-08-16 09:43:41 +02:00
|
|
|
add_code return_label
|
|
|
|
end
|
2018-03-14 15:55:21 +01:00
|
|
|
end
|
2017-09-14 15:07:02 +02:00
|
|
|
end
|
|
|
|
|
|
|
|
end
|