35 lines
864 B
Ruby
35 lines
864 B
Ruby
|
require_relative "helper"
|
||
|
|
|
||
|
|
module Mom
|
||
|
|
class TestSimpleCall < MomInstructionTest
|
||
|
|
include Parfait::MethodHelper
|
||
|
|
|
||
|
|
def instruction
|
||
|
|
SimpleCall.new( make_method )
|
||
|
|
end
|
||
|
|
def test_len
|
||
|
|
assert_equal 7 , all.length , all_str
|
||
|
|
end
|
||
|
|
def test_1_load_return_label
|
||
|
|
assert_load risc(1) , Risc::Label , :r1
|
||
|
|
assert_label risc(1).constant , "continue_"
|
||
|
|
end
|
||
|
|
def test_2_load_next_message
|
||
|
|
assert_slot_to_reg risc(2) ,:r0 , 1 , :r2
|
||
|
|
end
|
||
|
|
def test_3_store_return_address
|
||
|
|
assert_reg_to_slot risc(3) , :r1 , :r2 , 4
|
||
|
|
end
|
||
|
|
def test_4_swap_messages
|
||
|
|
assert_slot_to_reg risc(4) ,:r0 , 1 , :r0
|
||
|
|
end
|
||
|
|
def test_5_call
|
||
|
|
assert_equal Risc::FunctionCall , risc(5).class
|
||
|
|
assert_equal :meth , risc(5).method.name
|
||
|
|
end
|
||
|
|
def test_6_label
|
||
|
|
assert_label risc(6) , "continue_"
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|