77 lines
2.6 KiB
Ruby
77 lines
2.6 KiB
Ruby
require_relative "../helper"
|
|
|
|
module Risc
|
|
class TestRegisterSlot1 < MiniTest::Test
|
|
|
|
def setup
|
|
Parfait.boot!(Parfait.default_test_options)
|
|
@compiler = Risc.test_compiler
|
|
@r0 = RegisterValue.new(:message , :Message).set_compiler(@compiler)
|
|
end
|
|
def test_reg_to_slot_reg
|
|
reg = @r0[:next_message] << @r0
|
|
assert_equal RegisterValue , reg.class
|
|
assert_equal :message , reg.symbol
|
|
assert_equal "Message_Type" , reg.type.name
|
|
end
|
|
def test_reg_to_slot_inst
|
|
@r0[:next_message] << @r0
|
|
inst = @compiler.current
|
|
assert_equal RegToSlot , @compiler.current.class
|
|
assert_equal @r0 , inst.register
|
|
assert_equal 1 , inst.index
|
|
assert_equal :message , inst.array.symbol
|
|
end
|
|
end
|
|
class TestRegisterSlot2 < MiniTest::Test
|
|
def setup
|
|
Parfait.boot!(Parfait.default_test_options)
|
|
@compiler = Risc.test_compiler
|
|
@r0 = RegisterValue.new(:message , :Message).set_compiler(@compiler)
|
|
end
|
|
def test_reg_to_slot_reg
|
|
reg = @r0[:next_message] << @r0[:next_message]
|
|
assert_equal RegisterValue , reg.class
|
|
assert_equal :"message.next_message" , reg.symbol
|
|
assert_equal "Message_Type" , reg.type.name
|
|
end
|
|
def test_reg_to_slot_inst1
|
|
@r0[:next_message] << @r0[:next_message]
|
|
inst = @compiler.risc_instructions.next
|
|
assert_equal SlotToReg , inst.class
|
|
assert_equal :"message.next_message" , inst.register.symbol
|
|
assert_equal 1 , inst.index
|
|
assert_equal :message , inst.array.symbol
|
|
end
|
|
def test_reg_to_slot_inst2
|
|
@r0[:next_message] << @r0[:next_message]
|
|
inst = @compiler.current
|
|
assert_equal RegToSlot , inst.class
|
|
assert_equal :"message.next_message" , inst.register.symbol
|
|
assert_equal 1 , inst.index
|
|
assert_equal :message , inst.array.symbol
|
|
end
|
|
end
|
|
class TestRegisterSlot3 < MiniTest::Test
|
|
def setup
|
|
Parfait.boot!(Parfait.default_test_options)
|
|
@compiler = Risc.test_compiler
|
|
@r0 = RegisterValue.new(:message , :Message).set_compiler(@compiler)
|
|
end
|
|
def test_arr_reg
|
|
slot = @r0[:next_message][:type]
|
|
assert_equal RegisterSlot , slot.class
|
|
assert_equal :"message.next_message" , slot.register.symbol
|
|
assert_equal "Message_Type" , slot.register.type.name
|
|
end
|
|
def test_arr_inst
|
|
slot = @r0[:next_message][:type]
|
|
inst = @compiler.current
|
|
assert_equal SlotToReg , inst.class
|
|
assert_equal :"message.next_message" , inst.register.symbol
|
|
assert_equal 1 , inst.index
|
|
assert_equal :message , inst.array.symbol
|
|
end
|
|
end
|
|
end
|