always slot definitions in slot loads
This commit is contained in:
@ -14,7 +14,7 @@ module Vool
|
||||
assert_equal Mom::ArgumentTransfer, @stats[1].class
|
||||
end
|
||||
def test_receiver_move
|
||||
assert_equal :receiver, @stats[1].receiver.left[2]
|
||||
assert_equal :receiver, @stats[1].receiver.left.slots[1]
|
||||
end
|
||||
def test_receiver
|
||||
type , value = receiver
|
||||
|
@ -44,7 +44,8 @@ module Vool
|
||||
end
|
||||
|
||||
def test_call_third
|
||||
assert @fourth.method_var_name.start_with?("cached_") , @fourth.to_rxf
|
||||
assert @fourth.cached_method.start_with?("cached_") , @fourth.to_rxf
|
||||
assert @fourth.cached_type.start_with?("cached_") , @fourth.to_rxf
|
||||
end
|
||||
|
||||
def est_receiver_move_class
|
||||
|
@ -15,8 +15,8 @@ module Vool
|
||||
[IntegerStatement , 5]
|
||||
end
|
||||
def test_args_two_move
|
||||
assert_equal :next_message, @stats[1].arguments[1].left[1]
|
||||
assert_equal :arguments, @stats[1].arguments[1].left[2]
|
||||
assert_equal :next_message, @stats[1].arguments[1].left.slots[0]
|
||||
assert_equal :arguments, @stats[1].arguments[1].left.slots[1]
|
||||
end
|
||||
def test_args_two_str
|
||||
assert_equal IntegerStatement, @stats[1].arguments[1].right.class
|
||||
|
@ -16,8 +16,8 @@ module Vool
|
||||
end
|
||||
|
||||
def test_args_one_move
|
||||
assert_equal :next_message, @stats[1].arguments[0].left[1]
|
||||
assert_equal :arguments, @stats[1].arguments[0].left[2]
|
||||
assert_equal :next_message, @stats[1].arguments[0].left.slots[0]
|
||||
assert_equal :arguments, @stats[1].arguments[0].left.slots[1]
|
||||
end
|
||||
def test_args_one_str
|
||||
assert_equal IntegerStatement, @stats[1].arguments[0].right.class
|
||||
|
@ -19,13 +19,13 @@ module Vool
|
||||
assert @method.first.left
|
||||
end
|
||||
def test_slot_starts_at_message
|
||||
assert_equal :message , @method.first.left[0]
|
||||
assert_equal :message , @method.first.left.known_object
|
||||
end
|
||||
def test_slot_gets_self
|
||||
assert_equal :self , @method.first.left[1]
|
||||
assert_equal :self , @method.first.left.slots[0]
|
||||
end
|
||||
def test_slot_assigns_to_local
|
||||
assert_equal :a , @method.first.left[-1]
|
||||
assert_equal :a , @method.first.left.slots[-1]
|
||||
end
|
||||
def test_slot_assigns_something
|
||||
assert @method.first.right
|
||||
|
@ -25,10 +25,10 @@ module Vool
|
||||
assert_equal Mom::ReturnSequence, @stats.last.class
|
||||
end
|
||||
def test_slot_starts_at_message
|
||||
assert_equal :message , @stats.first.left[0]
|
||||
assert_equal :message , @stats.first.left.known_object
|
||||
end
|
||||
def test_slot_gets_return
|
||||
assert_equal :return_value , @stats.first.left[1]
|
||||
assert_equal :return_value , @stats.first.left.slots[0]
|
||||
end
|
||||
def test_slot_assigns_something
|
||||
assert @stats.first.right
|
||||
|
Reference in New Issue
Block a user