create compilers directory, found and renamed salama.rb

This commit is contained in:
Torsten Ruger
2017-01-14 20:05:58 +02:00
parent 01fe3b4b04
commit 2e62c5bbb6
23 changed files with 238 additions and 224 deletions

View File

@ -18,7 +18,7 @@ require "minitest/autorun"
$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'test'))
require 'salama'
require 'rubyx'
module Compiling
def clean_compile(clazz_name , method_name , args , statements)

View File

@ -1,35 +0,0 @@
require_relative "helper"
module Melon
class TestLocalsCollector < MiniTest::Test
def setup
Register.machine.boot unless Register.machine.booted
end
def parse_collect( input )
ast = Parser::Ruby22.parse input
LocalsCollector.new.collect(ast)
end
def test_no_locals
locals = parse_collect "def meth; end"
assert locals.empty?
end
def test_method_is_not_local
locals = parse_collect("def meth2(arg1); foo ;end")
assert locals.empty?
end
def test_local_assign_one
locals = parse_collect("def meth2(arg1); foo = bar ;end")
assert locals[:foo] , locals.inspect
end
def test_local_assign_two
locals = parse_collect("def meth2(arg1); foo = bar ; groove = 1 + 2 ;end")
assert locals.length == 2 , locals.inspect
end
end
end

View File

@ -1,37 +0,0 @@
require_relative "helper"
module Melon
class TestMethodCollector < MiniTest::Test
def setup
Register.machine.boot unless Register.machine.booted
end
def parse_collect( input )
ast = Parser::Ruby22.parse input
MethodCollector.new.collect(ast)
end
def test_no_args
methods = parse_collect "def meth; @ivar;end"
assert methods.find{|m| m.name == :meth }
end
def test_one_arg
method = parse_collect("def meth2(arg1); 1;end").first
assert method.name == :meth2
assert_equal 2 , method.args_type.variable_index(:arg1) , method.args_type.inspect
end
def test_three_args
method = parse_collect("def meth3(yksi,kaksi,kolme); 1;end").first
assert method.args_type.variable_index(:kolme) , method.args_type.inspect
end
def test_one_local
method = parse_collect("def meth2(arg1); foo = 2 ;end").first
assert method.locals_type.variable_index(:foo) , method.locals_type.inspect
end
end
end

View File

@ -1,38 +0,0 @@
require_relative "helper"
module Melon
class TestTypeCollector < MiniTest::Test
def setup
Register.machine.boot
end
def parse_collect( input )
ast = Parser::Ruby22.parse input
TypeCollector.new.collect(ast)
end
def test_ivar_name
hash = parse_collect "def meth; @ivar;end"
assert hash[:ivar] , hash
end
def test_ivar_assign
hash = parse_collect "def meth; @ivar = 5;end"
assert hash[:ivar] , hash
end
def test_ivar_operator_assign
hash = parse_collect "def meth; @ivar += 5;end"
assert hash[:ivar] , hash
end
def test_compile_class
Compiler.compile "class TestIvar < Object ; def meth; @ivar;end; end"
itest = Parfait.object_space.get_class_by_name(:TestIvar)
assert itest
assert itest.instance_type.names.include?(:ivar) , itest.instance_type.names.inspect
end
end
end

View File

@ -0,0 +1,37 @@
require_relative "helper"
module Melon
module Compilers
class TestLocalsCollector < MiniTest::Test
def setup
Register.machine.boot unless Register.machine.booted
end
def parse_collect( input )
ast = Parser::Ruby22.parse input
LocalsCollector.new.collect(ast)
end
def test_no_locals
locals = parse_collect "def meth; end"
assert locals.empty?
end
def test_method_is_not_local
locals = parse_collect("def meth2(arg1); foo ;end")
assert locals.empty?
end
def test_local_assign_one
locals = parse_collect("def meth2(arg1); foo = bar ;end")
assert locals[:foo] , locals.inspect
end
def test_local_assign_two
locals = parse_collect("def meth2(arg1); foo = bar ; groove = 1 + 2 ;end")
assert locals.length == 2 , locals.inspect
end
end
end
end

View File

@ -0,0 +1,39 @@
require_relative "helper"
module Melon
module Compilers
class TestMethodCollector < MiniTest::Test
def setup
Register.machine.boot unless Register.machine.booted
end
def parse_collect( input )
ast = Parser::Ruby22.parse input
MethodCollector.new.collect(ast)
end
def test_no_args
methods = parse_collect "def meth; @ivar;end"
assert methods.find{|m| m.name == :meth }
end
def test_one_arg
method = parse_collect("def meth2(arg1); 1;end").first
assert method.name == :meth2
assert_equal 2 , method.args_type.variable_index(:arg1) , method.args_type.inspect
end
def test_three_args
method = parse_collect("def meth3(yksi,kaksi,kolme); 1;end").first
assert method.args_type.variable_index(:kolme) , method.args_type.inspect
end
def test_one_local
method = parse_collect("def meth2(arg1); foo = 2 ;end").first
assert method.locals_type.variable_index(:foo) , method.locals_type.inspect
end
end
end
end

View File

@ -0,0 +1,40 @@
require_relative "helper"
module Melon
module Compilers
class TestTypeCollector < MiniTest::Test
def setup
Register.machine.boot
end
def parse_collect( input )
ast = Parser::Ruby22.parse input
TypeCollector.new.collect(ast)
end
def test_ivar_name
hash = parse_collect "def meth; @ivar;end"
assert hash[:ivar] , hash
end
def test_ivar_assign
hash = parse_collect "def meth; @ivar = 5;end"
assert hash[:ivar] , hash
end
def test_ivar_operator_assign
hash = parse_collect "def meth; @ivar += 5;end"
assert hash[:ivar] , hash
end
def test_compile_class
Compiler.compile "class TestIvar < Object ; def meth; @ivar;end; end"
itest = Parfait.object_space.get_class_by_name(:TestIvar)
assert itest
assert itest.instance_type.names.include?(:ivar) , itest.instance_type.names.inspect
end
end
end
end

View File

@ -1,2 +1,3 @@
require_relative "compiler/test_all"
require_relative "compilers/test_all"
require_relative "fragments/test_all"
require_relative "test_ruby_method"

View File

@ -1,7 +1,7 @@
require_relative "helper"
module Melon
class TestMethod < MiniTest::Test
class TestRubyMethod < MiniTest::Test
include CompilerHelper
def setup
@ -13,7 +13,7 @@ module Melon
space = Parfait.object_space.get_class
space.get_method(:meth)
end
def test_creates_method_in_class
method = create_method
assert method , "No method created"