rename get/set internal
to _word , because _byte versions are coming
This commit is contained in:
@ -37,7 +37,7 @@ HERE
|
||||
assert_equal Register::FunctionReturn , ret.class
|
||||
|
||||
object = @interpreter.get_register( ret.register )
|
||||
link = object.get_internal( ret.index )
|
||||
link = object.get_internal_word( ret.index )
|
||||
|
||||
assert_equal Register::Label , link.class
|
||||
end
|
||||
|
@ -17,11 +17,11 @@ class TestLayout < MiniTest::Test
|
||||
assert_equal @mess.next_message , @mess.get_instance_variable(:next_message)
|
||||
index = @mess.get_layout.variable_index :next_message
|
||||
assert_equal 2 , index
|
||||
assert_equal @mess.next_message , @mess.get_internal(index)
|
||||
assert_equal @mess.next_message , @mess.get_internal_word(index)
|
||||
end
|
||||
|
||||
def test_layout_index
|
||||
assert_equal @mess.get_layout , @mess.get_internal(Parfait::LAYOUT_INDEX) , "mess"
|
||||
assert_equal @mess.get_layout , @mess.get_internal_word(Parfait::LAYOUT_INDEX) , "mess"
|
||||
end
|
||||
|
||||
def test_inspect
|
||||
@ -38,7 +38,7 @@ class TestLayout < MiniTest::Test
|
||||
|
||||
def test_layout_length
|
||||
assert_equal 9 , @mess.get_layout.instance_length , @mess.get_layout.inspect
|
||||
assert_equal 18 , @mess.get_layout.get_internal(4)
|
||||
assert_equal 18 , @mess.get_layout.get_internal_word(4)
|
||||
end
|
||||
|
||||
def test_layout_length_index
|
||||
@ -46,7 +46,7 @@ class TestLayout < MiniTest::Test
|
||||
assert_equal 4 , @mess.get_layout.get_layout.get_offset
|
||||
assert_equal 4 , @mess.get_layout.get_offset
|
||||
assert_equal 8 , @mess.get_layout.get_layout.indexed_length
|
||||
assert_equal 8 , @mess.get_layout.get_layout.get_internal(4)
|
||||
assert_equal 8 , @mess.get_layout.get_layout.get_internal_word(4)
|
||||
end
|
||||
|
||||
def test_layout_methods
|
||||
@ -116,7 +116,7 @@ class TestLayout < MiniTest::Test
|
||||
message_ind = Register.resolve_index( :message , :receiver )
|
||||
assert_equal 3 , message_ind
|
||||
@mess.receiver = 55
|
||||
assert_equal 55 , @mess.get_internal(message_ind)
|
||||
assert_equal 55 , @mess.get_internal_word(message_ind)
|
||||
end
|
||||
|
||||
def test_object_layout
|
||||
@ -125,6 +125,6 @@ class TestLayout < MiniTest::Test
|
||||
|
||||
def test_remove_me
|
||||
layout = @mess.get_layout
|
||||
assert_equal layout , @mess.get_internal(1)
|
||||
assert_equal layout , @mess.get_internal_word(1)
|
||||
end
|
||||
end
|
||||
|
@ -48,7 +48,7 @@ class TestList < MiniTest::Test
|
||||
@list.push :one
|
||||
assert_equal 1 , @list.get_length
|
||||
assert_equal 1 , @list.indexed_length
|
||||
assert_equal 1 , @list.get_internal(Parfait::LAYOUT_INDEX + 1)
|
||||
assert_equal 1 , @list.get_internal_word(Parfait::LAYOUT_INDEX + 1)
|
||||
end
|
||||
def test_list_inspect
|
||||
@list.set(1,1)
|
||||
@ -71,7 +71,7 @@ class TestList < MiniTest::Test
|
||||
end
|
||||
def test_one_set1
|
||||
assert_equal 2 , @list.set(1,2)
|
||||
assert_equal 1 , @list.get_internal(2)
|
||||
assert_equal 1 , @list.get_internal_word(2)
|
||||
end
|
||||
def test_set1_len
|
||||
@list.set(1,1)
|
||||
|
@ -29,11 +29,11 @@ class TestMessage < MiniTest::Test
|
||||
end
|
||||
def test_push3
|
||||
@mess.push :name
|
||||
assert_equal 1 , @mess.get_internal(9)
|
||||
assert_equal 1 , @mess.get_internal_word(9)
|
||||
end
|
||||
def test_get_internal
|
||||
def test_get_internal_word
|
||||
@mess.push :name
|
||||
assert_equal :name , @mess.get_internal(10)
|
||||
assert_equal :name , @mess.get_internal_word(10)
|
||||
end
|
||||
|
||||
def test_get
|
||||
|
@ -14,36 +14,36 @@ class TestObject < MiniTest::Test
|
||||
end
|
||||
|
||||
def test_empty_object_doesnt_return
|
||||
assert_equal nil , @object.get_internal(3)
|
||||
assert_equal nil , @object.get_internal_word(3)
|
||||
end
|
||||
|
||||
def test_one_set1
|
||||
assert_equal 1 , @object.set_internal(1,1)
|
||||
assert_equal 1 , @object.set_internal_word(1,1)
|
||||
end
|
||||
|
||||
def test_one_set2
|
||||
assert_equal :some , @object.set_internal(2,:some)
|
||||
assert_equal :some , @object.set_internal_word(2,:some)
|
||||
end
|
||||
|
||||
def test_two_sets
|
||||
assert_equal 1 , @object.set_internal(1,1)
|
||||
assert_equal :some , @object.set_internal(1,:some)
|
||||
assert_equal 1 , @object.set_internal_word(1,1)
|
||||
assert_equal :some , @object.set_internal_word(1,:some)
|
||||
end
|
||||
def test_one_get1
|
||||
test_one_set1
|
||||
assert_equal 1 , @object.get_internal(1)
|
||||
assert_equal 1 , @object.get_internal_word(1)
|
||||
end
|
||||
def test_one_get2
|
||||
test_one_set2
|
||||
assert_equal :some , @object.get_internal(2)
|
||||
assert_equal :some , @object.get_internal_word(2)
|
||||
end
|
||||
def test_many_get
|
||||
shouldda = { 1 => :one , 2 => :two , 3 => :three}
|
||||
shouldda.each do |k,v|
|
||||
@object.set_internal(k,v)
|
||||
@object.set_internal_word(k,v)
|
||||
end
|
||||
shouldda.each do |k,v|
|
||||
assert_equal v , @object.get_internal(k)
|
||||
assert_equal v , @object.get_internal_word(k)
|
||||
end
|
||||
end
|
||||
end
|
||||
|
Reference in New Issue
Block a user