require_relative "helper" module Vool class TestBasicValues < MiniTest::Test def test_self lst = RubyCompiler.compile( "self") assert_equal SelfExpression , lst.class end def test_nil lst = RubyCompiler.compile( "nil") assert_equal NilConstant , lst.class end def test_false lst = RubyCompiler.compile( "false") assert_equal FalseConstant , lst.class end def test_true lst = RubyCompiler.compile( "true") assert_equal TrueConstant , lst.class end def test_integer lst = RubyCompiler.compile( "123") assert_equal IntegerConstant , lst.class end def test_string lst = RubyCompiler.compile( "'string'") assert_equal StringConstant , lst.class , lst.inspect end def test_sym lst = RubyCompiler.compile( ":symbol") assert_equal SymbolConstant , lst.class , lst.inspect end def test_dstr assert_raises RuntimeError do RubyCompiler.compile( '"dstr#{self}"') end end def test_scope lst = RubyCompiler.compile( "begin ; 1 ; end") assert_equal ScopeStatement , lst.class , lst.inspect end def test_scope_contents lst = RubyCompiler.compile( "begin ; 1 ; end") assert_equal 1 , lst.statements.first.value end end class TestBasicTypes < MiniTest::Test def setup Risc.machine.boot end def compile( input ) lst = RubyCompiler.compile( input ) lst.ct_type end def test_integer assert_equal "Integer_Type" , compile( "123").name end def test_string assert_equal "Word_Type" , compile( "'string'").name end def test_sym assert_equal "Word_Type" , compile( ":symbol").name end # classes fot these are not implemented in parfait yet def pest_nil assert_equal "Nil_Type" , compile( "nil").name end def pest_false assert_equal "False_Type" , compile( "false").name end def pest_true assert_equal "True_Type" , compile( "true").name end end end