Torsten Rüger
57b0ad2c32
Super is a statement, a send really. Not an expression (as maybe in c++) The actual implementation will be a bit tricky, like raise, a bit of stack walking, but not impossible. Still, later
93 lines
2.4 KiB
Ruby
93 lines
2.4 KiB
Ruby
require_relative "helper"
|
|
|
|
module Ruby
|
|
class TestSendNoArg < MiniTest::Test
|
|
include RubyTests
|
|
def setup
|
|
@lst = compile( "foo")
|
|
end
|
|
def test_simple_class
|
|
assert_equal SendStatement , @lst.class
|
|
end
|
|
def test_simple_name
|
|
assert_equal :foo , @lst.name
|
|
end
|
|
def test_simple_receiver
|
|
assert_equal SelfExpression , @lst.receiver.class
|
|
end
|
|
def test_simple_args
|
|
assert_equal [] , @lst.arguments
|
|
end
|
|
def test_tos
|
|
assert_equal "self.foo()" , @lst.to_s
|
|
end
|
|
end
|
|
class TestSendSimpleArg < MiniTest::Test
|
|
include RubyTests
|
|
def setup
|
|
@lst = compile( "bar(1)")
|
|
end
|
|
def test_one_arg
|
|
assert_equal SendStatement , @lst.class
|
|
end
|
|
def test_one_arg_name
|
|
assert_equal :bar , @lst.name
|
|
end
|
|
def test_one_arg_receiver
|
|
assert_equal SelfExpression , @lst.receiver.class
|
|
end
|
|
def test_one_arg_args
|
|
assert_equal 1 , @lst.arguments.first.value
|
|
end
|
|
end
|
|
class TestSendSuper < MiniTest::Test
|
|
include RubyTests
|
|
def test_super0_receiver
|
|
lst = compile( "super")
|
|
assert_equal SelfExpression , lst.receiver.class
|
|
end
|
|
def test_super0
|
|
lst = compile( "super")
|
|
assert_equal SuperStatement , lst.class
|
|
end
|
|
|
|
def test_super_receiver
|
|
lst = compile( "super(1)")
|
|
assert_equal SelfExpression , lst.receiver.class
|
|
end
|
|
def test_super_args
|
|
lst = compile( "super(1)")
|
|
assert_equal 1 , lst.arguments.first.value
|
|
end
|
|
def test_super_name #is nil
|
|
lst = compile( "super(1)")
|
|
assert_equal :super , lst.name
|
|
end
|
|
class TestSendSendArgs < MiniTest::Test
|
|
include RubyTests
|
|
def setup
|
|
@lst = compile( "call(arg1, arg2(more))")
|
|
end
|
|
def test_one_arg
|
|
assert_equal SendStatement , @lst.class
|
|
end
|
|
def test_one_arg_name
|
|
assert_equal :call , @lst.name
|
|
end
|
|
def test_one_arg_args
|
|
assert_equal SendStatement , @lst.arguments.first.class
|
|
end
|
|
def test_one_arg_args_args
|
|
assert_equal 0 , @lst.arguments.first.arguments.length
|
|
end
|
|
def test_two_arg_args
|
|
assert_equal SendStatement , @lst.arguments[1].class
|
|
end
|
|
def test_two_arg_args_args
|
|
assert_equal SendStatement , @lst.arguments[1].arguments.first.class
|
|
assert_equal :more , @lst.arguments[1].arguments.first.name
|
|
end
|
|
end
|
|
end
|
|
end
|