myco 0.1.0.dev → 0.1.0

data/lib/myco/parser/ast/to_ruby/self.rb

@@ -0,0 +1,6 @@
+
+class CodeTools::AST::Self
+  def to_ruby g
+    g.add("self")
+  end
+end

data/lib/myco/parser/ast/to_ruby/splat_value.rb

@@ -0,0 +1,33 @@
+
+class CodeTools::AST::SplatValue
+  def to_ruby g
+    if @value.is_a?(self.class)
+      @value.to_ruby(g)
+    else
+      g.add("*")
+      @value.to_ruby(g)
+    end
+  end
+end
+
+module CodeTools::AST
+  class CollectSplat
+    def to_ruby g
+      # TODO
+    end
+  end
+end
+
+module CodeTools::AST
+  class ConcatArgs
+    def to_ruby g
+      # TODO
+    end
+  end
+end
+
+class CodeTools::AST::PushArgs
+  def to_ruby g
+    # TODO
+  end
+end

data/lib/myco/parser/ast/to_ruby/string_literal.rb

@@ -0,0 +1,6 @@
+
+class CodeTools::AST::StringLiteral
+  def to_ruby g
+    g.add(@string.inspect)
+  end
+end

data/lib/myco/parser/ast/to_ruby/symbol_literal.rb

@@ -0,0 +1,6 @@
+
+class CodeTools::AST::SymbolLiteral
+  def to_ruby g
+    g.add(@value.inspect)
+  end
+end

data/lib/myco/parser/ast/to_ruby/toplevel_constant.rb

@@ -0,0 +1,11 @@
+
+class CodeTools::AST::ToplevelConstant
+  def to_ruby g
+    g.add("::#{@name}")
+  end
+  
+  def to_ruby_assign g, value
+    to_ruby(g)
+    g.add(" = "); g.add(value)
+  end
+end

data/lib/myco/parser/ast/to_ruby/true_literal.rb

@@ -0,0 +1,6 @@
+
+class CodeTools::AST::TrueLiteral
+  def to_ruby g
+    g.add("true")
+  end
+end

data/lib/myco/parser/ast/to_ruby/void_literal.rb

@@ -0,0 +1,6 @@
+
+class CodeTools::AST::VoidLiteral
+  def to_ruby g
+    g.add("::Myco::Void")
+  end
+end

data/lib/myco/parser/ast/to_ruby.rb

@@ -0,0 +1,138 @@
+
+module CodeTools::AST
+  class ToRuby
+    def initialize
+      @lines = []
+      @indents = [""]
+      
+      @var_scopes = []
+    end
+    
+    # The currently held string of generated ruby code
+    def to_s
+      @lines.join("\n")
+    end
+    
+    # Start a new line, optionally adding a string
+    # or an object that responds to :to_ruby
+    def line string=""
+      if string.is_a?(String)
+        @lines.push(@indents.last + string)
+      else
+        line
+        string.to_ruby(self)
+      end
+    end
+    
+    # Add to the current line a string
+    # or an object that responds to :to_ruby
+    def add string
+      if string.is_a?(String)
+        (@lines.last || @lines[0]="").concat(string)
+      else
+        string.to_ruby(self)
+      end
+    end
+    
+    ##
+    # Stack of indent levels (as strings to be prefixed)
+    #
+    def push_indent amount=2
+      @indents.push(@indents.last + " "*2)
+    end
+    
+    def pop_indent
+      @indents.pop
+    end
+    
+    ##
+    # Stack of every AST node in hierarchy that can hold local variables
+    #
+    def var_scope
+      @var_scopes.last
+    end
+    
+    def with_nested_var_scope node
+      @var_scopes.push(node)
+      yield
+    ensure
+      @var_scopes.pop
+    end
+    
+    def var_scope_has_local? name
+      @var_scopes.reverse.each { |scope|
+        return true if scope.variables.has_key?(name)
+      }
+      return false
+    end
+    
+    def var_scope_declare_local name
+      var_scope.variables[name] = true
+    end
+    
+    def var_scope_declare_locals names
+      names.each { |name| var_scope_declare_local(name) }
+    end
+    
+    ##
+    # Helper methods
+    
+    # TODO: make comprehensive
+    # Return false if the given indent might be problematic in generated Ruby
+    def easy_ident? sym
+      str = sym.to_s
+      return false if !(str=~/^[a-z_][A-Za-z_]*$/)
+      return false if %i(
+        if unless and or def do class module end break begin rescue ensure
+      ).include?(sym)
+      return true
+    end
+  end
+  
+  class Node
+    def to_ruby_code
+      g = ToRuby.new
+      to_ruby(g)
+      g.to_s
+    end
+  end
+end
+
+
+require_relative "to_ruby/self"
+require_relative "to_ruby/null_literal"
+require_relative "to_ruby/void_literal"
+require_relative "to_ruby/true_literal"
+require_relative "to_ruby/false_literal"
+require_relative "to_ruby/string_literal"
+require_relative "to_ruby/symbol_literal"
+require_relative "to_ruby/hash_literal"
+require_relative "to_ruby/dynamic_string"
+require_relative "to_ruby/dynamic_symbol"
+require_relative "to_ruby/scoped_constant"
+require_relative "to_ruby/toplevel_constant"
+require_relative "to_ruby/constant_access"
+require_relative "to_ruby/constant_assignment"
+require_relative "to_ruby/constant_define"
+require_relative "to_ruby/constant_reopen"
+require_relative "to_ruby/myco_module_scope"
+require_relative "to_ruby/declare_file"
+require_relative "to_ruby/declare_object"
+require_relative "to_ruby/declare_string"
+require_relative "to_ruby/declare_category"
+require_relative "to_ruby/declare_meme"
+require_relative "to_ruby/declare_decorator"
+require_relative "to_ruby/parameters"
+require_relative "to_ruby/block"
+require_relative "to_ruby/invoke"
+require_relative "to_ruby/invoke_method"
+require_relative "to_ruby/local_variable_assignment"
+require_relative "to_ruby/local_variable_access_ambiguous"
+require_relative "to_ruby/splat_value"
+require_relative "to_ruby/block_pass"
+require_relative "to_ruby/iter"
+require_relative "to_ruby/quest"
+require_relative "to_ruby/branch_operator"
+require_relative "to_ruby/return"
+require_relative "to_ruby/array_assembly"
+require_relative "to_ruby/eval_expression"

data/lib/myco/parser/ast.rb

@@ -10,6 +10,12 @@ require_relative "ast/declare_object"
 require_relative "ast/declare_string"
 require_relative "ast/invoke"
 require_relative "ast/local_variable_access_ambiguous"
+require_relative "ast/invoke_method"
+require_relative "ast/array_assembly"
+require_relative "ast/argument_assembly"
 require_relative "ast/quest"
+require_relative "ast/branch_operator"
 
 require_relative "ast/misc"
+
+require_relative "ast/to_ruby"