depager 0.2.0 → 0.2.2

data/lib/depager/srp.rb

@@ -1,4 +1,4 @@
-class ShiftReducePrinter < Depager::AdvancedParser
+class ShiftReducePrinter < Depager::LALR::AdvancedParser
   def initialize inside
     super
     @i2nt, @i2t = @basis.i2nt, @basis.i2t

data/lib/depager/template/ast.erbs

@@ -0,0 +1,69 @@
+===:defnode
+class Node
+  attr_accessor :lineno
+  attr_accessor <%= _opt_attr.map{|i| ":#{i}" }.join(', ') %>
+  <%= ini %>
+  def self.[] lineno, *args
+    self.new lineno, *args
+  end
+  def accept v
+  end
+end
+class NodeList < Node
+  attr_accessor :lineno
+  def initialize(lineno, lst=[])
+    @lineno = lineno
+    @lst = lst.to_a.select{|i| ! i.is_a?(NilNode)}
+  end
+  <% _opt_attr.each do |i| %>
+  def all_<%= i %>
+    @lst.map{|i| i.<%= i %>} 
+  end
+  <% end %>
+  def size
+    @lst.size
+  end
+  alias length size
+  def push(i)
+    @lst.push i unless i.is_a? NilNode
+    self
+  end
+  def concat(i)
+    @lst.concat i
+    self
+  end
+  def to_ary()
+    @lst
+  end
+  alias to_a to_ary
+  alias list to_ary
+  def accept(v)
+    @lst.each{|i| i.accept(v) }
+  end
+end
+class NilNode
+  attr_accessor :lineno
+  attr_accessor <%= _opt_attr.map{|i| ":#{i}" }.join(', ') %>
+  def initialize(lineno, *args)
+    @lineno = lineno
+  end
+  def accept v
+  end
+end
+
+===:node
+class Node_<%= name %> < Node
+  attr_accessor <%= nodes.map{|i| ":#{i}" }.join(', ') %>
+  attr_accessor <%= attrs.map{|i| ":#{i}" }.join(', ') %>
+  def initialize <%= nodes.unshift('lineno').join(', ') %>
+    super()
+    @lineno = lineno
+    <%= nodes.inject(''){|r,i| r << "    @#{i} = #{i}\n"} %>
+  end
+  def accept v
+    warn @lineno.to_s+':'+self.class.to_s if $DEBUG
+    <%= accept %>
+    v.visit_Node_<%= name %>(self)
+    self
+  end
+end

data/lib/depager/template/extension_lalr_master.erb

@@ -1,8 +1,8 @@
 <%
   target_name    = @d_parser.target_name
-  optouter = @optouter
-  optinner = @optinner
-  optmain  = @optmain
+  optouter = @optouter.join
+  optinner = @optinner.join
+  optmain  = @optmain.join
   req      = @req.uniq
   paramkey = @paramkey || ":default"
   regs     = @regs

data/lib/depager/template/extension_lalr_slave.erb

@@ -1,17 +1,17 @@
 <%
   target_name = g_parser.target_name
   table     = g_parser.table
-  g         = table.g
+  g         = table.grammar
   rulelist  = g.rulelist
-  t2i       = (g.nssize ... g.syms.size).map{|i| [ g.syms[i].inspect, i - g.nssize] }
-  nt2i      = (1 ... g.nssize).map{|i| [ ":#{g.syms[i]}", i-1] }
+  t2i       = (g.nonterms.size ... g.syms.size).map{|i| [ g.syms[i].inspect, i - g.nonterms.size] }
+  nt2i      = (1 ... g.nonterms.size).map{|i| [ ":#{g.syms[i]}", i-1] }
   taction   = table.action_table
   tgoto     = table.goto_table
   tdefred   = table.defred_table
   tdefreds  = table.defred_after_shift_table
-  optouter  = g_parser.optouter
-  optinner  = g_parser.optinner
-  optmain   = g_parser.optmain
+  optouter  = g_parser.optouter.join
+  optinner  = g_parser.optinner.join
+  optmain   = g_parser.optmain.join
   nparams   = g_parser.nparams
   decparser = @deco.inject(@basis_name) { |r, i|
     "#{i.sub(/^@/, "D4#{target_name}::")}.new(#{r})"
@@ -32,7 +32,7 @@ class <%= target_name %> < Depager::LALR::Basis #:nodoc:all
 
   ### Reduce Table
   reduce_table = [<% rulelist.each do |i| %>
-    [ <%= i.l - 1%>, <%= i.r.size %> ],<% end %>
+    [ <%= i.lhs - 1%>, <%= i.rhs.size %> ],<% end %>
   ]
   ### Extension Params
   nparams = {<% nparams.each do |c, i| %>

data/lib/depager/template/simple.erb

@@ -1,6 +1,7 @@
 <%
-  optouter = @optouter + g_parser.optouter
-  optmain  = @optmain
+  target_name = g_parser.target_name
+  optouter = (@optouter + g_parser.optouter).join
+  optmain  = @optmain.join
   req      = @req.uniq
   mixin    = @mixin
 %>
@@ -9,6 +10,7 @@ require 'depager/parser.rb'
 <%req.each do |i|%>require <%=i%>
 <%end%>
 
+module Depager::DecoratorUtils; end
 module D4<%= target_name %> ; end
 
 ### Outer Code

data/lib/depager/template/single_lalr_parser.erb

@@ -1,31 +1,36 @@
 <%
   target_name = g_parser.target_name
   table    = g_parser.table
-  g        = table.g
+  g        = table.grammar
   nparams  = g_parser.nparams
   rulelist = g.rulelist
-  t2i      = (g.nssize ... g.syms.size).map{|i| [ g.syms[i].inspect, i - g.nssize] }
-  nt2i     = (1 ... g.nssize).map{|i| [ ":#{g.syms[i]}", i-1] }
+  t2i      = (g.nonterms.size ... g.syms.size).map{|i| [ g.syms[i].inspect, i - g.nonterms.size] }
+  nt2i     = (1 ... g.nonterms.size).map{|i| [ ":#{g.syms[i]}", i-1] }
   taction  = table.action_table
   tgoto    = table.goto_table
   tdefred  = table.defred_table
   tdefreds = table.defred_after_shift_table
-  optouter = @optouter + g_parser.optouter
-  optinner = @optinner + g_parser.optinner
-  optmain  = @optmain
+  optouter = (@optouter + g_parser.optouter).join
+  optinner = (@optinner + g_parser.optinner).join
+  optmain  = @optmain.join
   decparser = @deco.inject(@basis_name) { |r, i|
     "#{i.sub(/^@/, "D4#{target_name}::")}.new(#{r})"
   }
   req      = @req.uniq
   mixin    = @mixin
+  req_rt   = if @dr_option['embed_runtime']
+               File.read File.expand_path("#{Depager::Tmpldir}/../parser.rb")
+             else
+               "require 'depager/parser.rb'"
+             end
 %>
 begin; require 'rubygems'; rescue Exception; end
-require 'depager/parser.rb'
+<%= req_rt %>
 <%req.each do |i|%>require <%=i%>
 <%end%>
 
-module D4<%= target_name %>
-end
+module Depager::DecoratorUtils; end
+module D4<%= target_name %>;    end
 
 class <%= target_name %> < Depager::LALR::Basis
   <% mixin.each do |i| %>
@@ -33,7 +38,7 @@ class <%= target_name %> < Depager::LALR::Basis
 
   ### Reduce Table
   reduce_table = [<% rulelist.each do |i| %>
-    [ <%= '%04s'%(i.l - 1)%>, <%= "%04s"%i.r.size %> ], # <%= i %><% end %>
+    [ <%= '%04s'%(i.lhs - 1)%>, <%= "%04s"%i.rhs.size %> ], # <%= i %><% end %>
   ]
   ### Extension Params
   nparams = {<% nparams.each do |c, i| %>
@@ -71,6 +76,21 @@ class <%= target_name %> < Depager::LALR::Basis
    [ <% i.each do |j| %><%= j ? "#{j}" : 'nil' %>, <% end %>], <% end %>
   ]
 
+<% if $MP_DEBUG %>
+  alias orig_error error
+  def error
+    orig_error
+    warn "current state: #{StateInfo[@stack.last]}"
+  end
+
+  ### States
+  StateInfo = [ <% table.state_info.each do |s| %>
+<<'----------',
+<%=s.chomp%>
+----------
+  <% end %>]
+<% end %>
+
   Tables = [ reduce_table, nparams, action_table,
              defred_table, defred_after_shift_table, goto_table,
              t2i, i2t, nt2i, i2nt ]

data/lib/depager/utils.rb

@@ -78,7 +78,7 @@ module Depager
           #{mixin_code}
           on_reduce = [
             nil,
-            #{on_reduce_code}
+            #{on_reduce_code.join}
           ]
           Tables = [on_reduce]
           def initialize inside
@@ -89,7 +89,8 @@ module Depager
           \n$$!! @OUTER @!!$$
         end
       }; #code
-      unindent(code).sub!('$$!! @OUTER @!!$$', optouter.to_s)
+      optouter = optouter.join if optouter.is_a? Array
+      unindent(code).sub!('$$!! @OUTER @!!$$', optouter)
     end
 
     #
@@ -116,10 +117,10 @@ module Depager
     # lineno:: line no
     # d::      input line no - output line no
     #
-    def gen_defm_code sig, body, lineno, d=0
+    def gen_defm_code sig, body, lineno=1, d=0
       t = Time.now.to_i
       r = rand(0xffff)
-      body = "  def #{sig}\n#{body}\n  end\n"
+      body = "def #{sig}\n#{body}\nend"
       code = %{
         module_eval <<\-'.,.,#{t}#{r}.,.,', '#{files.path}', #{lineno-d-1}
         $$!!@ BODY @!!$$
@@ -155,9 +156,9 @@ module Depager
 
     # unindent
     def unindent s
-      s = s.to_s
-      ind = s.match(/\n(\s+)/)[1]
-      s.gsub(/^#{ind}/m, '')
+      s = s.join rescue s.to_s
+      ind = s.match(/\n(\s+)/)
+      s.gsub(/^#{ind[1]}/m, '')
     end
   end
 
@@ -237,7 +238,7 @@ module Depager
 
     # get nunber of rules
     def nrules
-      @g_parser.g.size - 2
+      @g_parser.rules.size - 2
     end
 
     # get nunber of rhs rules
@@ -313,7 +314,7 @@ module Depager
                 else          ; @g_parser.getnparam(key)
                 end
       self.methods.sort.each do |m|
-        h = m.downcase
+        h = m.to_s.downcase
         if Hooks[h]
           p.send(h).push [self, m.intern]
         end

data/lib/depager/version.rb

@@ -1,9 +1,3 @@
-module Depager #:nodoc:
-  module VERSION #:nodoc:
-    MAJOR = 0
-    MINOR = 2
-    TINY  = 0
-
-    STRING = [MAJOR, MINOR, TINY].join('.')
-  end
+module Depager
+  VERSION = '0.2.2'
 end

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.9.0
 specification_version: 1
 name: depager
 version: !ruby/object:Gem::Version 
-  version: 0.2.0
-date: 2007-08-20 00:00:00 +09:00
+  version: 0.2.2
+date: 2008-05-05 00:00:00 +09:00
 summary: A self extensible parser generator.
 require_paths: 
 - lib
@@ -46,12 +46,12 @@ files:
 - examples/pl0d/test.pl0ds
 - examples/sample_calc/calc.action.dr
 - examples/sample_calc/calc.action.tab.rb
+- examples/sample_calc/calc.ast.action.dr
+- examples/sample_calc/calc.ast.action.tab.rb
+- examples/sample_calc/calc.ast.dr
+- examples/sample_calc/calc.ast.tab.rb
 - examples/sample_calc/calc.astdf.dr
 - examples/sample_calc/calc.astdf.tab.rb
-- examples/sample_calc/calc.astl.action.dr
-- examples/sample_calc/calc.astl.action.tab.rb
-- examples/sample_calc/calc.astl.dr
-- examples/sample_calc/calc.astl.tab.rb
 - examples/sample_calc/calc.atree.dr
 - examples/sample_calc/calc.atree.tab.rb
 - examples/sample_calc/calc.cst.dr
@@ -74,10 +74,9 @@ files:
 - lib/depager.rb
 - lib/depager/Rakefile
 - lib/depager/action.rb
-- lib/depager/ast_base.dr
-- lib/depager/ast_base.rb
+- lib/depager/ast.dr
+- lib/depager/ast.rb
 - lib/depager/astdf.rb
-- lib/depager/astl.rb
 - lib/depager/atree.dr
 - lib/depager/atree.rb
 - lib/depager/cst.dr
@@ -86,14 +85,14 @@ files:
 - lib/depager/lex.dr
 - lib/depager/lex.rb
 - lib/depager/lr.rb
+- lib/depager/lr_put_table.rb
 - lib/depager/nvaction.rb
 - lib/depager/parse_action.rb
 - lib/depager/parser.rb
 - lib/depager/slex.dr
 - lib/depager/slex.rb
 - lib/depager/srp.rb
-- lib/depager/template/astdf.erbs
-- lib/depager/template/astl.erbs
+- lib/depager/template/ast.erbs
 - lib/depager/template/extension_lalr_master.erb
 - lib/depager/template/extension_lalr_slave.erb
 - lib/depager/template/simple.erb

data/examples/sample_calc/calc.astl.action.tab.rb

@@ -1,593 +0,0 @@
-
-begin; require 'rubygems'; rescue Exception; end
-require 'depager/parser.rb'
-
-
-module D4TinyCalc
-end
-
-class TinyCalc < Depager::LALR::Basis
-  
-  include Depager
-
-  ### Reduce Table
-  reduce_table = [
-    [   -1,    1 ], # (  0) $start : expr
-    [    0,    3 ], # (  1) expr : expr + term
-    [    0,    3 ], # (  2) expr : expr - term
-    [    0,    1 ], # (  3) expr : term
-    [    1,    3 ], # (  4) term : term * fact
-    [    1,    3 ], # (  5) term : term / fact
-    [    1,    1 ], # (  6) term : fact
-    [    2,    1 ], # (  7) fact : NUM
-    [    2,    3 ], # (  8) fact : ( expr )
-  ]
-  ### Extension Params
-  nparams = {
-    'Action' => 3, 
-    'ASTBuilderLazy' => 2, 
-  }
-  ### Term to Int
-  t2i = {
-    nil => 0, 
-    false => 1, 
-    "+" => 2, 
-    "-" => 3, 
-    "*" => 4, 
-    "/" => 5, 
-    :NUM => 6, 
-    "(" => 7, 
-    ")" => 8, 
-  }
-  ### Int to Term
-  i2t = [
-    nil, 
-    false, 
-    "+", 
-    "-", 
-    "*", 
-    "/", 
-    :NUM, 
-    "(", 
-    ")", 
-  ]
-  ### Action Table
-  action_table = [
-    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
-    [ ACC, nil, 7, 8, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, 9, 10, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, 7, 8, nil, nil, nil, nil, 11, ], 
-    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, 9, 10, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, 9, 10, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-  ]
-  ### Default Reduce Table
-  defred_table = [
-    nil, 
-    nil, 
-    nil, 
-    -3, 
-    -6, 
-    -7, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    -8, 
-    -1, 
-    -2, 
-    -4, 
-    -5, 
-  ]
-  defred_after_shift_table = [
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    -6, 
-    -7, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    -8, 
-    nil, 
-    nil, 
-    -4, 
-    -5, 
-  ]
-  ### Nonterm to Int
-  nt2i = { 
-    :expr => 0,  
-    :term => 1,  
-    :fact => 2, 
-  }
-  ### Int to Nonterm
-  i2nt = [
-    :expr, 
-    :term, 
-    :fact, 
-  ]
-  ### Goto Table
-  goto_table = [ 
-   [ 2, 3, 4, ], 
-   [ 6, 3, 4, ], 
-   [ nil, nil, nil, ], 
-   [ nil, nil, nil, ], 
-   [ nil, nil, nil, ], 
-   [ nil, nil, nil, ], 
-   [ nil, nil, nil, ], 
-   [ nil, 12, 4, ], 
-   [ nil, 13, 4, ], 
-   [ nil, nil, 14, ], 
-   [ nil, nil, 15, ], 
-   [ nil, nil, nil, ], 
-   [ nil, nil, nil, ], 
-   [ nil, nil, nil, ], 
-   [ nil, nil, nil, ], 
-   [ nil, nil, nil, ], 
-  ]
-
-  Tables = [ reduce_table, nparams, action_table,
-             defred_table, defred_after_shift_table, goto_table,
-             t2i, i2t, nt2i, i2nt ]
-
-  def self.createDecoratedParser
-    D4TinyCalc::Action.new(D4TinyCalc::ASTBuilderLazy.new(TinyCalc.new()))
-  end
-
-  ### Inner Code
-
-          def lex
-            begin
-              until @line.empty?
-                case @line
-                
-          when /\A\s+/, /\A\#.*/, /\A\n/
-            @oldline = @line; @line = $'
-                 
-
-        
-          when /\A[1-9][0-9]*/
-            @oldline = @line; @line = $'
-                 yield _Token(:NUM, $&.to_i) 
-
-        
-          when /\A./
-            @oldline = @line; @line = $'
-                 yield _Token($&, $&) 
-
-        
-                else
-                  raise RuntimeError, "must not happen #{@line}"
-                end
-              end
-            end while @line0 = @line = getline
-            yield nil, nil
-          end
-        
-end
-
-### Outer Code
-
-  class Node
-    attr_accessor :lineno
-    attr_accessor :value
-    
-          def initialize
-                 @value = nil 
-
-          end
-        
-    def to_ary
-      [self]
-    end
-    def self.[] lineno, *args
-      self.new lineno, *args
-    end
-    def accept v
-    end
-  end
-  require 'forwardable'
-  class NodeList < Node
-    attr_accessor :lineno
-    extend Forwardable
-    _methods = Array.instance_methods -
-      Object.instance_methods -
-      ['push', 'concat', 'to_ary', 'map']
-    def_delegators(:@lst, *_methods)
-    def initialize(lineno, lst=[])
-      @lineno = lineno
-      @lst = lst.to_a
-    end
-    
-        def value
-          @lst.map{|i| "i.value"} 
-        end
-      
-    def push(i)   @lst.push i; self;          end
-    def concat(i) @lst.concat i; self;        end
-    def map(&b)   @lst.map(&b);               end
-    def to_ary()  @lst;                       end
-    def accept(v)
-      @lst.each{|i| i.accept(v) }
-    end
-  end
-
-  class Node_add < Node
-    attr_accessor :left, :right
-    attr_accessor 
-    def initialize lineno, left, right
-      super()
-      @lineno = lineno
-          @lineno = lineno
-    @left = left
-    @right = right
-
-    end
-    
-      def _left_ v
-        @left.accept(v); @left
-      end
-    
-      def _right_ v
-        @right.accept(v); @right
-      end
-    
-    def accept v
-      warn @lineno.to_s+':'+self.class.to_s if $DEBUG
-      v.visit_Node_add(self)
-      self
-    end
-  end
-
-  class Node_sub < Node
-    attr_accessor :left, :right
-    attr_accessor 
-    def initialize lineno, left, right
-      super()
-      @lineno = lineno
-          @lineno = lineno
-    @left = left
-    @right = right
-
-    end
-    
-      def _left_ v
-        @left.accept(v); @left
-      end
-    
-      def _right_ v
-        @right.accept(v); @right
-      end
-    
-    def accept v
-      warn @lineno.to_s+':'+self.class.to_s if $DEBUG
-      v.visit_Node_sub(self)
-      self
-    end
-  end
-
-  class Node_mul < Node
-    attr_accessor :left, :right
-    attr_accessor 
-    def initialize lineno, left, right
-      super()
-      @lineno = lineno
-          @lineno = lineno
-    @left = left
-    @right = right
-
-    end
-    
-      def _left_ v
-        @left.accept(v); @left
-      end
-    
-      def _right_ v
-        @right.accept(v); @right
-      end
-    
-    def accept v
-      warn @lineno.to_s+':'+self.class.to_s if $DEBUG
-      v.visit_Node_mul(self)
-      self
-    end
-  end
-
-  class Node_div < Node
-    attr_accessor :left, :right
-    attr_accessor 
-    def initialize lineno, left, right
-      super()
-      @lineno = lineno
-          @lineno = lineno
-    @left = left
-    @right = right
-
-    end
-    
-      def _left_ v
-        @left.accept(v); @left
-      end
-    
-      def _right_ v
-        @right.accept(v); @right
-      end
-    
-    def accept v
-      warn @lineno.to_s+':'+self.class.to_s if $DEBUG
-      v.visit_Node_div(self)
-      self
-    end
-  end
-
-  class Node_literal < Node
-    attr_accessor :n
-    attr_accessor :n
-    def initialize lineno, n
-      super()
-      @lineno = lineno
-          @lineno = lineno
-    @n = n
-
-    end
-    
-    def accept v
-      warn @lineno.to_s+':'+self.class.to_s if $DEBUG
-      v.visit_Node_literal(self)
-      self
-    end
-  end
-
-          class Visitor
-            def visit node
-              node.accept(self)
-            end
-          
-module_eval <<-'.,.,118754108857908.,.,', 'sample_calc/calc.astl.action.dr', 19
-     
-
-.,.,118754108857908.,.,
-
-module_eval <<-'.,.,118754108863035.,.,', 'sample_calc/calc.astl.action.dr', 19
-  def visit_Node_add node
-     node.value = visit(node.left).value + visit(node.right).value 
-
-  end
-
-.,.,118754108863035.,.,
-      
-module_eval <<-'.,.,11875410891486.,.,', 'sample_calc/calc.astl.action.dr', 20
-  def visit_Node_sub node
-     node.value = visit(node.left).value - visit(node.right).value 
-
-  end
-
-.,.,11875410891486.,.,
-      
-module_eval <<-'.,.,118754108931106.,.,', 'sample_calc/calc.astl.action.dr', 21
-  def visit_Node_mul node
-     node.value = visit(node.left).value * visit(node.right).value 
-
-  end
-
-.,.,118754108931106.,.,
-      
-module_eval <<-'.,.,118754108926185.,.,', 'sample_calc/calc.astl.action.dr', 22
-  def visit_Node_div node
-     node.value = visit(node.left).value / visit(node.right).value 
-
-  end
-
-.,.,118754108926185.,.,
-      
-module_eval <<-'.,.,118754108942617.,.,', 'sample_calc/calc.astl.action.dr', 23
-  def visit_Node_literal node
-     node.value = node.n.value 
-
-  end
-
-.,.,118754108942617.,.,
-      
-          end
-        
-class D4TinyCalc::ASTBuilderLazy < Depager::LALR::Action #:nodoc:all
-  include Depager::DecoratorUtils
-  
-  on_reduce = [
-    nil,
-              :_ast_0,
-  :_ast_1,
-  :_ast_2,
-  :_ast_3,
-  :_ast_4,
-  :_ast_5,
-  :_ast_6,
-  :_ast_7,
-
-  ]
-  Tables = [on_reduce]
-  def initialize inside
-    super inside, 'ASTBuilderLazy'
-    @on_reduce, = self.class::Tables
-    init_parser
-  end
-  
-
-module_eval <<-'.,.,11875410898722.,.,', 'sample_calc/calc.astl.action.dr', 29
-  def _ast_0 val
-Node_add.new(val[0].lineno, val[0], val[2])
-  end
-
-.,.,11875410898722.,.,
-      
-module_eval <<-'.,.,118754108942559.,.,', 'sample_calc/calc.astl.action.dr', 32
-  def _ast_1 val
-Node_sub.new(val[0].lineno, val[0], val[2])
-  end
-
-.,.,118754108942559.,.,
-      
-module_eval <<-'.,.,11875410893975.,.,', 'sample_calc/calc.astl.action.dr', 35
-  def _ast_2 val
-val[0]
-  end
-
-.,.,11875410893975.,.,
-      
-module_eval <<-'.,.,11875410897017.,.,', 'sample_calc/calc.astl.action.dr', 40
-  def _ast_3 val
-Node_mul.new(val[0].lineno, val[0], val[2])
-  end
-
-.,.,11875410897017.,.,
-      
-module_eval <<-'.,.,118754108932608.,.,', 'sample_calc/calc.astl.action.dr', 43
-  def _ast_4 val
-Node_div.new(val[0].lineno, val[0], val[2])
-  end
-
-.,.,118754108932608.,.,
-      
-module_eval <<-'.,.,11875410897850.,.,', 'sample_calc/calc.astl.action.dr', 46
-  def _ast_5 val
-val[0]
-  end
-
-.,.,11875410897850.,.,
-      
-module_eval <<-'.,.,11875410893154.,.,', 'sample_calc/calc.astl.action.dr', 51
-  def _ast_6 val
-Node_literal.new(val[0].lineno, val[0])
-  end
-
-.,.,11875410893154.,.,
-      
-module_eval <<-'.,.,118754108961354.,.,', 'sample_calc/calc.astl.action.dr', 54
-  def _ast_7 val
-val[1]
-  end
-
-.,.,118754108961354.,.,
-      
-end
-      
-class D4TinyCalc::Action < Depager::LALR::Action #:nodoc:all
-  include Depager::DecoratorUtils
-          include Depager
-
-  on_reduce = [
-    nil,
-              :_act_0,
-  :_act_1,
-  :_act_2,
-  :_act_3,
-  :_act_4,
-  :_act_5,
-  :_act_6,
-  :_act_7,
-
-  ]
-  Tables = [on_reduce]
-  def initialize inside
-    super inside, 'Action'
-    @on_reduce, = self.class::Tables
-    init_parser
-  end
-  
-
-module_eval <<-'.,.,118754108929417.,.,', 'sample_calc/calc.astl.action.dr', 30
-  def _act_0 val
-     val[0] + val[2] 
-
-  end
-
-.,.,118754108929417.,.,
-      
-module_eval <<-'.,.,118754108959230.,.,', 'sample_calc/calc.astl.action.dr', 33
-  def _act_1 val
-     val[0] - val[2] 
-
-  end
-
-.,.,118754108959230.,.,
-      
-module_eval <<-'.,.,118754108949805.,.,', 'sample_calc/calc.astl.action.dr', 36
-  def _act_2 val
-     val[0] 
-
-  end
-
-.,.,118754108949805.,.,
-      
-module_eval <<-'.,.,118754108963438.,.,', 'sample_calc/calc.astl.action.dr', 41
-  def _act_3 val
-     val[0] * val[2] 
-
-  end
-
-.,.,118754108963438.,.,
-      
-module_eval <<-'.,.,118754108920628.,.,', 'sample_calc/calc.astl.action.dr', 44
-  def _act_4 val
-     val[0] / val[2] 
-
-  end
-
-.,.,118754108920628.,.,
-      
-module_eval <<-'.,.,11875410896708.,.,', 'sample_calc/calc.astl.action.dr', 47
-  def _act_5 val
-     val[0] 
-
-  end
-
-.,.,11875410896708.,.,
-      
-module_eval <<-'.,.,118754108933319.,.,', 'sample_calc/calc.astl.action.dr', 52
-  def _act_6 val
-     val[0].value 
-
-  end
-
-.,.,118754108933319.,.,
-      
-module_eval <<-'.,.,118754108926354.,.,', 'sample_calc/calc.astl.action.dr', 55
-  def _act_7 val
-     val[1].value 
-
-  end
-
-.,.,118754108926354.,.,
-      
-end
-      
-
-def createDecoratedTinyCalc
-  D4TinyCalc::Action.new(D4TinyCalc::ASTBuilderLazy.new(TinyCalc.new()))
-end
-
-### main
-if __FILE__ == $0
-### Main Code
-require 'pp'
-parser = createDecoratedTinyCalc()
-t, r = parser.yyparse(STDIN)
-v = Visitor.new
-pp r
-pp t.accept(v).value
-pp t
-
-end