Fix super as statement
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
This commit is contained in:
@ -44,16 +44,16 @@ module Ruby
|
||||
include RubyTests
|
||||
def test_super0_receiver
|
||||
lst = compile( "super")
|
||||
assert_equal SuperExpression , lst.receiver.class
|
||||
assert_equal SelfExpression , lst.receiver.class
|
||||
end
|
||||
def test_super0
|
||||
lst = compile( "super")
|
||||
assert_equal SendStatement , lst.class
|
||||
assert_equal SuperStatement , lst.class
|
||||
end
|
||||
|
||||
def test_super_receiver
|
||||
lst = compile( "super(1)")
|
||||
assert_equal SuperExpression , lst.receiver.class
|
||||
assert_equal SelfExpression , lst.receiver.class
|
||||
end
|
||||
def test_super_args
|
||||
lst = compile( "super(1)")
|
||||
@ -61,7 +61,7 @@ module Ruby
|
||||
end
|
||||
def test_super_name #is nil
|
||||
lst = compile( "super(1)")
|
||||
assert_nil lst.name
|
||||
assert_equal :super , lst.name
|
||||
end
|
||||
class TestSendSendArgs < MiniTest::Test
|
||||
include RubyTests
|
||||
|
@ -41,12 +41,11 @@ module Ruby
|
||||
include RubyTests
|
||||
def test_super0
|
||||
lst = compile( "super").to_vool
|
||||
assert_equal Vool::Statements , lst.class
|
||||
assert_equal Vool::SendStatement , lst.last.class
|
||||
assert_equal Vool::SuperStatement , lst.class
|
||||
end
|
||||
def test_super0_receiver
|
||||
lst = compile( "super").to_vool
|
||||
assert_equal Vool::SuperExpression , lst.first.value.class
|
||||
assert_equal Vool::SelfExpression , lst.receiver.class
|
||||
end
|
||||
end
|
||||
class TestSendSuperArgsVool < MiniTest::Test
|
||||
@ -55,14 +54,13 @@ module Ruby
|
||||
@lst = compile( "super(1)").to_vool
|
||||
end
|
||||
def test_super_class
|
||||
assert_equal Vool::Statements , @lst.class
|
||||
assert_equal Vool::SendStatement , @lst.last.class
|
||||
assert_equal Vool::SuperStatement , @lst.class
|
||||
end
|
||||
def test_super_receiver
|
||||
assert_equal Vool::SuperExpression , @lst.first.value.class
|
||||
assert_equal Vool::SelfExpression , @lst.receiver.class
|
||||
end
|
||||
def test_super_name
|
||||
assert @lst.first.name.to_s.start_with?("tmp")
|
||||
assert_equal :super, @lst.name
|
||||
end
|
||||
end
|
||||
class TestSendReceiverTypeVool < MiniTest::Test
|
||||
|
@ -4,27 +4,37 @@ module RubyX
|
||||
|
||||
class TestIntegerCompile < MiniTest::Test
|
||||
include ParfaitHelper
|
||||
def setup
|
||||
@compiler = compiler
|
||||
@compiler.ruby_to_vool load_parfait(:object)
|
||||
@compiler.ruby_to_vool load_parfait(:data_object)
|
||||
end
|
||||
def source
|
||||
load_parfait(:integer)
|
||||
end
|
||||
def test_load
|
||||
assert source.include?("class Integer")
|
||||
assert source.length > 2000
|
||||
assert source.length > 1500 , source.length
|
||||
end
|
||||
def qtest_vool
|
||||
vool = compiler.ruby_to_vool source
|
||||
assert_equal Vool::ClassStatement , vool.class
|
||||
assert_equal :Object , vool.name
|
||||
def test_vool
|
||||
vool = @compiler.ruby_to_vool source
|
||||
assert_equal Vool::ScopeStatement , vool.class
|
||||
assert_equal Vool::ClassExpression , vool[0].class
|
||||
assert_equal Vool::ClassExpression , vool[1].class
|
||||
assert_equal Vool::ClassExpression , vool[2].class
|
||||
assert_equal :DataObject , vool[1].name
|
||||
assert_equal :Data4 , vool[2].name
|
||||
assert_equal :Data8 , vool[3].name
|
||||
end
|
||||
def qtest_mom
|
||||
mom = compiler.ruby_to_mom source
|
||||
def test_mom
|
||||
mom = @compiler.ruby_to_mom source
|
||||
assert_equal Mom::MomCollection , mom.class
|
||||
end
|
||||
def qtest_risc
|
||||
def test_risc
|
||||
risc = compiler.ruby_to_risc source
|
||||
assert_equal Risc::RiscCollection , risc.class
|
||||
end
|
||||
def qtest_binary
|
||||
def test_binary
|
||||
risc = compiler.ruby_to_binary source , :interpreter
|
||||
assert_equal Risc::Linker , risc.class
|
||||
end
|
||||
|
Reference in New Issue
Block a user