78 lines
2.0 KiB
Ruby
78 lines
2.0 KiB
Ruby
require_relative "helper"
|
|
|
|
module Ruby
|
|
class TestClassStatementSol < MiniTest::Test
|
|
include RubyTests
|
|
|
|
def setup
|
|
input = "class Tryout < Base;def meth; a = 5 ;end; end"
|
|
@sol = compile( input ).to_sol
|
|
end
|
|
def test_class
|
|
assert_equal Sol::ClassExpression , @sol.class
|
|
end
|
|
def test_body
|
|
assert_equal Sol::Statements , @sol.body.class
|
|
end
|
|
def test_compile_class_name
|
|
assert_equal :Tryout , @sol.name
|
|
end
|
|
def test_compile_class_super
|
|
assert_equal :Base , @sol.super_class_name
|
|
end
|
|
|
|
end
|
|
class TestEmptyClassStatement < MiniTest::Test
|
|
include RubyTests
|
|
|
|
def setup
|
|
input = "class Tryout < Base;end"
|
|
@lst = compile( input )
|
|
end
|
|
|
|
def test_compile_class
|
|
assert_equal ClassStatement , @lst.class
|
|
end
|
|
def test_compile_class_name
|
|
assert_equal :Tryout , @lst.name
|
|
end
|
|
def test_compile_class_super
|
|
assert_equal :Base , @lst.super_class_name
|
|
end
|
|
def test_compile_class_body
|
|
assert @lst.body.empty?
|
|
end
|
|
|
|
end
|
|
class TestBasicClassStatement < MiniTest::Test
|
|
include ScopeHelper
|
|
include RubyTests
|
|
|
|
def test_compile_one_method
|
|
lst = compile( as_main("@ivar = 4") )
|
|
assert_equal IvarAssignment , lst.body.first.body.class
|
|
end
|
|
def test_compile_two_stats
|
|
lst = compile( as_main("false; true;") )
|
|
assert_equal ScopeStatement , lst.body.first.body.class
|
|
assert_equal TrueConstant , lst.body.first.body.statements[1].class
|
|
end
|
|
end
|
|
class TestClassStatementTransformFail < MiniTest::Test
|
|
include RubyTests
|
|
|
|
def test_if
|
|
input = "class Tryout < Base; false if(true) ; end"
|
|
assert_raises_muted { compile( input ).to_sol}
|
|
end
|
|
def test_instance
|
|
input = "class Tryout < Base; @var = 5 ; end"
|
|
assert_raises_muted { compile( input ).to_sol}
|
|
end
|
|
def test_wrong_send
|
|
input = "class Tryout < Base; hi() ; end"
|
|
assert_raises_muted { compile( input ).to_sol}
|
|
end
|
|
end
|
|
end
|