rubyx/test/slot_machine/instructions/test_resolve_method.rb
Torsten f2250bc206 fix resolve and introduce method to chop strings to max
strings are 20 bytes. I want to implement the extension idea, just not now
2020-03-22 14:31:43 +02:00

75 lines
2.3 KiB
Ruby

require_relative "helper"
module SlotMachine
class TestResolveMethod < SlotMachineInstructionTest
include Parfait::MethodHelper
def instruction
method = make_method
cache_entry = Parfait::CacheEntry.new(method.frame_type, method)
ResolveMethod.new( "method" , :name , cache_entry )
end
def test_len
assert_equal 20 , all.length , all_str
end
def test_1_load_name
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 , "id_cacheentry_"
end
def test_3_get_cache_type
assert_slot_to_reg 3 , "id_cacheentry_" , 1 , "id_cacheentry_.cached_type"
end
def test_4_get_type_methods
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_"
end
def test_6_load_nil
assert_load 6, Parfait::NilClass , "id_nilclass_"
end
def test_7_check_nil
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, "id_cacheentry_.cached_type.methods" , 6 , "id_cacheentry_.cached_type.methods.name"
end
def test_10_check_name
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, "id_cacheentry_.cached_type.methods" , 2 , "id_cacheentry_.cached_type.methods.next_callable"
end
def test_13_continue_while
assert_branch 13, "while_start_"
end
def test_14_goto_exit
assert_label 14, "exit_label_"
end
def test_15_load_name
assert_load 15, Parfait::Word , "id_word_"
end
def test_16_move_name
assert_transfer 16, "id_word_" , :r1
end
def test_17_sys
assert_syscall 17, :died
end
def test_18_label
assert_label 18, "ok_label_"
end
def test_19_method
assert_reg_to_slot 19 , "id_cacheentry_.cached_type.methods.next_callable" , "id_cacheentry_" , 2
end
end
end