depager 0.2.3 → 0.3.0.b20160729

data/lib/depager/ruby/plugins/ast.rb

@@ -1,1308 +1,1367 @@
-
-###
-### ASTBuilderExtension - Depager Extension (master)
-###
-require 'pp.rb'
-require 'depager/parser.rb'
-
-
-module D4ASTBuilderExtension #:nodoc:all
-end
-
-class ASTBuilderExtension #:nodoc:all
-  include Depager::ExtensionUtils
-  
-  attr_accessor :h2p
-
-  def initialize
-    @master = self
-    @hook = []
-    @h2p = {}
-    init_parser
-  end
-
-  def __regext__ p
-    super p, :default, nil
-    
-    @hook[0] = ASTBuilderExtension_post_rhs.new(p, @nparam, self)
-    @h2p['post_rhs'] = @hook[0] 
-    p.hooks[:post_rhs].push [@hook[0], :do_parse]
-    
-    @hook[1] = ASTBuilderExtension_pre_rule_list.new(p, @nparam, self)
-    @h2p['pre_rule_list'] = @hook[1] 
-    p.hooks[:pre_rule_list].push [@hook[1], :do_parse]
-    
-    regext p
-  end
-
-  ### Inner Code
-  require 'plugins/_ast_tmpl'
-  attr_accessor :optouter, :on_reduce, :visitor
-  def init_parser
-    super
-    @visitor = Hash.new{|hash, key| hash[key] = []}
-    @optouter = []
-    @on_reduce = []
-    @output_file_name = nil
-  end
-  def post_rule_list
-    g_parser.optouter <<
-      gen_action_decorator_code(target_name, paramkey,
-                                @on_reduce, @optouter)
-  end
-
-  def modify_action_code code, nodes=[]
-    code = code.gsub(/\$\.([a-z_])/, 'node.\1')
-    code << %{
-      rescue
-        warn "raise at src:\#{node.lineno}/\#{node.class.name}"
-        raise
-    }
-  end
-  def gen_accept_code sym
-    return ''
-  end
-
-  attr_reader :output_file_name
-  def output_file_name= ofname
-    ofname = ofname.match(/'(.+)'/) ? $1 : ofname
-    @output_file_name = ofname
-  end
-
-end
-
-### Outer Code
-
-###
-### ASTBuilderExtension_pre_rule_list - Part of Depager Extension (slave)
-###
-module D4ASTBuilderExtension_pre_rule_list #:nodoc:all
-end
-
-class ASTBuilderExtension_pre_rule_list < Depager::LALR::Basis #:nodoc:all
-  include Depager::ExtensionUtils
-  
-
-  ### Reduce Table
-  reduce_table = [
-    [ -1, 1 ],
-    [ 0, 3 ],
-    [ 1, 0 ],
-    [ 1, 3 ],
-    [ 2, 0 ],
-    [ 2, 2 ],
-    [ 3, 1 ],
-    [ 3, 2 ],
-    [ 6, 3 ],
-    [ 7, 3 ],
-    [ 7, 4 ],
-    [ 4, 0 ],
-    [ 4, 2 ],
-    [ 4, 3 ],
-    [ 8, 1 ],
-    [ 8, 3 ],
-    [ 10, 1 ],
-    [ 10, 2 ],
-    [ 9, 1 ],
-    [ 9, 3 ],
-    [ 5, 0 ],
-    [ 5, 1 ],
-    [ 5, 1 ],
-    [ 11, 1 ],
-    [ 11, 2 ],
-    [ 12, 4 ],
-  ]
-  ### Extension Params
-  nparams = {
-    'NVAction' => 2, 
-  }
-  ### Term to Int
-  t2i = {
-    nil => 0, 
-    false => 1, 
-    :NODE => 2, 
-    :ACTION => 3, 
-    :VISITOR => 4, 
-    :ID => 5, 
-    "(" => 6, 
-    ")" => 7, 
-    "[" => 8, 
-    "]" => 9, 
-    "," => 10, 
-    "-" => 11, 
-    "<" => 12, 
-    ">" => 13, 
-  }
-  ### Int to Term
-  i2t = [
-    nil, 
-    false, 
-    :NODE, 
-    :ACTION, 
-    :VISITOR, 
-    :ID, 
-    "(", 
-    ")", 
-    "[", 
-    "]", 
-    ",", 
-    "-", 
-    "<", 
-    ">", 
-  ]
-  ### Action Table
-  action_table = [
-    [ nil, nil, 1, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, 5, nil, nil, nil, nil, nil, ], 
-    [ ACC, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, 6, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, 8, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, 10, nil, nil, nil, 9, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, 12, nil, nil, nil, nil, nil, nil, nil, nil, 16, nil, ], 
-    [ nil, nil, nil, nil, nil, 18, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, 21, 22, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 16, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, 24, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, 25, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, 5, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, 18, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, 28, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 29, ], 
-    [ nil, nil, nil, nil, nil, 31, nil, 34, nil, nil, nil, 32, nil, nil, ], 
-    [ nil, nil, nil, 12, nil, nil, nil, nil, nil, nil, nil, nil, 16, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, 36, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, 37, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, 39, nil, nil, 38, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, 31, nil, nil, nil, nil, nil, 32, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, 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 = [
-    -2, 
-    -11, 
-    nil, 
-    -4, 
-    nil, 
-    nil, 
-    -20, 
-    nil, 
-    -3, 
-    -12, 
-    -18, 
-    nil, 
-    -21, 
-    -5, 
-    -22, 
-    -23, 
-    nil, 
-    -6, 
-    nil, 
-    -11, 
-    -1, 
-    -13, 
-    nil, 
-    -24, 
-    nil, 
-    nil, 
-    -20, 
-    -7, 
-    -19, 
-    nil, 
-    -14, 
-    -16, 
-    nil, 
-    nil, 
-    -9, 
-    -8, 
-    -25, 
-    -17, 
-    nil, 
-    -10, 
-    -15, 
-  ]
-  defred_after_shift_table = [
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    -3, 
-    -12, 
-    -18, 
-    nil, 
-    -21, 
-    -5, 
-    nil, 
-    -23, 
-    nil, 
-    -6, 
-    nil, 
-    nil, 
-    nil, 
-    -13, 
-    nil, 
-    -24, 
-    nil, 
-    nil, 
-    nil, 
-    -7, 
-    -19, 
-    nil, 
-    -14, 
-    -16, 
-    nil, 
-    nil, 
-    -9, 
-    -8, 
-    -25, 
-    -17, 
-    nil, 
-    -10, 
-    -15, 
-  ]
-  ### Nonterm to Int
-  nt2i = { 
-    :start => 0,  
-    :opt_defnode => 1,  
-    :opt_defvis => 2,  
-    :defnode_list => 3,  
-    :opt_attr => 4,  
-    :opt_action => 5,  
-    :defnode => 6,  
-    :defnode_header => 7,  
-    :fact_list => 8,  
-    :id_list => 9,  
-    :fact => 10,  
-    :pass_action_list => 11,  
-    :pass_action => 12, 
-  }
-  ### Int to Nonterm
-  i2nt = [
-    :start, 
-    :opt_defnode, 
-    :opt_defvis, 
-    :defnode_list, 
-    :opt_attr, 
-    :opt_action, 
-    :defnode, 
-    :defnode_header, 
-    :fact_list, 
-    :id_list, 
-    :fact, 
-    :pass_action_list, 
-    :pass_action, 
-  ]
-  ### Goto Table
-  goto_table = [ 
-   [ 2, 3, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, 4, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, 7, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, 11, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, 13, nil, nil, nil, nil, nil, 14, 15, ], 
-   [ nil, nil, nil, 20, nil, nil, 17, 19, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 23, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, 26, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, 27, 19, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, 33, nil, 30, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, 35, nil, nil, nil, nil, nil, 14, 15, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 40, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 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 ]
-
-  attr_accessor :p, :m
-  def initialize p, nparam, master = nil
-    super()
-    @g_parser = @p = p
-    @master   = @m = master
-    @nparam   = nparam
-    @dect     = D4ASTBuilderExtension_pre_rule_list::NVAction.new(self)
-    init_parser
-  end
-
-  
-  def do_parse?
-    if @line =~ /^\s*%AST\{\s*\Z/
-       @line = $' 
-      true
-    else
-      false
-    end
-  end
-  
-
-  def banner
-    "%AST{ ... } / #{@master.class.name}" 
-  end
-
-  ### Inner Code
-
-          def lex
-            begin
-              until @line.empty?
-                case @line
-                
-          when /\A\s+/, /\A#.*/
-            @oldline = @line; @line = $'
-                 
-
-        
-          when /\A%\}\s*\Z/
-            @oldline = @line; @line = $'
-                 @line = $'; yield nil,nil 
-
-        
-          when /\ANode/
-            @oldline = @line; @line = $'
-                 yield token(:NODE, $&) 
-
-        
-          when /\AVisitor/
-            @oldline = @line; @line = $'
-                 yield token(:VISITOR, $&) 
-
-        
-          when /\A[a-zA-Z][a-zA-Z0-9_]*/
-            @oldline = @line; @line = $'
-                 yield token(:ID, $&) 
-
-        
-          when /\A\{/
-            #
-                 ln = lineno; yield token(:ACTION, parse_action, ln) 
-
-        
-          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 D4ASTBuilderExtension_pre_rule_list::NVAction < Depager::LALR::Action #:nodoc:all
-  include Depager::DecoratorUtils
-  
-  on_reduce = [
-    nil,
-              :_act_0,
-  :_act_1,
-  :_act_2,
-  :_act_3,
-  :_act_4,
-  :_act_5,
-  :_act_6,
-  :_act_7,
-  :_act_8,
-  :_act_9,
-  :_act_10,
-  :_act_11,
-  :_act_12,
-  :_act_13,
-  :_act_14,
-  :_act_15,
-  :_act_16,
-  :_act_17,
-  :_act_18,
-  :_act_19,
-  :_act_20,
-  :_act_21,
-  :_act_22,
-  :_act_23,
-  :_act_24,
-
-  ]
-  Tables = [on_reduce]
-  def initialize inside
-    super inside, 'NVAction'
-    @on_reduce, = self.class::Tables
-    init_parser
-  end
-  
-
-module_eval <<-'.,.,122745803347277.,.,', 'ast.dr', 55
-def _act_0 val
-    _opt_defnode, _opt_defvis, _defnode_list, = *val 
-
-        code = _opt_defnode
-        code << val[2] << %{
-          class Visitor
-            def visit node
-              node.accept(self)
-            end
-          #{master.visitor[nil].join}
-          end
-        };#code
-        master.visitor.each do |k, v|
-          next unless k
-          code << %{
-            class Visitor_#{k}
-            #{v.join}
-            end
-          };#code
-        end
-        if master.output_file_name
-          File.open(master.output_file_name, 'w') do |f|
-            f.write code
-          end
-          g_parser.optouter << %!require '#{master.output_file_name}'\n!
-        else
-          g_parser.optouter << code
-        end
-
-end
-.,.,122745803347277.,.,
-      
-module_eval <<-'.,.,122745803338304.,.,', 'ast.dr', 84
-def _act_1 val
-     "" 
-
-end
-.,.,122745803338304.,.,
-      
-module_eval <<-'.,.,122745803334064.,.,', 'ast.dr', 86
-def _act_2 val
-    _NODE, _opt_attr, _ACTION, = *val 
-
-        ini = %{
-          def initialize
-            #{_ACTION.value}
-          end
-        };#code
-        ERB.new(master.class::TMPL_NODE_BASE).result(binding)
-
-end
-.,.,122745803334064.,.,
-      
-module_eval <<-'.,.,122745803350390.,.,', 'ast.dr', 96
-def _act_3 val
-     [] 
-
-end
-.,.,122745803350390.,.,
-      
-module_eval <<-'.,.,122745803327135.,.,', 'ast.dr', 98
-def _act_4 val
-    _VISITOR, _opt_action, = *val 
-
-        _opt_action[nil] ||= Token['', 0]
-        _opt_action.each do |pass, act|
-          master.visitor[pass].unshift(
-            master.gen_meval_code(act.lineno, 0, act.value.to_s))
-        end
-
-end
-.,.,122745803327135.,.,
-      
-module_eval <<-'.,.,1227458033227.,.,', 'ast.dr', 107
-def _act_5 val
-    _defnode, = *val 
-     _defnode 
-
-end
-.,.,1227458033227.,.,
-      
-module_eval <<-'.,.,122745803349542.,.,', 'ast.dr', 108
-def _act_6 val
-    _defnode_list, _defnode, = *val 
-     _defnode_list << _defnode
-
-end
-.,.,122745803349542.,.,
-      
-module_eval <<-'.,.,122745803342203.,.,', 'ast.dr', 112
-def _act_7 val
-    _defnode_header, _opt_attr, _opt_action, = *val 
-
-        name, args = _defnode_header
-        nodes, accept, attrs = [], '', _opt_attr
-        args.each do |i|
-          if i =~ /\-(.*)/
-            nodes.push $1
-            attrs.push $1
-          else
-            nodes.push i
-            accept << master.gen_accept_code(i)
-          end
-        end
-        _opt_action[nil] = Token['', 0] unless _opt_action[nil]
-        _opt_action.each do |pass, act|
-          vis_code = master.modify_action_code(act.value, nodes - attrs)
-          master.visitor[pass] <<
-            master.gen_defm_code("visit_Node_#{name} node",
-                                 vis_code, act.lineno)
-        end
-        ERB.new(master.class::TMPL_NODE).result(binding)
-
-end
-.,.,122745803342203.,.,
-      
-module_eval <<-'.,.,122745803342598.,.,', 'ast.dr', 135
-def _act_8 val
-    _ID, _, _, = *val 
-     [_ID.value, []]
-
-end
-.,.,122745803342598.,.,
-      
-module_eval <<-'.,.,122745803344032.,.,', 'ast.dr', 136
-def _act_9 val
-    _ID, _, _fact_list, _, = *val 
-     [_ID.value, _fact_list] 
-
-end
-.,.,122745803344032.,.,
-      
-module_eval <<-'.,.,122745803361859.,.,', 'ast.dr', 139
-def _act_10 val
-     [] 
-
-end
-.,.,122745803361859.,.,
-      
-module_eval <<-'.,.,122745803323572.,.,', 'ast.dr', 140
-def _act_11 val
-    _, _, = *val 
-     [] 
-
-end
-.,.,122745803323572.,.,
-      
-module_eval <<-'.,.,122745803313754.,.,', 'ast.dr', 141
-def _act_12 val
-    _, _id_list, _, = *val 
-     _id_list 
-
-end
-.,.,122745803313754.,.,
-      
-module_eval <<-'.,.,12274580331318.,.,', 'ast.dr', 144
-def _act_13 val
-    _fact, = *val 
-     [_fact] 
-
-end
-.,.,12274580331318.,.,
-      
-module_eval <<-'.,.,1227458033572.,.,', 'ast.dr', 145
-def _act_14 val
-    _fact_list, _, _fact, = *val 
-     _fact_list.push _fact 
-
-end
-.,.,1227458033572.,.,
-      
-module_eval <<-'.,.,12274580337279.,.,', 'ast.dr', 148
-def _act_15 val
-    _ID, = *val 
-     _ID.value 
-
-end
-.,.,12274580337279.,.,
-      
-module_eval <<-'.,.,122745803312359.,.,', 'ast.dr', 149
-def _act_16 val
-    _, _ID, = *val 
-     '-' + _ID.value 
-
-end
-.,.,122745803312359.,.,
-      
-module_eval <<-'.,.,122745803363891.,.,', 'ast.dr', 152
-def _act_17 val
-    _ID, = *val 
-     [ _ID.value ] 
-
-end
-.,.,122745803363891.,.,
-      
-module_eval <<-'.,.,122745803346333.,.,', 'ast.dr', 153
-def _act_18 val
-    _id_list, _, _ID, = *val 
-     _id_list.push _ID.value 
-
-end
-.,.,122745803346333.,.,
-      
-module_eval <<-'.,.,122745803358364.,.,', 'ast.dr', 156
-def _act_19 val
-     {nil => Token['', 0]} 
-
-end
-.,.,122745803358364.,.,
-      
-module_eval <<-'.,.,122745803347204.,.,', 'ast.dr', 157
-def _act_20 val
-    _ACTION, = *val 
-     {nil => _ACTION} 
-
-end
-.,.,122745803347204.,.,
-      
-module_eval <<-'.,.,122745803352244.,.,', 'ast.dr', 159
-def _act_21 val
-    _pass_action_list, = *val 
-
-        Hash[ *_pass_action_list.flatten ].merge({nil => Token['', 0]})
-
-end
-.,.,122745803352244.,.,
-      
-module_eval <<-'.,.,122745803353056.,.,', 'ast.dr', 164
-def _act_22 val
-    _pass_action, = *val 
-     [ _pass_action ] 
-
-end
-.,.,122745803353056.,.,
-      
-module_eval <<-'.,.,122745803358655.,.,', 'ast.dr', 165
-def _act_23 val
-    _pass_action_list, _pass_action, = *val 
-     _pass_action_list << _pass_action 
-
-end
-.,.,122745803358655.,.,
-      
-module_eval <<-'.,.,122745803347204.,.,', 'ast.dr', 169
-def _act_24 val
-    _, _ID, _, _ACTION, = *val 
-     [_ID.value, _ACTION]
-
-end
-.,.,122745803347204.,.,
-      
-end
-      
-
-###
-### ASTBuilderExtension_post_rhs - Part of Depager Extension (slave)
-###
-module D4ASTBuilderExtension_post_rhs #:nodoc:all
-end
-
-class ASTBuilderExtension_post_rhs < Depager::LALR::Basis #:nodoc:all
-  include Depager::ExtensionUtils
-  
-
-  ### Reduce Table
-  reduce_table = [
-    [ -1, 1 ],
-    [ 0, 1 ],
-    [ 2, 3 ],
-    [ 2, 4 ],
-    [ 3, 1 ],
-    [ 3, 3 ],
-    [ 1, 1 ],
-    [ 1, 1 ],
-    [ 1, 1 ],
-    [ 4, 2 ],
-    [ 4, 1 ],
-    [ 4, 1 ],
-    [ 4, 1 ],
-    [ 4, 1 ],
-    [ 4, 1 ],
-    [ 4, 1 ],
-    [ 6, 0 ],
-    [ 6, 1 ],
-    [ 5, 2 ],
-    [ 5, 3 ],
-    [ 5, 3 ],
-    [ 5, 3 ],
-  ]
-  ### Extension Params
-  nparams = {
-    'NVAction' => 2, 
-  }
-  ### Term to Int
-  t2i = {
-    nil => 0, 
-    false => 1, 
-    :ID => 2, 
-    "(" => 3, 
-    ")" => 4, 
-    "," => 5, 
-    :CONST => 6, 
-    :SYMBOL => 7, 
-    :STR => 8, 
-    :NILNODE => 9, 
-    :NUMBER => 10, 
-    :NIL => 11, 
-    :EMBED => 12, 
-    "[" => 13, 
-    "]" => 14, 
-    :LL => 15, 
-    "@" => 16, 
-  }
-  ### Int to Term
-  i2t = [
-    nil, 
-    false, 
-    :ID, 
-    "(", 
-    ")", 
-    ",", 
-    :CONST, 
-    :SYMBOL, 
-    :STR, 
-    :NILNODE, 
-    :NUMBER, 
-    :NIL, 
-    :EMBED, 
-    "[", 
-    "]", 
-    :LL, 
-    "@", 
-  ]
-  ### Action Table
-  action_table = [
-    [ nil, nil, 13, nil, nil, nil, 9, 11, 1, 3, 6, 8, nil, 12, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ ACC, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, 13, nil, nil, nil, 9, 11, 1, 3, 6, 8, nil, 12, 16, nil, nil, ], 
-    [ nil, nil, nil, 19, nil, nil, nil, nil, nil, nil, nil, nil, 21, nil, nil, nil, nil, ], 
-    [ nil, nil, 13, nil, nil, nil, 9, 11, 1, 3, 6, 8, nil, 12, nil, nil, nil, ], 
-    [ nil, nil, 13, nil, nil, nil, 9, 11, 1, 3, 6, 8, nil, 12, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ], 
-    [ nil, nil, nil, nil, nil, 25, nil, nil, nil, nil, nil, nil, nil, nil, 24, nil, nil, ], 
-    [ nil, nil, 13, nil, 26, nil, 9, 11, 1, 3, 6, 8, nil, 12, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, 13, nil, nil, nil, 9, 11, 1, 3, 6, 8, nil, 12, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, 29, 25, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-  ]
-  ### Default Reduce Table
-  defred_table = [
-    nil, 
-    -12, 
-    -6, 
-    -13, 
-    -8, 
-    nil, 
-    -14, 
-    -1, 
-    -15, 
-    -10, 
-    -7, 
-    -11, 
-    nil, 
-    -16, 
-    nil, 
-    nil, 
-    -18, 
-    -4, 
-    nil, 
-    nil, 
-    -9, 
-    -17, 
-    -20, 
-    -21, 
-    -19, 
-    nil, 
-    -2, 
-    nil, 
-    -5, 
-    -3, 
-  ]
-  defred_after_shift_table = [
-    nil, 
-    -12, 
-    -6, 
-    -13, 
-    -8, 
-    nil, 
-    -14, 
-    nil, 
-    -15, 
-    -10, 
-    -7, 
-    -11, 
-    nil, 
-    nil, 
-    nil, 
-    nil, 
-    -18, 
-    nil, 
-    nil, 
-    nil, 
-    -9, 
-    -17, 
-    nil, 
-    nil, 
-    -19, 
-    nil, 
-    -2, 
-    nil, 
-    nil, 
-    -3, 
-  ]
-  ### Nonterm to Int
-  nt2i = { 
-    :start => 0,  
-    :fnl => 1,  
-    :node => 2,  
-    :fnlpair => 3,  
-    :fact => 4,  
-    :list => 5,  
-    :opt_embed => 6, 
-  }
-  ### Int to Nonterm
-  i2nt = [
-    :start, 
-    :fnl, 
-    :node, 
-    :fnlpair, 
-    :fact, 
-    :list, 
-    :opt_embed, 
-  ]
-  ### Goto Table
-  goto_table = [ 
-   [ 5, 7, 10, nil, 2, 4, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, 17, 10, 18, 2, 4, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, 20, ], 
-   [ nil, 22, 10, nil, 2, 4, nil, ], 
-   [ nil, 23, 10, nil, 2, 4, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, 17, 10, 27, 2, 4, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, 28, 10, nil, 2, 4, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, 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 ]
-
-  attr_accessor :p, :m
-  def initialize p, nparam, master = nil
-    super()
-    @g_parser = @p = p
-    @master   = @m = master
-    @nparam   = nparam
-    @dect     = D4ASTBuilderExtension_post_rhs::NVAction.new(self)
-    init_parser
-  end
-
-  
-  def do_parse?
-    if @line =~ /^\s*=>/
-       @line = $' 
-      true
-    else
-      false
-    end
-  end
-  
-
-  def banner
-    "=>... / #{@master.class.name}" 
-  end
-
-  ### Inner Code
-
-          def lex
-            begin
-              until @line.empty?
-                case @line
-                
-          when /\A[ \t]+/
-            @oldline = @line; @line = $'
-                 
-
-        
-          when /\A\r?\n/
-            @oldline = @line; @line = $'
-                 yield nil, nil                 
-
-        
-          when /\A<</
-            @oldline = @line; @line = $'
-                 yield token(:LL, $&)          
-
-        
-          when /\A%([a-zA-Z0-9_]+)((::[a-zA-Z0-9_]+)*)/
-            @oldline = @line; @line = $'
-                 yield token(:CONST, $1+$2)    
-
-        
-          when /\A%\((.+)\)%/
-            @oldline = @line; @line = $'
-                 yield token(:EMBED, $1)       
-
-        
-          when /\Anil/
-            @oldline = @line; @line = $'
-                 yield token(:NIL, $&)         
-
-        
-          when /\ANilNode/
-            @oldline = @line; @line = $'
-                 yield token(:NILNODE, $&)     
-
-        
-          when /\A[0-9]+/
-            @oldline = @line; @line = $'
-                 yield token(:NUMBER, $&.to_i) 
-
-        
-          when /\A:[a-zA-Z0-9_]+/
-            @oldline = @line; @line = $'
-                 yield token(:SYMBOL, $&)      
-
-        
-          when /\A[a-zA-Z][a-zA-Z0-9_]*/
-            @oldline = @line; @line = $'
-                 yield token(:ID, $&)          
-
-        
-          when /\A'(.+)'/
-            @oldline = @line; @line = $'
-                 yield token(:STR, $1)         
-
-        
-          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
-          def do_default
-    n = master.nrules
-    master.optouter <<
-      master.gen_defm_code("_ast_#{n} val", "NilNode.new(basis.file.lineno)", lineno)
-    master.on_reduce[n] = ":_ast_#{n}"
-  end
-
-end
-
-### Outer Code
-
-class D4ASTBuilderExtension_post_rhs::NVAction < Depager::LALR::Action #:nodoc:all
-  include Depager::DecoratorUtils
-  
-  on_reduce = [
-    nil,
-              :_act_0,
-  :_act_1,
-  :_act_2,
-  :_act_3,
-  :_act_4,
-  :_act_5,
-  :_act_6,
-  :_act_7,
-  :_act_8,
-  :_act_9,
-  :_act_10,
-  :_act_11,
-  :_act_12,
-  :_act_13,
-  :_act_14,
-  :_act_15,
-  :_act_16,
-  :_act_17,
-  :_act_18,
-  :_act_19,
-  :_act_20,
-
-  ]
-  Tables = [on_reduce]
-  def initialize inside
-    super inside, 'NVAction'
-    @on_reduce, = self.class::Tables
-    init_parser
-  end
-  
-
-module_eval <<-'.,.,122745803323544.,.,', 'ast.dr', 206
-def _act_0 val
-    _fnl, = *val 
-
-        n = master.nrules
-        master.optouter <<
-          master.gen_defm_code("_ast_#{n} val", _fnl, basis.file.lineno)
-        master.on_reduce[n] = ":_ast_#{n}"
-
-end
-.,.,122745803323544.,.,
-      
-module_eval <<-'.,.,122745803342416.,.,', 'ast.dr', 214
-def _act_1 val
-    _ID, _, _, = *val 
-     "Node_#{_ID.value}.new(basis.file.lineno)" 
-
-end
-.,.,122745803342416.,.,
-      
-module_eval <<-'.,.,122745803355262.,.,', 'ast.dr', 216
-def _act_2 val
-    _ID, _, _fnlpair, _, = *val 
-
-        if g_parser.rhs.size > 0
-          "Node_#{_ID.value}.new(val[0].lineno, #{_fnlpair.join(', ')})" 
-        else
-          "Node_#{_ID.value}.new(basis.file.lineno, #{_fnlpair.join(', ')})" 
-        end
-
-end
-.,.,122745803355262.,.,
-      
-module_eval <<-'.,.,122745803363965.,.,', 'ast.dr', 225
-def _act_3 val
-    _fnl, = *val 
-     [_fnl] 
-
-end
-.,.,122745803363965.,.,
-      
-module_eval <<-'.,.,122745803314919.,.,', 'ast.dr', 226
-def _act_4 val
-    _fnlpair, _, _fnl, = *val 
-     _fnlpair << _fnl 
-
-end
-.,.,122745803314919.,.,
-      
-module_eval <<-'.,.,122745803310521.,.,', 'ast.dr', 229
-def _act_5 val
-    _fact, = *val 
-     _fact 
-
-end
-.,.,122745803310521.,.,
-      
-module_eval <<-'.,.,122745803362726.,.,', 'ast.dr', 230
-def _act_6 val
-    _node, = *val 
-     _node 
-
-end
-.,.,122745803362726.,.,
-      
-module_eval <<-'.,.,122745803349195.,.,', 'ast.dr', 231
-def _act_7 val
-    _list, = *val 
-     _list 
-
-end
-.,.,122745803349195.,.,
-      
-module_eval <<-'.,.,122745803359728.,.,', 'ast.dr', 235
-def _act_8 val
-    _ID, _opt_embed, = *val 
-
-        unless i = g_parser.name_to_rhs_index(_ID.value)
-          warn "#{g_parser.lineno}: ?#{_ID.value}"
-          raise
-        end
-        "val[#{i}]#{val[1]}"
-
-end
-.,.,122745803359728.,.,
-      
-module_eval <<-'.,.,122745803321128.,.,', 'ast.dr', 242
-def _act_9 val
-    _CONST, = *val 
-     "Depager::Token[#{_CONST.value}]" 
-
-end
-.,.,122745803321128.,.,
-      
-module_eval <<-'.,.,122745803364413.,.,', 'ast.dr', 243
-def _act_10 val
-    _SYMBOL, = *val 
-     "Depager::Token[#{_SYMBOL.value}]" 
-
-end
-.,.,122745803364413.,.,
-      
-module_eval <<-'.,.,122745803318993.,.,', 'ast.dr', 244
-def _act_11 val
-    _STR, = *val 
-     "Depager::Token['#{_STR.value}']" 
-
-end
-.,.,122745803318993.,.,
-      
-module_eval <<-'.,.,122745803313763.,.,', 'ast.dr', 245
-def _act_12 val
-    _NILNODE, = *val 
-     "NilNode.new(basis.file.lineno)" 
-
-end
-.,.,122745803313763.,.,
-      
-module_eval <<-'.,.,122745803311965.,.,', 'ast.dr', 246
-def _act_13 val
-    _NUMBER, = *val 
-     "Depager::Token[#{_NUMBER.value}]" 
-
-end
-.,.,122745803311965.,.,
-      
-module_eval <<-'.,.,122745803349781.,.,', 'ast.dr', 247
-def _act_14 val
-    _NIL, = *val 
-     "nil" 
-
-end
-.,.,122745803349781.,.,
-      
-module_eval <<-'.,.,122745803334484.,.,', 'ast.dr', 250
-def _act_15 val
-     '' 
-
-end
-.,.,122745803334484.,.,
-      
-module_eval <<-'.,.,122745803333629.,.,', 'ast.dr', 251
-def _act_16 val
-    _EMBED, = *val 
-     _EMBED.value 
-
-end
-.,.,122745803333629.,.,
-      
-module_eval <<-'.,.,122745803344085.,.,', 'ast.dr', 254
-def _act_17 val
-    _, _, = *val 
-     "NodeList.new(basis.file.lineno, [])" 
-
-end
-.,.,122745803344085.,.,
-      
-module_eval <<-'.,.,122745803324936.,.,', 'ast.dr', 256
-def _act_18 val
-    _, _fnlpair, _, = *val 
-
-        if g_parser.rhs.size > 0
-          "NodeList.new(val[0].lineno, [#{_fnlpair.join(', ')}])"
-        else
-          "NodeList.new(basis.file.lineno, #{_fnlpair.join(', ')})" 
-        end
-
-end
-.,.,122745803324936.,.,
-      
-module_eval <<-'.,.,122745803328741.,.,', 'ast.dr', 263
-def _act_19 val
-    _l, _LL, _r, = *val 
-     "#{_l}.push(#{_r})" 
-
-end
-.,.,122745803328741.,.,
-      
-module_eval <<-'.,.,122745803318918.,.,', 'ast.dr', 264
-def _act_20 val
-    _l, _, _r, = *val 
-     "#{_l}.concat(#{_r})" 
-
-end
-.,.,122745803318918.,.,
-      
-end
-      
-
+# -*- coding: utf-8 -*-
+
+###
+### Depager::ASTBuilderExtension - Depager Extension (master)
+###
+require 'depager/parser.rb'
+
+
+module Depager ; end
+
+class Depager::ASTBuilderExtension < Depager::Extension
+
+  def initialize
+    @master = self
+    @slaves = []
+  end
+
+  def extension_registered g_parser
+    super g_parser
+
+    @slaves[0] = Depager::ASTBuilderExtension::Slave_pre_rule_list::Parser.new(g_parser, self)
+    g_parser.hooks[:pre_rule_list].push [@slaves[0], :do_parse]
+    @slaves[1] = Depager::ASTBuilderExtension::Slave_post_rhs::Parser.new(g_parser, self)
+    g_parser.hooks[:post_rhs].push [@slaves[1], :do_parse]
+  end
+
+module_eval <<'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 8
+  attr_accessor :action_code, :on_reduce, :visitors
+  def init_extension
+    @visitors = Hash.new{|hash, key| hash[key] = []}
+    @action_code = ''
+    @on_reduce = []
+    @output_file_name = nil
+  end
+  def term_extension
+    g_parser.outer_code <<
+      generate_action_decorator_code(@on_reduce, @action_code)
+  end
+
+  def modify_action_code code, nodes=[]
+    code = code.gsub(/\$\.([a-z_])/, 'node.\1')
+    code << %{
+      rescue
+        warn "raise at src:\#{node.lineno}/\#{node.class.name}"
+        raise
+    }
+  end
+
+  def gen_accept_code sym
+    return ''
+  end
+
+  def node_name name
+    name = name == '@List' ? "NodeList" : "Node_#{name}"
+    "#{target_namespace}::#{name}"
+  end
+
+  attr_reader :output_file_name
+  def output_file_name= name
+    name = name.match(/'(.+)'/) ? $1 : name
+    @output_file_name = name
+  end
+
+DEPAGER_EXPANDED_CODE
+
+end
+
+###
+### Depager::ASTBuilderExtension::Slave_pre_rule_list - Part of Depager Extension (slave)
+###
+
+module Depager::ASTBuilderExtension::Slave_pre_rule_list #:nodoc:all
+  class Parser < Depager::LALR::Basis #:nodoc:all
+    include Depager::Utils::ExtensionSlaveMethods
+    
+
+    ### Reduce Table
+    reduce_table = [
+      [ -1, 1 ],
+      [ 0, 3 ],
+      [ 1, 0 ],
+      [ 1, 3 ],
+      [ 2, 0 ],
+      [ 2, 2 ],
+      [ 3, 1 ],
+      [ 3, 2 ],
+      [ 6, 3 ],
+      [ 7, 3 ],
+      [ 7, 4 ],
+      [ 4, 0 ],
+      [ 4, 2 ],
+      [ 4, 3 ],
+      [ 8, 1 ],
+      [ 8, 3 ],
+      [ 10, 1 ],
+      [ 10, 2 ],
+      [ 9, 1 ],
+      [ 9, 3 ],
+      [ 5, 0 ],
+      [ 5, 1 ],
+      [ 5, 1 ],
+      [ 11, 1 ],
+      [ 11, 2 ],
+      [ 12, 4 ],
+    ]
+    ### Term to Int
+    term_to_int = {
+      nil => 0,
+      false => 1,
+      :NODE => 2,
+      :ACTION => 3,
+      :VISITOR => 4,
+      :ID => 5,
+      "(" => 6,
+      ")" => 7,
+      "[" => 8,
+      "]" => 9,
+      "," => 10,
+      "-" => 11,
+      "<" => 12,
+      ">" => 13,
+    }
+    ### Int to Term
+    int_to_term = [
+      nil,
+      false,
+      :NODE,
+      :ACTION,
+      :VISITOR,
+      :ID,
+      "(",
+      ")",
+      "[",
+      "]",
+      ",",
+      "-",
+      "<",
+      ">",
+    ]
+    ### Action Table
+    action_table = [
+      [ nil, nil, 3, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ ACC, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, 5, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, 7, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 11, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, 13, nil, nil, nil, nil, nil, nil, nil, nil, 16, nil, ],
+      [ nil, nil, nil, 17, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 20, nil, nil, nil, 18, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 11, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, 7, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, 23, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 16, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 25, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, 26, 27, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, 13, nil, nil, nil, nil, nil, nil, nil, nil, 16, nil, ],
+      [ nil, nil, nil, nil, nil, 32, nil, 29, nil, nil, nil, 33, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 34, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 35, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, 36, nil, nil, 37, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 38, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, 39, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 32, nil, nil, nil, nil, nil, 33, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, 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 = [
+      -2,
+      nil,
+      -4,
+      -11,
+      nil,
+      -20,
+      nil,
+      nil,
+      -1,
+      -6,
+      -11,
+      nil,
+      -5,
+      -21,
+      -22,
+      -23,
+      nil,
+      -3,
+      -12,
+      nil,
+      -18,
+      -7,
+      -20,
+      nil,
+      -24,
+      nil,
+      -13,
+      nil,
+      -8,
+      -9,
+      nil,
+      -14,
+      -16,
+      nil,
+      nil,
+      -19,
+      -10,
+      nil,
+      -17,
+      -25,
+      -15,
+    ]
+    defred_after_shift_table = [
+      nil,
+      nil,
+      nil,
+      nil,
+      nil,
+      nil,
+      nil,
+      nil,
+      nil,
+      -6,
+      nil,
+      nil,
+      -5,
+      -21,
+      nil,
+      -23,
+      nil,
+      -3,
+      -12,
+      nil,
+      -18,
+      -7,
+      nil,
+      nil,
+      -24,
+      nil,
+      -13,
+      nil,
+      -8,
+      -9,
+      nil,
+      -14,
+      -16,
+      nil,
+      nil,
+      -19,
+      -10,
+      nil,
+      -17,
+      -25,
+      -15,
+    ]
+    ### Nonterm to Int
+    nonterm_to_int = {
+      :start => 0, 
+      :opt_defnode => 1, 
+      :opt_defvis => 2, 
+      :defnode_list => 3, 
+      :opt_attr => 4, 
+      :opt_action => 5, 
+      :defnode => 6, 
+      :defnode_header => 7, 
+      :fact_list => 8, 
+      :id_list => 9, 
+      :fact => 10, 
+      :pass_action_list => 11, 
+      :pass_action => 12, 
+    }
+    ### Int to Nonterm
+    int_to_nonterm = [
+      :start, 
+      :opt_defnode, 
+      :opt_defvis, 
+      :defnode_list, 
+      :opt_attr, 
+      :opt_action, 
+      :defnode, 
+      :defnode_header, 
+      :fact_list, 
+      :id_list, 
+      :fact, 
+      :pass_action_list, 
+      :pass_action, 
+    ]
+    ### Goto Table
+    goto_table = [
+      [ 1, 2, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, 4, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, 6, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, 8, nil, nil, 9, 10, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 12, nil, nil, nil, nil, nil, 14, 15, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, 19, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, 21, 10, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, 22, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 24, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 28, nil, nil, nil, nil, nil, 14, 15, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, 30, nil, 31, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 40, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+    ]
+
+    Tables = [ reduce_table, action_table,
+               defred_table, defred_after_shift_table, goto_table,
+               term_to_int, int_to_term, nonterm_to_int, int_to_nonterm ]
+
+    def initialize g_parser, master
+      super()
+      @g_parser  = g_parser
+      @d_parser  = g_parser.d_parser
+      @master    = master
+      @decorated = Action.new(self)
+    end
+
+    
+    def do_parse?
+      if @line.match(/^\s*%AST\{\s*\Z/)
+         @line = $' 
+        true
+      else
+        false
+      end
+    end
+    
+
+    def banner
+      "%AST{ ... } / Depager::ASTBuilderExtension"
+    end
+
+
+          def lex
+            begin
+              until @line.empty?
+                case @line
+                
+          when /\A\s+/, /\A#.*/
+            @line = $'
+                 
+
+        
+          when /\A%\}\s*\Z/
+            @line = $'
+                 @line = $'; yield nil,nil 
+
+        
+          when /\ANode/
+            @line = $'
+                 yield token(:NODE, $&) 
+
+        
+          when /\AVisitor/
+            @line = $'
+                 yield token(:VISITOR, $&) 
+
+        
+          when /\A[a-zA-Z][a-zA-Z0-9_]*/
+            @line = $'
+                 yield token(:ID, $&) 
+
+        
+          when /\A\{/
+            #
+                 lineno = file.lineno; yield token(:ACTION, parse_block, lineno) 
+
+        
+          when /\A./
+            @line = $'
+                 yield token($&, $&) 
+
+        
+                else
+                  raise RuntimeError, "must not happen #{@line}"
+                end
+              end
+            end while @original_line = @line = file.gets
+            yield nil, nil
+          end
+        
+  end
+end
+
+
+class Depager::ASTBuilderExtension::Slave_pre_rule_list::Action < Depager::LALR::Action #:nodoc:all
+  include Depager::Utils::ExtensionSlaveDecoratorMethods
+
+            on_reduce = [
+                          nil,
+            :_act_1,
+            :_act_2,
+            :_act_3,
+            :_act_4,
+            :_act_5,
+            :_act_6,
+            :_act_7,
+            :_act_8,
+            :_act_9,
+            :_act_10,
+            :_act_11,
+            :_act_12,
+            :_act_13,
+            :_act_14,
+            :_act_15,
+            :_act_16,
+            :_act_17,
+            :_act_18,
+            :_act_19,
+            :_act_20,
+            :_act_21,
+            :_act_22,
+            :_act_23,
+            :_act_24,
+            :_act_25,
+
+            ]
+            Tables = [ on_reduce ]
+
+            
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 59
+def _act_1 val
+    _opt_defnode, _opt_defvis, _defnode_list, = *val 
+
+        code = "module #{target_namespace}\n"
+        code << _opt_defnode
+        code << val[2]
+        master.visitors.each do |name, body|
+          code << ERB.new(master.class::VISITOR_TEMPLATE, nil, '-').result(binding)
+        end
+        code << "end\n"
+        if master.output_file_name
+          File.open(master.output_file_name, 'w') do |f|
+            f.write code
+          end
+          g_parser.outer_code << %!require '#{master.output_file_name}'\n!
+        else
+          g_parser.outer_code << code
+        end
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 78
+def _act_2 val
+     "" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 80
+def _act_3 val
+    _NODE, _opt_attr, _ACTION, = *val 
+
+        ini = %{
+          def initialize
+            #{_ACTION.value}
+          end
+        };#code
+        ERB.new(master.class::BASE_NODE_TEMPLATE, nil, '-').result(binding)
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 90
+def _act_4 val
+     [] 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 92
+def _act_5 val
+    _VISITOR, _opt_action, = *val 
+
+        _opt_action[nil] ||= Token.new('', 0)
+        _opt_action.each do |pass, act|
+          master.visitors[pass].unshift(
+            master.expand_inline_code(act.value.to_s, act.lineno))
+        end
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 101
+def _act_6 val
+    _defnode, = *val 
+     _defnode 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 102
+def _act_7 val
+    _defnode_list, _defnode, = *val 
+     _defnode_list << _defnode
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 106
+def _act_8 val
+    _defnode_header, _opt_attr, _opt_action, = *val 
+
+        name, args = _defnode_header
+        nodes, accept, attrs = [], '', _opt_attr
+        args.each do |i|
+          if i =~ /\-(.*)/
+            nodes.push $1
+            attrs.push $1
+          else
+            nodes.push i
+            accept << master.gen_accept_code(i)
+          end
+        end
+        _opt_action[nil] = Token.new('', 0) unless _opt_action[nil]
+        _opt_action.each do |pass, act|
+          vis_code = master.modify_action_code(act.value, nodes - attrs)
+          master.visitors[pass] <<
+            master.expand_inline_code(vis_code, act.lineno, :wrap => "def visit_Node_#{name} node")
+        end
+        ERB.new(master.class::NODE_TEMPLATE, nil, '-').result(binding)
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 128
+def _act_9 val
+    _ID, _, _, = *val 
+     [_ID.value, []]
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 129
+def _act_10 val
+    _ID, _, _fact_list, _, = *val 
+     [_ID.value, _fact_list] 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 132
+def _act_11 val
+     [] 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 133
+def _act_12 val
+    _, _, = *val 
+     [] 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 134
+def _act_13 val
+    _, _id_list, _, = *val 
+     _id_list 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 137
+def _act_14 val
+    _fact, = *val 
+     [_fact] 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 138
+def _act_15 val
+    _fact_list, _, _fact, = *val 
+     _fact_list.push _fact 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 141
+def _act_16 val
+    _ID, = *val 
+     _ID.value 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 142
+def _act_17 val
+    _, _ID, = *val 
+     '-' + _ID.value 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 145
+def _act_18 val
+    _ID, = *val 
+     [ _ID.value ] 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 146
+def _act_19 val
+    _id_list, _, _ID, = *val 
+     _id_list.push _ID.value 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 149
+def _act_20 val
+     {nil => Token.new('', 0)} 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 150
+def _act_21 val
+    _ACTION, = *val 
+     {nil => _ACTION} 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 152
+def _act_22 val
+    _pass_action_list, = *val 
+
+        Hash[ *_pass_action_list.flatten ].merge({nil => Token.new('', 0)})
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 157
+def _act_23 val
+    _pass_action, = *val 
+     [ _pass_action ] 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 158
+def _act_24 val
+    _pass_action_list, _pass_action, = *val 
+     _pass_action_list << _pass_action 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 162
+def _act_25 val
+    _, _ID, _, _ACTION, = *val 
+     [_ID.value, _ACTION]
+
+end
+DEPAGER_EXPANDED_CODE
+        
+        
+end
+        
+###
+### Depager::ASTBuilderExtension::Slave_post_rhs - Part of Depager Extension (slave)
+###
+
+module Depager::ASTBuilderExtension::Slave_post_rhs #:nodoc:all
+  class Parser < Depager::LALR::Basis #:nodoc:all
+    include Depager::Utils::ExtensionSlaveMethods
+    
+
+    ### Reduce Table
+    reduce_table = [
+      [ -1, 1 ],
+      [ 0, 1 ],
+      [ 2, 3 ],
+      [ 2, 4 ],
+      [ 3, 1 ],
+      [ 3, 3 ],
+      [ 1, 1 ],
+      [ 1, 1 ],
+      [ 1, 1 ],
+      [ 4, 2 ],
+      [ 4, 1 ],
+      [ 4, 1 ],
+      [ 4, 1 ],
+      [ 4, 1 ],
+      [ 4, 1 ],
+      [ 4, 1 ],
+      [ 6, 0 ],
+      [ 6, 1 ],
+      [ 5, 2 ],
+      [ 5, 3 ],
+      [ 5, 3 ],
+      [ 5, 3 ],
+    ]
+    ### Term to Int
+    term_to_int = {
+      nil => 0,
+      false => 1,
+      :ID => 2,
+      "(" => 3,
+      ")" => 4,
+      "," => 5,
+      :CONST => 6,
+      :SYMBOL => 7,
+      :STR => 8,
+      :NILNODE => 9,
+      :NUMBER => 10,
+      :NIL => 11,
+      :EMBED => 12,
+      "[" => 13,
+      "]" => 14,
+      :LL => 15,
+      "@" => 16,
+    }
+    ### Int to Term
+    int_to_term = [
+      nil,
+      false,
+      :ID,
+      "(",
+      ")",
+      ",",
+      :CONST,
+      :SYMBOL,
+      :STR,
+      :NILNODE,
+      :NUMBER,
+      :NIL,
+      :EMBED,
+      "[",
+      "]",
+      :LL,
+      "@",
+    ]
+    ### Action Table
+    action_table = [
+      [ nil, nil, 6, nil, nil, nil, 7, 8, 9, 10, 11, 12, nil, 13, nil, nil, nil, ],
+      [ ACC, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, 18, nil, nil, nil, nil, nil, nil, nil, nil, 17, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, 6, nil, nil, nil, 7, 8, 9, 10, 11, 12, nil, 13, 19, nil, nil, ],
+      [ nil, nil, 6, nil, nil, nil, 7, 8, 9, 10, 11, 12, nil, 13, nil, nil, nil, ],
+      [ nil, nil, 6, nil, nil, nil, 7, 8, 9, 10, 11, 12, nil, 13, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, 6, nil, 24, nil, 7, 8, 9, 10, 11, 12, nil, 13, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, 27, nil, nil, nil, nil, nil, nil, nil, nil, 26, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, 28, 27, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, 6, nil, nil, nil, 7, 8, 9, 10, 11, 12, nil, 13, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ],
+    ]
+    ### Default Reduce Table
+    defred_table = [
+      nil,
+      nil,
+      -1,
+      -6,
+      -7,
+      -8,
+      -16,
+      -10,
+      -11,
+      -12,
+      -13,
+      -14,
+      -15,
+      nil,
+      nil,
+      nil,
+      -9,
+      -17,
+      nil,
+      -18,
+      nil,
+      -4,
+      -20,
+      -21,
+      -2,
+      nil,
+      -19,
+      nil,
+      -3,
+      -5,
+    ]
+    defred_after_shift_table = [
+      nil,
+      nil,
+      nil,
+      -6,
+      -7,
+      -8,
+      nil,
+      -10,
+      -11,
+      -12,
+      -13,
+      -14,
+      -15,
+      nil,
+      nil,
+      nil,
+      -9,
+      -17,
+      nil,
+      -18,
+      nil,
+      nil,
+      nil,
+      nil,
+      -2,
+      nil,
+      -19,
+      nil,
+      -3,
+      nil,
+    ]
+    ### Nonterm to Int
+    nonterm_to_int = {
+      :start => 0, 
+      :fnl => 1, 
+      :node => 2, 
+      :fnlpair => 3, 
+      :fact => 4, 
+      :list => 5, 
+      :opt_embed => 6, 
+    }
+    ### Int to Nonterm
+    int_to_nonterm = [
+      :start, 
+      :fnl, 
+      :node, 
+      :fnlpair, 
+      :fact, 
+      :list, 
+      :opt_embed, 
+    ]
+    ### Goto Table
+    goto_table = [
+      [ 1, 2, 4, nil, 3, 5, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, 16, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, 21, 4, 20, 3, 5, nil, ],
+      [ nil, 22, 4, nil, 3, 5, nil, ],
+      [ nil, 23, 4, nil, 3, 5, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, 21, 4, 25, 3, 5, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, 29, 4, nil, 3, 5, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+      [ nil, nil, nil, nil, nil, nil, nil, ],
+    ]
+
+    Tables = [ reduce_table, action_table,
+               defred_table, defred_after_shift_table, goto_table,
+               term_to_int, int_to_term, nonterm_to_int, int_to_nonterm ]
+
+    def initialize g_parser, master
+      super()
+      @g_parser  = g_parser
+      @d_parser  = g_parser.d_parser
+      @master    = master
+      @decorated = Action.new(self)
+    end
+
+    
+    def do_parse?
+      if @line.match(/^\s*=>/)
+         @line = $' 
+        true
+      else
+        false
+      end
+    end
+    
+
+    def banner
+      "=>... / Depager::ASTBuilderExtension"
+    end
+
+
+          def lex
+            begin
+              until @line.empty?
+                case @line
+                
+          when /\A[ \t]+/
+            @line = $'
+                 
+
+        
+          when /\A\r?\n/
+            @line = $'
+                 yield nil, nil                 
+
+        
+          when /\A<</
+            @line = $'
+                 yield token(:LL, $&)          
+
+        
+          when /\A%([a-zA-Z0-9_]+)((::[a-zA-Z0-9_]+)*)/
+            @line = $'
+                 yield token(:CONST, $1+$2)    
+
+        
+          when /\A%\((.+)\)%/
+            @line = $'
+                 yield token(:EMBED, $1)       
+
+        
+          when /\Anil/
+            @line = $'
+                 yield token(:NIL, $&)         
+
+        
+          when /\ANilNode/
+            @line = $'
+                 yield token(:NILNODE, $&)     
+
+        
+          when /\A[0-9]+/
+            @line = $'
+                 yield token(:NUMBER, $&.to_i) 
+
+        
+          when /\A:[a-zA-Z0-9_]+/
+            @line = $'
+                 yield token(:SYMBOL, $&)      
+
+        
+          when /\A[a-zA-Z][a-zA-Z0-9_]*/
+            @line = $'
+                 yield token(:ID, $&)          
+
+        
+          when /\A'(.+)'/
+            @line = $'
+                 yield token(:STR, $1)         
+
+        
+          when /\A./
+            @line = $'
+                 yield token($&, $&)           
+
+        
+                else
+                  raise RuntimeError, "must not happen #{@line}"
+                end
+              end
+            end while @original_line = @line = file.gets
+            yield nil, nil
+          end
+        module_eval <<'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 174
+  def do_default
+    n = g_parser.rules.size-1
+    master.action_code << %{
+      def _ast_#{n} val
+        NilNode.new(basis.file.lineno)
+      end
+    }.unindent #code
+    master.on_reduce[n] = ":_ast_#{n}"
+  end
+
+DEPAGER_EXPANDED_CODE
+
+  end
+end
+
+
+class Depager::ASTBuilderExtension::Slave_post_rhs::Action < Depager::LALR::Action #:nodoc:all
+  include Depager::Utils::ExtensionSlaveDecoratorMethods
+
+            on_reduce = [
+                          nil,
+            :_act_1,
+            :_act_2,
+            :_act_3,
+            :_act_4,
+            :_act_5,
+            :_act_6,
+            :_act_7,
+            :_act_8,
+            :_act_9,
+            :_act_10,
+            :_act_11,
+            :_act_12,
+            :_act_13,
+            :_act_14,
+            :_act_15,
+            :_act_16,
+            :_act_17,
+            :_act_18,
+            :_act_19,
+            :_act_20,
+            :_act_21,
+
+            ]
+            Tables = [ on_reduce ]
+
+            
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 202
+def _act_1 val
+    _fnl, = *val 
+
+        n = g_parser.rules.size-1
+        master.action_code <<
+          master.expand_inline_code(_fnl, basis.file.lineno, :wrap => "def _ast_#{n} val")
+        master.on_reduce[n] = ":_ast_#{n}"
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 210
+def _act_2 val
+    _ID, _, _, = *val 
+     "#{master.node_name _ID.value}.new(basis.file.lineno)" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 212
+def _act_3 val
+    _ID, _, _fnlpair, _, = *val 
+
+        if g_parser.rhs.size > 0
+          "#{master.node_name _ID.value}.new(val[0].lineno, #{_fnlpair.join(', ')})"
+        else
+          "#{master.node_name _ID.value}.new(basis.file.lineno, #{_fnlpair.join(', ')})"
+        end
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 221
+def _act_4 val
+    _fnl, = *val 
+     [_fnl] 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 222
+def _act_5 val
+    _fnlpair, _, _fnl, = *val 
+     _fnlpair << _fnl 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 225
+def _act_6 val
+    _fact, = *val 
+     _fact 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 226
+def _act_7 val
+    _node, = *val 
+     _node 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 227
+def _act_8 val
+    _list, = *val 
+     _list 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 231
+def _act_9 val
+    _ID, _opt_embed, = *val 
+
+        unless i = g_parser.name_to_rhs_index(_ID.value)
+          warn "#{g_parser.lineno}: ?#{_ID.value}"
+          raise
+        end
+        "val[#{i}]#{val[1]}"
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 238
+def _act_10 val
+    _CONST, = *val 
+     "Depager::Token.new(#{_CONST.value})" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 239
+def _act_11 val
+    _SYMBOL, = *val 
+     "Depager::Token.new(#{_SYMBOL.value})" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 240
+def _act_12 val
+    _STR, = *val 
+     "Depager::Token.new('#{_STR.value}')" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 241
+def _act_13 val
+    _NILNODE, = *val 
+     "NilNode.new(basis.file.lineno)" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 242
+def _act_14 val
+    _NUMBER, = *val 
+     "Depager::Token.new(#{_NUMBER.value})" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 243
+def _act_15 val
+    _NIL, = *val 
+     "nil" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 246
+def _act_16 val
+     '' 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 247
+def _act_17 val
+    _EMBED, = *val 
+     _EMBED.value 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 250
+def _act_18 val
+    _, _, = *val 
+     "#{master.node_name '@List'}.new(basis.file.lineno, [])" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 252
+def _act_19 val
+    _, _fnlpair, _, = *val 
+
+        if g_parser.rhs.size > 0
+          "#{master.node_name '@List'}.new(val[0].lineno, [#{_fnlpair.join(', ')}])"
+        else
+          "#{master.node_name '@List'}.new(basis.file.lineno, #{_fnlpair.join(', ')})"
+        end
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 259
+def _act_20 val
+    _l, _LL, _r, = *val 
+     "#{_l}.push(#{_r})" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/ast.dr', 260
+def _act_21 val
+    _l, _, _r, = *val 
+     "#{_l}.concat(#{_r})" 
+
+end
+DEPAGER_EXPANDED_CODE
+        
+        
+end
+        
+
+class Depager::ASTBuilderExtension
+  BASE_NODE_TEMPLATE = <<-'EOS'
+    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
+  EOS
+
+  NODE_TEMPLATE = <<-'EOS'
+    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
+  EOS
+
+  VISITOR_TEMPLATE = <<-'EOS'
+    class Visitor<%= name ? '_' + name : '' %>
+      def visit node
+        node.accept(self)
+      end
+      <%= body.join %>
+    end # Visitor<%= name ? '_' + name : '' %>
+  EOS
+end