converted resolve_method

Big, left till last, but surprisingly painless
This commit is contained in:
2020-03-08 18:48:39 +02:00
parent 12fe0b9a10
commit c1cfc12a1c
2 changed files with 26 additions and 28 deletions

View File

@ -9,46 +9,45 @@ module SlotMachine
cache_entry = Parfait::CacheEntry.new(method.frame_type, method)
ResolveMethod.new( "method" , :name , cache_entry )
end
def test_len
def est_len
assert_equal 19 , all.length , all_str
end
def test_1_load_name
assert_load 1, Symbol , :r1
assert_equal :name , risc(1).constant
assert_load 1, Parfait::Word , "id_word_"
assert_equal "name" , risc(1).constant.to_string
end
def test_2_load_cache
assert_load 2, Parfait::CacheEntry , :r2
assert_load 2, Parfait::CacheEntry , "id_cacheentry_"
end
def test_3_get_cache_type
assert_slot_to_reg 3,:r2 , 1 , :r3
assert_slot_to_reg 3 , "id_cacheentry_" , 1 , "id_cacheentry_.cached_type"
end
def test_4_get_type_methods
assert_slot_to_reg 4,:r3 , 4 , :r4
assert_slot_to_reg 4 , "id_cacheentry_.cached_type" , 4 , "id_cacheentry_.cached_type.methods"
end
def test_5_start_label
assert_label 5, "while_start_"
assert_label 5 , "while_start_"
end
def test_6_load_nil
assert_load 6, Parfait::NilClass , :r5
assert_load 6, Parfait::NilClass , "id_nilclass_"
end
def test_7_check_nil
assert_operator 7, :- , :r5 , :r4
assert_operator 7, :- , "id_nilclass_" , "id_cacheentry_.cached_type.methods"
end
def test_8_nil_branch
assert_zero 8, "exit_label_"
end
def test_9_get_method_name
assert_slot_to_reg 9,:r4 , 6 , :r6
assert_slot_to_reg 9, "id_cacheentry_.cached_type.methods" , 6 , "id_cacheentry_.cached_type.methods.name"
end
# Syscall, Label, RegToSlot,] #20
def test_10_check_name
assert_operator 10, :- , :r6 , :r1
assert_operator 10, :- , "id_cacheentry_.cached_type.methods.name" , "id_word_"
end
def test_11_nil_branch
assert_zero 11, "ok_label_"
end
def test_12_get_next_method
assert_slot_to_reg 12,:r4 , 2 , :r4
assert_slot_to_reg 12, "id_cacheentry_.cached_type.methods" , 2 , "id_cacheentry_.cached_type.methods.next_callable"
end
def test_13_continue_while
assert_branch 13, "while_start_"
@ -57,7 +56,7 @@ module SlotMachine
assert_label 14, "exit_label_"
end
def test_15_move_name
assert_transfer( 15, :r1 , :r1)
assert_transfer 15, "id_word_" , :r1
end
def test_16_die
assert_syscall 16, :died
@ -66,7 +65,7 @@ module SlotMachine
assert_label 17, "ok_label_"
end
def test_18_load_method
assert_reg_to_slot 18, :r4 , :r2 , 2
assert_reg_to_slot 18 , "id_cacheentry_.cached_type.methods.next_callable" , "id_cacheentry_" , 2
end
end
end