2014-09-24 17:15:08 +02:00
|
|
|
module Virtual
|
|
|
|
# This implements the creation of new frame and message object
|
|
|
|
|
|
|
|
# Frames and Message are very similar apart from the class name
|
|
|
|
# - All existing instances are stored in the space for both
|
2015-05-30 11:20:39 +02:00
|
|
|
# - Size is currently 2, ie 16 words
|
|
|
|
# (TODO a little flexibility here would not hurt, but the mountain is big)
|
|
|
|
# - Unused instances for a linked list with their first instance variable.
|
|
|
|
# This is HARD coded to avoid any lookup
|
2015-05-24 12:55:05 +02:00
|
|
|
|
2015-05-30 11:20:39 +02:00
|
|
|
# Just as a reminder: a message object is created before a send and holds return address/message
|
|
|
|
# and arguemnts + self frames are created upon entering a method and hold local and temporary
|
|
|
|
# variables as a result one of each is created for every single method call.
|
|
|
|
# A LOT, so make it fast luke
|
|
|
|
# Note: this is off course the reason for stack based implementations that just increment
|
|
|
|
# a known pointer/register or something. But i think most programs are memory bound
|
|
|
|
# and a few extra instructions don't hurt.
|
2014-09-24 17:15:08 +02:00
|
|
|
# After all, we are buying a big prize:oo, otherwise known as sanity.
|
|
|
|
|
|
|
|
class FrameImplementation
|
|
|
|
def run block
|
|
|
|
block.codes.dup.each do |code|
|
2015-05-24 12:55:05 +02:00
|
|
|
if code.is_a?(NewFrame)
|
2015-05-24 14:31:30 +02:00
|
|
|
kind = "next_frame"
|
2014-09-27 13:59:16 +02:00
|
|
|
elsif code.is_a?(NewMessage)
|
2015-05-24 14:31:30 +02:00
|
|
|
kind = "next_message"
|
2014-09-27 13:59:16 +02:00
|
|
|
else
|
|
|
|
next
|
|
|
|
end
|
2014-09-28 10:18:24 +02:00
|
|
|
# a place to store a reference to the space, we grab the next_frame from the space
|
2015-05-24 14:31:30 +02:00
|
|
|
space_tmp = Register::RegisterReference.tmp_reg
|
2014-09-28 10:18:24 +02:00
|
|
|
# a temporary place to store the new frame
|
2014-09-27 13:59:16 +02:00
|
|
|
frame_tmp = space_tmp.next_reg_use
|
2014-09-28 10:18:24 +02:00
|
|
|
# move the spave to it's register (mov instruction gets the address of the object)
|
2015-05-24 14:31:30 +02:00
|
|
|
new_codes = [ Register::LoadConstant.new( space_tmp , Parfait::Space.object_space )]
|
|
|
|
# find index in the space where to grab frame/message
|
|
|
|
ind = Parfait::Space.object_space.get_layout().index_of( kind )
|
|
|
|
raise "index not found for #{kind}.#{kind.class}" unless ind
|
2014-09-28 10:18:24 +02:00
|
|
|
# load the frame/message from space by index
|
2014-10-04 16:22:23 +02:00
|
|
|
new_codes << Register::GetSlot.new( frame_tmp , space_tmp , 5 )
|
2014-09-28 10:18:24 +02:00
|
|
|
# save the frame in real frame register
|
2015-05-24 14:31:30 +02:00
|
|
|
new_codes << Register::RegisterTransfer.new( Register::RegisterReference.frame_reg , frame_tmp )
|
2014-09-28 10:18:24 +02:00
|
|
|
# get the next_frame
|
2014-10-04 16:22:23 +02:00
|
|
|
new_codes << Register::GetSlot.new( frame_tmp , frame_tmp , 2 ) # 2 index of next_frame
|
2014-09-28 10:18:24 +02:00
|
|
|
# save next frame into space
|
2014-10-04 16:22:23 +02:00
|
|
|
new_codes << Register::SetSlot.new( frame_tmp , space_tmp , ind)
|
2014-09-24 17:15:08 +02:00
|
|
|
block.replace(code , new_codes )
|
|
|
|
end
|
|
|
|
end
|
|
|
|
end
|
2015-05-12 14:36:44 +02:00
|
|
|
Virtual::Machine.instance.add_pass "Virtual::FrameImplementation"
|
2014-09-24 17:15:08 +02:00
|
|
|
end
|