2018-08-19 14:36:51 +02:00
|
|
|
require_relative "helper"
|
|
|
|
|
|
|
|
module Mom
|
|
|
|
class TestSlotLoad3 < Parfait::ParfaitTest
|
|
|
|
|
|
|
|
def setup
|
|
|
|
super
|
|
|
|
method = make_method
|
|
|
|
@compiler = Risc::FakeCompiler.new
|
|
|
|
@cache_entry = Parfait::CacheEntry.new(method.frame_type, method)
|
2019-08-10 20:59:31 +02:00
|
|
|
load = SlotLoad.new("test", [@cache_entry , :cached_type] , [:message, :type] )
|
2018-08-19 14:36:51 +02:00
|
|
|
load.to_risc(@compiler)
|
|
|
|
@instructions = @compiler.instructions
|
|
|
|
end
|
|
|
|
def test_ins_next_class
|
|
|
|
assert_equal Risc::SlotToReg , @instructions[0].class
|
|
|
|
assert_equal Risc::LoadConstant, @instructions[1].class
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_ins_next_class
|
|
|
|
assert_equal Risc::RegToSlot , @instructions[2].class
|
|
|
|
assert_equal NilClass , @instructions[3].class
|
|
|
|
end
|
|
|
|
def test_ins_load
|
|
|
|
assert_equal :r1 , @instructions[1].register.symbol
|
|
|
|
assert_equal Parfait::CacheEntry , @instructions[1].constant.class
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_ins_next_reg
|
|
|
|
assert_equal :r1 , @instructions[0].register.symbol
|
|
|
|
end
|
|
|
|
def test_ins_next_arr
|
|
|
|
assert_equal :r0 , @instructions[0].array.symbol
|
|
|
|
end
|
|
|
|
def test_ins_next_index
|
|
|
|
assert_equal 0 , @instructions[0].index
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_ins_next_2_reg
|
|
|
|
assert_equal :r1 , @instructions[2].register.symbol
|
|
|
|
end
|
|
|
|
def test_ins_next_2_arr
|
|
|
|
assert_equal :r1 , @instructions[2].array.symbol
|
|
|
|
end
|
|
|
|
def test_ins_next_2_index
|
|
|
|
assert_equal 1 , @instructions[2].index
|
|
|
|
end
|
|
|
|
|
|
|
|
end
|
|
|
|
end
|