create compilers directory, found and renamed salama.rb

lib/melon/compiler/locals_collector.rb

@@ -1,24 +0,0 @@
-module Melon
-
-  class LocalsCollector < TotalProcessor
-
-    def initialize
-      @locals = {}
-    end
-
-    def collect(statement)
-      process statement
-      @locals
-    end
-
-    def on_lvasgn statement
-      add_local( statement )
-    end
-
-    def add_local(statement)
-      var = statement.children[0]
-      @locals[var] = :Object #not really used right now
-    end
-
-  end
-end

lib/melon/compiler/method_collector.rb

@@ -1,36 +0,0 @@
-module Melon
-
-  class MethodCollector < TotalProcessor
-
-    def initialize
-      @methods = []
-    end
-
-    def collect(statement)
-      process statement
-      @methods
-    end
-
-    def on_def(statement)
-      name , args , body = *statement
-      args_type = make_type(args)
-      locals_type = make_locals(body)
-      @methods << RubyMethod.new(name , args_type , locals_type , body )
-    end
-
-    private
-
-    def make_type( statement )
-      type_hash = {}
-      statement.children.each do |arg|
-        type_hash[arg.children[0]] = :Object
-      end
-      Parfait::NamedList.type_for( type_hash )
-    end
-
-    def make_locals(body)
-      type_hash = LocalsCollector.new.collect(body)
-      Parfait::NamedList.type_for( type_hash )
-    end
-  end
-end

lib/melon/compiler/total_processor.rb

@@ -1,12 +0,0 @@
-module Melon
-
-  class TotalProcessor < AST::Processor
-
-    def handler_missing(node)
-      node.children.each do |kid |
-        process(kid) if kid.is_a?(AST::Node)
-      end
-    end
-
-  end
-end

lib/melon/compiler/type_collector.rb

@@ -1,28 +0,0 @@
-module Melon
-
-  class TypeCollector < TotalProcessor
-
-    def initialize
-      @ivars = {}
-    end
-
-    def collect(statement)
-      process statement
-      @ivars
-    end
-
-    def on_ivar(statement)
-      add_ivar(statement)
-    end
-
-    def on_ivasgn( statement )
-      add_ivar(statement)
-    end
-
-    def add_ivar(statement)
-      var = statement.children[0].to_s[1..-1].to_sym
-      @ivars[var] = :Object #guess, can maybe guess better
-    end
-
-  end
-end

lib/melon/compilers/locals_collector.rb

@@ -0,0 +1,25 @@
+module Melon
+  module Compilers
+    class LocalsCollector < TotalProcessor
+
+      def initialize
+        @locals = {}
+      end
+
+      def collect(statement)
+        process statement
+        @locals
+      end
+
+      def on_lvasgn statement
+        add_local( statement )
+      end
+
+      def add_local(statement)
+        var = statement.children[0]
+        @locals[var] = :Object #not really used right now
+      end
+
+    end
+  end
+end

lib/melon/compilers/method_collector.rb

@@ -0,0 +1,38 @@
+module Melon
+  module Compilers
+
+    class MethodCollector < TotalProcessor
+
+      def initialize
+        @methods = []
+      end
+
+      def collect(statement)
+        process statement
+        @methods
+      end
+
+      def on_def(statement)
+        name , args , body = *statement
+        args_type = make_type(args)
+        locals_type = make_locals(body)
+        @methods << RubyMethod.new(name , args_type , locals_type , body )
+      end
+
+      private
+
+      def make_type( statement )
+        type_hash = {}
+        statement.children.each do |arg|
+          type_hash[arg.children[0]] = :Object
+        end
+        Parfait::NamedList.type_for( type_hash )
+      end
+
+      def make_locals(body)
+        type_hash = LocalsCollector.new.collect(body)
+        Parfait::NamedList.type_for( type_hash )
+      end
+    end
+  end
+end

lib/melon/compilers/total_processor.rb

@@ -0,0 +1,14 @@
+module Melon
+
+  module Compilers
+    class TotalProcessor < AST::Processor
+
+      def handler_missing(node)
+        node.children.each do |kid |
+          process(kid) if kid.is_a?(AST::Node)
+        end
+      end
+
+    end
+  end
+end

lib/melon/compilers/type_collector.rb

@@ -0,0 +1,29 @@
+module Melon
+  module Compilers
+    class TypeCollector < TotalProcessor
+
+      def initialize
+        @ivars = {}
+      end
+
+      def collect(statement)
+        process statement
+        @ivars
+      end
+
+      def on_ivar(statement)
+        add_ivar(statement)
+      end
+
+      def on_ivasgn( statement )
+        add_ivar(statement)
+      end
+
+      def add_ivar(statement)
+        var = statement.children[0].to_s[1..-1].to_sym
+        @ivars[var] = :Object #guess, can maybe guess better
+      end
+
+    end
+  end
+end

lib/melon/ruby_compiler.rb

@@ -1,12 +1,14 @@
-require_relative "compiler/total_processor"
-require_relative "compiler/type_collector"
-require_relative "compiler/method_collector"
-require_relative "compiler/locals_collector"
-require_relative "compiler/ruby_method"
+require "parser/ruby22"
+
+require_relative "compilers/total_processor"
+require_relative "compilers/type_collector"
+require_relative "compilers/method_collector"
+require_relative "compilers/locals_collector"
+require_relative "ruby_method"
 
 
 module Melon
-  class Compiler < TotalProcessor
+  class Compiler < Compilers::TotalProcessor
 
     def self.compile( input )
       ast = Parser::Ruby22.parse( input )
@@ -17,13 +19,13 @@ module Melon
       name , sup , body = *statement
       class_name = get_name(name)
       clazz = Parfait.object_space.get_class_by_name!(class_name , get_name(sup) )
-      ivar_hash = TypeCollector.new.collect(body)
+      ivar_hash = Compilers::TypeCollector.new.collect(body)
       clazz.set_instance_type( Parfait::Type.for_hash( clazz ,  ivar_hash ) )
       create_methods(clazz , body)
     end
 
     def create_methods(clazz , body)
-      methods = MethodCollector.new.collect(body)
+      methods = Compilers::MethodCollector.new.collect(body)
       methods.each do |method|
         clazz.add_method( method )
       end

lib/rubyx.rb

@@ -14,5 +14,4 @@ require "register/builtin/space"
 require "arm/arm_machine"
 require "arm/translator"
 
-require "parser/ruby22"
-require "melon/compiler"
+require "melon/ruby_compiler"