now object slot , almost done
This commit is contained in:
@ -31,7 +31,7 @@ module Sol
|
||||
def test_receiver
|
||||
assert_equal SlotMachine::ArgumentTransfer, @ins.next(1).class
|
||||
assert_equal 0, @ins.next(1).arguments.length
|
||||
assert_equal SlotDefinition, @ins.next(1).receiver.class
|
||||
assert_equal ObjectDefinition, @ins.next(1).receiver.class
|
||||
assert_equal Parfait::Class, @ins.next(1).receiver.known_object.class
|
||||
assert_equal :Space, @ins.next(1).receiver.known_object.name
|
||||
end
|
||||
|
@ -39,7 +39,7 @@ module Sol
|
||||
assert_equal :Object , @ins.next.receiver.known_object.name
|
||||
end
|
||||
def test_receiver_move
|
||||
assert_equal SlotDefinition, @ins.next.receiver.class
|
||||
assert_equal ObjectDefinition, @ins.next.receiver.class
|
||||
end
|
||||
def test_receiver
|
||||
assert_equal Parfait::Class, @ins.next.receiver.known_object.class
|
||||
|
@ -28,7 +28,7 @@ module Sol
|
||||
assert_equal [:next_message, :arg1], left.slots
|
||||
end
|
||||
def test_check_left
|
||||
assert_equal SlotDefinition, @ins.left.class
|
||||
assert_equal ObjectDefinition, @ins.left.class
|
||||
assert_equal Parfait::CallableMethod, @ins.left.known_object.class
|
||||
assert_equal :main, @ins.left.known_object.name
|
||||
assert @ins.left.slots.empty?
|
||||
|
Reference in New Issue
Block a user