depager 0.2.0 → 0.2.2

data/lib/depager.rb

@@ -11,30 +11,47 @@ module Depager
   #
   class FileManager
     def initialize f=nil
-      @file = f
+      @files = []
+      @files << f if f
     end
-    def file= f
-      @file = f
+    def __file= f
+      # @file = f
     end
     def eof?
-      @file.eof?
+      ceof = current.eof?
+      if !ceof 
+        ceof
+      elsif @files.size == 1
+        ceof
+      else
+        @files.pop
+        self.eof?
+      end
     end
     # get file name
     def fname
-      File.basename @file.path
+      File.basename current.path
     end
     # get file path
     def path
-      @file.path
+      current.path
     end
     # get current line no
     def lineno
-      @file.lineno
+      current.lineno
+    end
+    # add file to files
+    def add_file f
+      @files << f
+    end
+    #current file
+    def current
+      @files.last
     end
 
     # get next line
     def getline
-      @file.gets
+      current.gets unless eof?
     end
     alias gets getline
   end
@@ -61,9 +78,9 @@ module Depager
         case line = files.getline
         when /^\s*(#.*)?$/
           #skip space and comment.
-        when /^%class\s+(\S+)\s+based_on\s+(\S+)\s+\(\s*'(.+)'\s*\)\s*$/
+        when /^%class\s+(\S+)\s+based_on\s+(\S+)(\s+\(\s*'(.+)'\s*\))?\s*$/
           @target_name = $1
-          require $3
+          require $4 if $4
           ns = $2.split(/::/)
           ge = ns.pop
           m = ns.inject(Object){|c,name| c.const_get(name) }
@@ -186,7 +203,13 @@ module Depager
     public
     def gettoken
       while !@line.empty? || !eof?
-        getline if @line.empty?
+        if @line.empty?
+          getline 
+          if @line =~ /^%include\s+'(.+?)'\s*$/
+            files.add_file File.open($1)
+            @line = ''
+          end
+        end
         @oldline = @line
         tag = s = name = val = nil
         until @line.empty? do
@@ -206,7 +229,7 @@ module Depager
             s = $1.intern
             name = $3 ? $3 : $1
             val = @terms[s] ||=  - (@terms.size + 1)
-          when /^'(.)'/
+          when /^'(.+?)'/
             tag = :T
             name = s = $1
             val = @terms[s] ||=  - (@terms.size + 1)
@@ -287,7 +310,7 @@ module Depager
     def add_rule lhs, rhs, prec=nil
       @lhs_syms[lhs] = true
       rule = @parsing_method::Rule[lhs, rhs, prec]
-      @g.push rule
+      @rules.push rule
       return rule
     end
 
@@ -312,7 +335,7 @@ module Depager
       end
     end
 
-    attr_accessor :g, :terms, :nonterms, :precs
+    attr_accessor :rules, :terms, :nonterms, :precs
     attr_accessor :line, :line0, :oldline, :token
     attr_accessor :optouter, :optinner, :optmain, :mixin
     attr_accessor :nparams, :lhs, :rhs, :nrhs, :rhsni, :nparam, :nrules
@@ -357,7 +380,7 @@ module Depager
     def make_grammar precs
       ts = @nonterms.size - 1
       @terms.each{|k,v| @terms[k] = ts - v}
-      @g[0].act = Array.new(@nparam-1)
+      # @grammar[0].act = Array.new(@nparam-1)
 
       @precs = {}
       precs.each_with_index do |p, x|
@@ -369,9 +392,9 @@ module Depager
           end
         end
       end
-      @g.each do |rl|
-        rl.r.each_with_index{|i, x| rl.r[x] = ts - i if i < 0}
-        rl.prec &&= @precs[@terms[rl.prec]]
+      @rules.each do |rule|
+        rule.rhs.each_with_index{|i, x| rule.rhs[x] = ts - i if i < 0}
+        rule.prec &&= @precs[@terms[rule.prec]]
       end
     end
     alias mkg make_grammar
@@ -396,7 +419,7 @@ module Depager
     end
 
     def init_grammar
-      @g = [@parsing_method::Rule[0 , [1]]]
+      @rules = [@parsing_method::Rule[0 , [1]]]
       @terms = { nil => -1, false => -2 }
       @nonterms = {'$start' => 0}
       @i2s = {}
@@ -406,12 +429,21 @@ module Depager
 
     public
     # extend paser
-    # ext:: extension name
-    def extend_paser ext
+    # extentions:: array of [name, paht]
+    # options::    hash of options
+    def extend_paser extentions, options
       init_hook
-      ext.each do |f,m|
+      extentions.each do |f,m|
         require f if f
-        Object.const_get("#{m}Extension").new.send(:__regext__, self)
+        e = Object.const_get("#{m}Extension").new
+        options[m] and options[m].each do |k,v|
+          begin
+            e.send("#{k}=", v)
+          rescue NoMethodError
+            warning "no such a option '#{m}.#{k}'."            
+          end
+        end
+        e.send(:__regext__, self)
       end
     end
 
@@ -438,7 +470,7 @@ module Depager
       check_grammar
       make_grammar precs
       @table = @parsing_method::Table.new(
-        @parsing_method::Grammar.new(@g, @terms, @nonterms, @precs))
+        @parsing_method::Grammar.new(@rules, @terms, @nonterms, @precs))
       @table.check_table @d_parser
       @table
     end
@@ -464,7 +496,7 @@ module Depager
     end
     attr_reader   :d_parser, :parsing_method
     attr_accessor :optouter, :optinner, :optmain
-    attr_accessor :basis_name, :deco, :req
+    attr_accessor :basis_name, :deco, :req, :options
     def initialize d_parser
       @d_parser = d_parser
       @parsing_method = nil
@@ -473,6 +505,7 @@ module Depager
       @deco = []
       @req = []
       @ext = []
+      @options = {}
 
       @optinner = []
       @optouter = []
@@ -480,6 +513,8 @@ module Depager
       @precs = []
       @mixin = []
 
+      @dr_option = {}
+
       @tmpldir = Generator::Tmpldir+'/'
     end
 
@@ -487,9 +522,11 @@ module Depager
       precs = []
       until files.eof?
         case line = files.getline
+        when /^\s*$/, /^\s*#.*$/
+          # skip
         when /^\s*(left|right|nonassoc)\s+(.*)$/
           dir = $1.upcase.intern
-          syms = $2.split.map{|i| (i =~ /'(.)'/) ? $1 : i.intern}
+          syms = $2.split.map{|i| (i =~ /'(.+?)'/) ? $1 : i.intern}
           precs.push [dir, syms]
         when /^%\}\s*$/
           break
@@ -521,10 +558,13 @@ module Depager
         @deco.push $1
       when /^%extend\s+(.*?)\s*\(\s*'(.*)'\s*\)\s*$/
         @ext.push [$2.strip, $1] unless @ext.find{|i| i[1] == $1}
-      when /^%extend\s+(.*?)\s*$/
-        # not implemented yet
-        warning "'%extend E' is not implemented yet. " <<
-          "use '%extend Ext (filename)' instead.", lineno
+      when /^%option\s+(\w+).(\w+)\s+(.*)\s*$/
+        if $1 == 'Generator'
+          @dr_option[$2] = $3
+        else
+          @options[$1] ||= []
+          @options[$1] << [$2, $3]
+        end
       when /^%require\s+'(.+?)'\s*$/
         @req.push "'#{$1}'"
       when /^%mixin\s+(\S+)\s*(\((.+)\)\s*)?$/
@@ -532,14 +572,6 @@ module Depager
         @req.push $3 if $3
       when /^%inner\s*\{\s*$/
         @optinner.push parse_block
-      when /^%outer\s*\{\s*$/
-        # obsolete
-        warning "'%optouter' is obsolete."
-        @optouter.push parse_block
-      when /^%main\s*\{\s*$/
-        # obsolete
-        warning "'%optmain' is obsolete."
-        @optmain.push parse_block
       when /^%prec\s*\{\s*$/
         @precs = parse_prec
       else
@@ -550,13 +582,14 @@ module Depager
 
 
   module Simple
-    class G
-      def initialize *args
-      end
-    end
+    Grammar = Depager::ParsingMethod::Grammar
+    Rule    = Depager::ParsingMethod::Rule
     class Table
       def initialize *args
       end
+      def check_table *args
+        true
+      end
     end
     class SingleGenerator < Generator
       Tmplfile = 'simple.erb'
@@ -573,7 +606,7 @@ module Depager
           case line
           when /^%%\s*$/
             g_parser = GrammarParser.new(@d_parser)
-            g_parser.extend_paser @ext
+            g_parser.extend_paser @ext, @options
             g_parser.parse(@d_parser.target_name, @mixin, @precs)
             @optmain.push parse_block
             return out_code(g_parser)
@@ -654,7 +687,7 @@ module Depager
             precs = parse_prec
           when /^%%\s*$/
             g_parser = GrammarParser.new(@d_parser)
-            g_parser.extend_paser @ext
+            g_parser.extend_paser @ext, @options
             g_parser.parse(target_name, mixin, precs)
             g_parser.optinner.push inner
             return out_slave_code(g_parser, mixin, mtsk, banner)

data/lib/depager/{ast_base.dr → ast.dr}

@@ -1,4 +1,4 @@
-%defext ASTBuilderBaseExtension
+%defext ASTBuilderExtension
 %extend Lexer ('depager/lex.rb')
 %extend NVAction ('depager/nvaction.rb')
 %decorate @NVAction
@@ -10,12 +10,32 @@
     @visitor = Hash.new{|hash, key| hash[key] = []}
     @optouter = []
     @on_reduce = []
+    @output_file_name = nil
   end
   def postRuleList
     g_parser.optouter <<
       gen_action_decorator_code(target_name, paramkey,
                                 @on_reduce, @optouter)
   end
+
+  Template = CodeUtils::make_tmpl("#{Depager::Tmpldir}/ast.erbs")
+  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
 %}
 %hook prerulelist /%AST\{\s*\Z/ skip
 %banner '%AST{ ... }'
@@ -36,21 +56,30 @@
   start:
       opt_defnode opt_defvis defnode_list
       {
-        g_parser.optouter.push _opt_defnode, val[2]
-        g_parser.optouter.push %{
+        code = _opt_defnode
+        code << val[2] << %{
           class Visitor
             def visit node
               node.accept(self)
             end
-          #{master.visitor[nil]}
+          #{master.visitor[nil].join}
           end
         };#code
         master.visitor.each do |k, v|
-          g_parser.optouter.push %{
+          next unless k
+          code << %{
             class Visitor_#{k}
-            #{v}
+            #{v.join}
             end
-          } if k ;#code
+          };#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
       }
   ;
@@ -70,7 +99,7 @@
       { [] }
     | VISITOR opt_action
       {
-        _opt_action[nil] = Token['', 0] unless _opt_action[nil]
+        _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))
@@ -106,7 +135,7 @@
       }
   ;
   defnode_header:
-      ID '(' ')'           { [_ID.value, nil]}
+      ID '(' ')'           { [_ID.value, []]}
     | ID '(' fact_list ')' { [_ID.value, _fact_list] }
   ;
   opt_attr:                
@@ -131,11 +160,11 @@
     | ACTION               { {nil => _ACTION} }
     | pass_action_list
       {
-        Hash.new(_pass_action_list).marge({nil => Token['', 0]})
+        Hash[ *_pass_action_list.flatten ].merge({nil => Token['', 0]})
       }
   ;
   pass_action_list:
-      pass_action                  { _pass_action }
+      pass_action                  { [ _pass_action ] }
     | pass_action_list pass_action { _pass_action_list << _pass_action }
   ;
 
@@ -144,22 +173,30 @@
   ;
 #end-rule
 %%
-%hook postrhs
+%hook postrhs /=>/ skip
 %banner '=>...'
 %prec{
   left LL '@'
 %}
+%inner{
+  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
+%}
 %%
 
 %LEX{
   /[ \t]+/                { }
   /\r?\n/               { yield nil, nil                 }
   /<</                    { yield _Token(:LL, $&)          }
-  /=>/                    { yield _Token(:EG, $&)          }
   /%([a-zA-Z0-9_]+)((::[a-zA-Z0-9_]+)*)/
                           { yield _Token(:CONST, $1+$2)    }
   /%\((.+)\)%/            { yield _Token(:EMBED, $1)       }
   'nil'                   { yield _Token(:NIL, $&)         }
+  'NilNode'               { yield _Token(:NILNODE, $&)     }
   /[0-9]+/                { yield _Token(:NUMBER, $&.to_i) }
   /:[a-zA-Z0-9_]+/        { yield _Token(:SYMBOL, $&)      }
   /[a-zA-Z][a-zA-Z0-9_]*/ { yield _Token(:ID, $&)          }
@@ -168,11 +205,11 @@
 %}
 #begin-rule
   start: 
-      EG fnl
+      fnl
       {
         n = master.nrules
         master.optouter <<
-          master.gen_defm_code("_ast_#{n} val", _fnl, _EG.lineno)
+          master.gen_defm_code("_ast_#{n} val", _fnl, basis.file.lineno)
         master.on_reduce[n] = ":_ast_#{n}"
       }
   ;
@@ -199,8 +236,8 @@
   fact:
       ID opt_embed
       {
-        unless i = g_parser.name_to_rhs_index(val[0].value)
-          warn "#{g_parser.lineno}: ?#{val[0].value}"
+        unless i = g_parser.name_to_rhs_index(_ID.value)
+          warn "#{g_parser.lineno}: ?#{_ID.value}"
           raise
         end
         "val[#{i}]#{val[1]}"
@@ -208,8 +245,9 @@
     | CONST              { "Depager::Token[#{_CONST.value}]" }
     | SYMBOL             { "Depager::Token[#{_SYMBOL.value}]" }
     | STR                { "Depager::Token['#{_STR.value}']" }
-    | NIL                { "nil" }
+    | NILNODE            { "NilNode.new(basis.file.lineno)" }
     | NUMBER             { "Depager::Token[#{_NUMBER.value}]" }
+    | NIL                { "nil" }
   ;
   opt_embed:
                          { '' }

data/lib/depager/{ast_base.rb → ast.rb}

@@ -1,16 +1,16 @@
 
 ###
-### ASTBuilderBaseExtension - Depager Extension (master)
+### ASTBuilderExtension - Depager Extension (master)
 ###
 require 'pp.rb'
 require 'depager/parser.rb'
 require 'depager/parse_action'
 
 
-module D4ASTBuilderBaseExtension #:nodoc:all
+module D4ASTBuilderExtension #:nodoc:all
 end
 
-class ASTBuilderBaseExtension #:nodoc:all
+class ASTBuilderExtension #:nodoc:all
   include Depager::ExtensionUtils
   
   attr_accessor :h2p
@@ -25,11 +25,11 @@ class ASTBuilderBaseExtension #:nodoc:all
   def __regext__ p
     super p, :default, nil
     
-    @hook[0] = ASTBuilderBaseExtension_prerulelist.new(p, @nparam, self)
+    @hook[0] = ASTBuilderExtension_prerulelist.new(p, @nparam, self)
     @h2p['prerulelist'] = @hook[0] 
     p.prerulelist.push [@hook[0], :do_parse]
     
-    @hook[1] = ASTBuilderBaseExtension_postrhs.new(p, @nparam, self)
+    @hook[1] = ASTBuilderExtension_postrhs.new(p, @nparam, self)
     @h2p['postrhs'] = @hook[1] 
     p.postrhs.push [@hook[1], :do_parse]
     
@@ -43,6 +43,7 @@ class ASTBuilderBaseExtension #:nodoc:all
     @visitor = Hash.new{|hash, key| hash[key] = []}
     @optouter = []
     @on_reduce = []
+    @output_file_name = nil
   end
   def postRuleList
     g_parser.optouter <<
@@ -50,17 +51,36 @@ class ASTBuilderBaseExtension #:nodoc:all
                                 @on_reduce, @optouter)
   end
 
+  Template = CodeUtils::make_tmpl("#{Depager::Tmpldir}/ast.erbs")
+  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
 
 ###
-### ASTBuilderBaseExtension_prerulelist - Part of Depager Extension (slave)
+### ASTBuilderExtension_prerulelist - Part of Depager Extension (slave)
 ###
-module D4ASTBuilderBaseExtension_prerulelist #:nodoc:all
+module D4ASTBuilderExtension_prerulelist #:nodoc:all
 end
 
-class ASTBuilderBaseExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
+class ASTBuilderExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
   include Depager::ExtensionUtils
   
   include ActionParser
@@ -134,90 +154,90 @@ class ASTBuilderBaseExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
   ]
   ### 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, ], 
+    [ 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, 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, 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, 21, 22, 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, 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, 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, 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, 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, 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, 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, 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, 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, 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, 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, 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, 
+    -11, 
     nil, 
     -20, 
     nil, 
-    -3, 
-    -12, 
-    -18, 
     nil, 
-    -21, 
+    -1, 
+    -6, 
+    -11, 
+    nil, 
     -5, 
+    -21, 
     -22, 
     -23, 
     nil, 
-    -6, 
+    -3, 
+    -12, 
     nil, 
-    -11, 
-    -1, 
-    -13, 
+    -18, 
+    -7, 
+    -20, 
     nil, 
     -24, 
     nil, 
+    -13, 
     nil, 
-    -20, 
-    -7, 
-    -19, 
+    -8, 
+    -9, 
     nil, 
     -14, 
     -16, 
     nil, 
     nil, 
-    -9, 
-    -8, 
-    -25, 
-    -17, 
-    nil, 
+    -19, 
     -10, 
+    nil, 
+    -17, 
+    -25, 
     -15, 
   ]
   defred_after_shift_table = [
@@ -229,38 +249,38 @@ class ASTBuilderBaseExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
     nil, 
     nil, 
     nil, 
-    -3, 
-    -12, 
-    -18, 
     nil, 
-    -21, 
+    -6, 
+    nil, 
+    nil, 
     -5, 
+    -21, 
     nil, 
     -23, 
     nil, 
-    -6, 
-    nil, 
+    -3, 
+    -12, 
     nil, 
+    -18, 
+    -7, 
     nil, 
-    -13, 
     nil, 
     -24, 
     nil, 
+    -13, 
     nil, 
-    nil, 
-    -7, 
-    -19, 
+    -8, 
+    -9, 
     nil, 
     -14, 
     -16, 
     nil, 
     nil, 
-    -9, 
-    -8, 
-    -25, 
-    -17, 
-    nil, 
+    -19, 
     -10, 
+    nil, 
+    -17, 
+    -25, 
     -15, 
   ]
   ### Nonterm to Int
@@ -297,33 +317,32 @@ class ASTBuilderBaseExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
   ]
   ### 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, ], 
+   [ 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, 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, 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, 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, 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, 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, ], 
@@ -338,6 +357,7 @@ class ASTBuilderBaseExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
    [ 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, nparams, action_table,
@@ -350,7 +370,7 @@ class ASTBuilderBaseExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
     @g_parser = @p = p
     @master   = @m = master
     @nparam   = nparam
-    @dect     = D4ASTBuilderBaseExtension_prerulelist::NVAction.new(self)
+    @dect     = D4ASTBuilderExtension_prerulelist::NVAction.new(self)
     init_parser
   end
 
@@ -423,10 +443,9 @@ end
 
 ### Outer Code
 
-class D4ASTBuilderBaseExtension_prerulelist::NVAction < Depager::LALR::Action #:nodoc:all
+class D4ASTBuilderExtension_prerulelist::NVAction < Depager::LALR::Action #:nodoc:all
   include Depager::DecoratorUtils
-          include ActionParser
-
+  ["        include ActionParser\n"]
   on_reduce = [
     nil,
               :_act_0,
@@ -464,42 +483,49 @@ class D4ASTBuilderBaseExtension_prerulelist::NVAction < Depager::LALR::Action #:
   end
   
 
-module_eval <<-'.,.,118754107738065.,.,', 'ast_base.dr', 36
-  def _act_0 val
-    _opt_defnode, _opt_defvis, _defnode_list = *val 
+module_eval <<-'.,.,120998292244191.,.,', 'ast.dr', 56
+def _act_0 val
+    _opt_defnode, _opt_defvis, _defnode_list, = *val 
 
-        g_parser.optouter.push _opt_defnode, val[2]
-        g_parser.optouter.push %{
+        code = _opt_defnode
+        code << val[2] << %{
           class Visitor
             def visit node
               node.accept(self)
             end
-          #{master.visitor[nil]}
+          #{master.visitor[nil].join}
           end
         };#code
         master.visitor.each do |k, v|
-          g_parser.optouter.push %{
+          next unless k
+          code << %{
             class Visitor_#{k}
-            #{v}
+            #{v.join}
             end
-          } if k ;#code
+          };#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
-
-.,.,118754107738065.,.,
+end
+.,.,120998292244191.,.,
       
-module_eval <<-'.,.,11875410776514.,.,', 'ast_base.dr', 56
-  def _act_1 val
+module_eval <<-'.,.,120998292256836.,.,', 'ast.dr', 85
+def _act_1 val
      "" 
 
-  end
-
-.,.,11875410776514.,.,
+end
+.,.,120998292256836.,.,
       
-module_eval <<-'.,.,118754107720386.,.,', 'ast_base.dr', 58
-  def _act_2 val
-    _NODE, _opt_attr, _ACTION = *val 
+module_eval <<-'.,.,120998292239342.,.,', 'ast.dr', 87
+def _act_2 val
+    _NODE, _opt_attr, _ACTION, = *val 
 
         ini = %{
           def initialize
@@ -508,53 +534,48 @@ module_eval <<-'.,.,118754107720386.,.,', 'ast_base.dr', 58
         };#code
         master.gen_tmpl_code(:defnode, binding)
 
-  end
-
-.,.,118754107720386.,.,
+end
+.,.,120998292239342.,.,
       
-module_eval <<-'.,.,118754107736984.,.,', 'ast_base.dr', 68
-  def _act_3 val
+module_eval <<-'.,.,120998292263713.,.,', 'ast.dr', 97
+def _act_3 val
      [] 
 
-  end
-
-.,.,118754107736984.,.,
+end
+.,.,120998292263713.,.,
       
-module_eval <<-'.,.,118754107764916.,.,', 'ast_base.dr', 70
-  def _act_4 val
-    _VISITOR, _opt_action = *val 
+module_eval <<-'.,.,120998292220850.,.,', 'ast.dr', 99
+def _act_4 val
+    _VISITOR, _opt_action, = *val 
 
-        _opt_action[nil] = Token['', 0] unless _opt_action[nil]
+        _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
-
-.,.,118754107764916.,.,
+end
+.,.,120998292220850.,.,
       
-module_eval <<-'.,.,118754107745518.,.,', 'ast_base.dr', 79
-  def _act_5 val
-    _defnode = *val 
+module_eval <<-'.,.,120998292217429.,.,', 'ast.dr', 108
+def _act_5 val
+    _defnode, = *val 
      _defnode 
 
-  end
-
-.,.,118754107745518.,.,
+end
+.,.,120998292217429.,.,
       
-module_eval <<-'.,.,118754107734821.,.,', 'ast_base.dr', 80
-  def _act_6 val
-    _defnode_list, _defnode = *val 
+module_eval <<-'.,.,120998292227244.,.,', 'ast.dr', 109
+def _act_6 val
+    _defnode_list, _defnode, = *val 
      _defnode_list << _defnode
 
-  end
-
-.,.,118754107734821.,.,
+end
+.,.,120998292227244.,.,
       
-module_eval <<-'.,.,118754107753400.,.,', 'ast_base.dr', 84
-  def _act_7 val
-    _defnode_header, _opt_attr, _opt_action = *val 
+module_eval <<-'.,.,120998292237122.,.,', 'ast.dr', 113
+def _act_7 val
+    _defnode_header, _opt_attr, _opt_action, = *val 
 
         name, args = _defnode_header
         nodes, accept, attrs = [], '', _opt_attr
@@ -576,179 +597,161 @@ module_eval <<-'.,.,118754107753400.,.,', 'ast_base.dr', 84
         end
         master.gen_tmpl_code(:node, binding)
 
-  end
-
-.,.,118754107753400.,.,
+end
+.,.,120998292237122.,.,
       
-module_eval <<-'.,.,118754107753793.,.,', 'ast_base.dr', 107
-  def _act_8 val
-    _ID, _, _ = *val 
-     [_ID.value, nil]
-
-  end
+module_eval <<-'.,.,12099829224464.,.,', 'ast.dr', 136
+def _act_8 val
+    _ID, _, _, = *val 
+     [_ID.value, []]
 
-.,.,118754107753793.,.,
+end
+.,.,12099829224464.,.,
       
-module_eval <<-'.,.,118754107756494.,.,', 'ast_base.dr', 108
-  def _act_9 val
-    _ID, _, _fact_list, _ = *val 
+module_eval <<-'.,.,120998292227496.,.,', 'ast.dr', 137
+def _act_9 val
+    _ID, _, _fact_list, _, = *val 
      [_ID.value, _fact_list] 
 
-  end
-
-.,.,118754107756494.,.,
+end
+.,.,120998292227496.,.,
       
-module_eval <<-'.,.,118754107730627.,.,', 'ast_base.dr', 111
-  def _act_10 val
+module_eval <<-'.,.,120998292215500.,.,', 'ast.dr', 140
+def _act_10 val
      [] 
 
-  end
-
-.,.,118754107730627.,.,
+end
+.,.,120998292215500.,.,
       
-module_eval <<-'.,.,118754107717207.,.,', 'ast_base.dr', 112
-  def _act_11 val
-    _, _ = *val 
+module_eval <<-'.,.,120998292236961.,.,', 'ast.dr', 141
+def _act_11 val
+    _, _, = *val 
      [] 
 
-  end
-
-.,.,118754107717207.,.,
+end
+.,.,120998292236961.,.,
       
-module_eval <<-'.,.,118754107738971.,.,', 'ast_base.dr', 113
-  def _act_12 val
-    _, _id_list, _ = *val 
+module_eval <<-'.,.,120998292252270.,.,', 'ast.dr', 142
+def _act_12 val
+    _, _id_list, _, = *val 
      _id_list 
 
-  end
-
-.,.,118754107738971.,.,
+end
+.,.,120998292252270.,.,
       
-module_eval <<-'.,.,118754107752060.,.,', 'ast_base.dr', 116
-  def _act_13 val
-    _fact = *val 
+module_eval <<-'.,.,120998292239043.,.,', 'ast.dr', 145
+def _act_13 val
+    _fact, = *val 
      [_fact] 
 
-  end
-
-.,.,118754107752060.,.,
+end
+.,.,120998292239043.,.,
       
-module_eval <<-'.,.,118754107715890.,.,', 'ast_base.dr', 117
-  def _act_14 val
-    _fact_list, _, _fact = *val 
+module_eval <<-'.,.,120998292235915.,.,', 'ast.dr', 146
+def _act_14 val
+    _fact_list, _, _fact, = *val 
      _fact_list.push _fact 
 
-  end
-
-.,.,118754107715890.,.,
+end
+.,.,120998292235915.,.,
       
-module_eval <<-'.,.,118754107746326.,.,', 'ast_base.dr', 120
-  def _act_15 val
-    _ID = *val 
+module_eval <<-'.,.,120998292224012.,.,', 'ast.dr', 149
+def _act_15 val
+    _ID, = *val 
      _ID.value 
 
-  end
-
-.,.,118754107746326.,.,
+end
+.,.,120998292224012.,.,
       
-module_eval <<-'.,.,11875410778315.,.,', 'ast_base.dr', 121
-  def _act_16 val
-    _, _ID = *val 
+module_eval <<-'.,.,120998292234792.,.,', 'ast.dr', 150
+def _act_16 val
+    _, _ID, = *val 
      '-' + _ID.value 
 
-  end
-
-.,.,11875410778315.,.,
+end
+.,.,120998292234792.,.,
       
-module_eval <<-'.,.,118754107752669.,.,', 'ast_base.dr', 124
-  def _act_17 val
-    _ID = *val 
+module_eval <<-'.,.,120998292214019.,.,', 'ast.dr', 153
+def _act_17 val
+    _ID, = *val 
      [ _ID.value ] 
 
-  end
-
-.,.,118754107752669.,.,
+end
+.,.,120998292214019.,.,
       
-module_eval <<-'.,.,118754107765360.,.,', 'ast_base.dr', 125
-  def _act_18 val
-    _id_list, _, _ID = *val 
+module_eval <<-'.,.,120998292250833.,.,', 'ast.dr', 154
+def _act_18 val
+    _id_list, _, _ID, = *val 
      _id_list.push _ID.value 
 
-  end
-
-.,.,118754107765360.,.,
+end
+.,.,120998292250833.,.,
       
-module_eval <<-'.,.,118754107744253.,.,', 'ast_base.dr', 128
-  def _act_19 val
+module_eval <<-'.,.,12099829221352.,.,', 'ast.dr', 157
+def _act_19 val
      {nil => Token['', 0]} 
 
-  end
-
-.,.,118754107744253.,.,
+end
+.,.,12099829221352.,.,
       
-module_eval <<-'.,.,118754107754433.,.,', 'ast_base.dr', 129
-  def _act_20 val
-    _ACTION = *val 
+module_eval <<-'.,.,120998292263848.,.,', 'ast.dr', 158
+def _act_20 val
+    _ACTION, = *val 
      {nil => _ACTION} 
 
-  end
-
-.,.,118754107754433.,.,
+end
+.,.,120998292263848.,.,
       
-module_eval <<-'.,.,1187541077547.,.,', 'ast_base.dr', 131
-  def _act_21 val
-    _pass_action_list = *val 
-
-        Hash.new(_pass_action_list).marge({nil => Token['', 0]})
+module_eval <<-'.,.,12099829226375.,.,', 'ast.dr', 160
+def _act_21 val
+    _pass_action_list, = *val 
 
-  end
+        Hash[ *_pass_action_list.flatten ].merge({nil => Token['', 0]})
 
-.,.,1187541077547.,.,
+end
+.,.,12099829226375.,.,
       
-module_eval <<-'.,.,118754107719437.,.,', 'ast_base.dr', 136
-  def _act_22 val
-    _pass_action = *val 
-     _pass_action 
+module_eval <<-'.,.,120998292257313.,.,', 'ast.dr', 165
+def _act_22 val
+    _pass_action, = *val 
+     [ _pass_action ] 
 
-  end
-
-.,.,118754107719437.,.,
+end
+.,.,120998292257313.,.,
       
-module_eval <<-'.,.,118754107742276.,.,', 'ast_base.dr', 137
-  def _act_23 val
-    _pass_action_list, _pass_action = *val 
+module_eval <<-'.,.,120998292225817.,.,', 'ast.dr', 166
+def _act_23 val
+    _pass_action_list, _pass_action, = *val 
      _pass_action_list << _pass_action 
 
-  end
-
-.,.,118754107742276.,.,
+end
+.,.,120998292225817.,.,
       
-module_eval <<-'.,.,118754107745765.,.,', 'ast_base.dr', 141
-  def _act_24 val
-    _, _ID, _, _ACTION = *val 
+module_eval <<-'.,.,120998292244454.,.,', 'ast.dr', 170
+def _act_24 val
+    _, _ID, _, _ACTION, = *val 
      [_ID.value, _ACTION]
 
-  end
-
-.,.,118754107745765.,.,
+end
+.,.,120998292244454.,.,
       
 end
       
 
 ###
-### ASTBuilderBaseExtension_postrhs - Part of Depager Extension (slave)
+### ASTBuilderExtension_postrhs - Part of Depager Extension (slave)
 ###
-module D4ASTBuilderBaseExtension_postrhs #:nodoc:all
+module D4ASTBuilderExtension_postrhs #:nodoc:all
 end
 
-class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
+class ASTBuilderExtension_postrhs < Depager::LALR::Basis #:nodoc:all
   include Depager::ExtensionUtils
   
 
   ### Reduce Table
   reduce_table = [
     [ -1, 1 ],
-    [ 0, 2 ],
+    [ 0, 1 ],
     [ 2, 3 ],
     [ 2, 4 ],
     [ 3, 1 ],
@@ -762,6 +765,7 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
     [ 4, 1 ],
     [ 4, 1 ],
     [ 4, 1 ],
+    [ 4, 1 ],
     [ 6, 0 ],
     [ 6, 1 ],
     [ 5, 2 ],
@@ -777,16 +781,16 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
   t2i = {
     nil => 0, 
     false => 1, 
-    :EG => 2, 
-    :ID => 3, 
-    "(" => 4, 
-    ")" => 5, 
-    "," => 6, 
-    :CONST => 7, 
-    :SYMBOL => 8, 
-    :STR => 9, 
-    :NIL => 10, 
-    :NUMBER => 11, 
+    :ID => 2, 
+    "(" => 3, 
+    ")" => 4, 
+    "," => 5, 
+    :CONST => 6, 
+    :SYMBOL => 7, 
+    :STR => 8, 
+    :NILNODE => 9, 
+    :NUMBER => 10, 
+    :NIL => 11, 
     :EMBED => 12, 
     "[" => 13, 
     "]" => 14, 
@@ -797,7 +801,6 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
   i2t = [
     nil, 
     false, 
-    :EG, 
     :ID, 
     "(", 
     ")", 
@@ -805,8 +808,9 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
     :CONST, 
     :SYMBOL, 
     :STR, 
-    :NIL, 
+    :NILNODE, 
     :NUMBER, 
+    :NIL, 
     :EMBED, 
     "[", 
     "]", 
@@ -815,66 +819,66 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
   ]
   ### Action Table
   action_table = [
-    [ nil, nil, 2, 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, ], 
     [ ACC, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, 5, nil, nil, nil, 12, 3, 6, 8, 10, nil, 13, 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, 14, 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, 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, 17, 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, 5, nil, nil, nil, 12, 3, 6, 8, 10, nil, 13, 19, nil, nil, ], 
-    [ nil, nil, nil, 5, nil, 22, nil, 12, 3, 6, 8, 10, nil, 13, 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, 5, nil, nil, nil, 12, 3, 6, 8, 10, nil, 13, nil, nil, nil, ], 
-    [ nil, nil, nil, 5, nil, nil, nil, 12, 3, 6, 8, 10, 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, 17, 18, ], 
-    [ nil, nil, nil, nil, nil, nil, 27, nil, nil, nil, nil, nil, nil, nil, 26, 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, 28, 27, 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, 5, nil, nil, nil, 12, 3, 6, 8, 10, 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, 17, 18, ], 
+    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, 14, 15, ], 
   ]
   ### Default Reduce Table
   defred_table = [
     nil, 
     nil, 
-    nil, 
-    -11, 
+    -1, 
     -6, 
-    -15, 
-    -12, 
+    -7, 
     -8, 
+    -16, 
+    -10, 
+    -11, 
+    -12, 
     -13, 
-    -1, 
     -14, 
-    -7, 
-    -10, 
+    -15, 
+    nil, 
     nil, 
     nil, 
     -9, 
-    -16, 
+    -17, 
     nil, 
+    -18, 
     nil, 
-    -17, 
     -4, 
-    nil, 
+    -20, 
+    -21, 
     -2, 
     nil, 
     -19, 
-    -20, 
-    -18, 
     nil, 
     -3, 
     -5, 
@@ -883,30 +887,30 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
     nil, 
     nil, 
     nil, 
-    -11, 
     -6, 
+    -7, 
+    -8, 
     nil, 
+    -10, 
+    -11, 
     -12, 
-    -8, 
     -13, 
-    nil, 
     -14, 
-    -7, 
-    -10, 
+    -15, 
+    nil, 
     nil, 
     nil, 
     -9, 
-    -16, 
+    -17, 
+    nil, 
+    -18, 
     nil, 
     nil, 
-    -17, 
     nil, 
     nil, 
     -2, 
     nil, 
     -19, 
-    -20, 
-    -18, 
     nil, 
     -3, 
     nil, 
@@ -933,26 +937,25 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
   ]
   ### Goto Table
   goto_table = [ 
-   [ 1, nil, nil, nil, nil, nil, nil, ], 
+   [ 1, 2, 4, nil, 3, 5, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, 9, 11, nil, 4, 7, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, nil, nil, nil, 15, ], 
    [ 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, 20, 11, 21, 4, 7, nil, ], 
-   [ nil, 20, 11, 23, 4, 7, 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, 24, 11, nil, 4, 7, nil, ], 
-   [ nil, 25, 11, nil, 4, 7, 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, ], 
@@ -960,7 +963,8 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
    [ nil, nil, nil, nil, nil, nil, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, 29, 11, nil, 4, 7, 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, ], 
   ]
@@ -975,11 +979,20 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
     @g_parser = @p = p
     @master   = @m = master
     @nparam   = nparam
-    @dect     = D4ASTBuilderBaseExtension_postrhs::NVAction.new(self)
+    @dect     = D4ASTBuilderExtension_postrhs::NVAction.new(self)
     init_parser
   end
 
   
+  def do_parse?
+    if @line =~ /^\s*=>/
+       @line = $' 
+      true
+    else
+      false
+    end
+  end
+  
 
   def banner
     "=>... / #{@master.class.name}" 
@@ -1007,11 +1020,6 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
                  yield _Token(:LL, $&)          
 
         
-          when /\A=>/
-            @oldline = @line; @line = $'
-                 yield _Token(:EG, $&)          
-
-        
           when /\A%([a-zA-Z0-9_]+)((::[a-zA-Z0-9_]+)*)/
             @oldline = @line; @line = $'
                  yield _Token(:CONST, $1+$2)    
@@ -1027,6 +1035,11 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
                  yield _Token(:NIL, $&)         
 
         
+          when /\ANilNode/
+            @oldline = @line; @line = $'
+                 yield _Token(:NILNODE, $&)     
+
+        
           when /\A[0-9]+/
             @oldline = @line; @line = $'
                  yield _Token(:NUMBER, $&.to_i) 
@@ -1059,14 +1072,20 @@ class ASTBuilderBaseExtension_postrhs < Depager::LALR::Basis #:nodoc:all
             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 D4ASTBuilderBaseExtension_postrhs::NVAction < Depager::LALR::Action #:nodoc:all
+class D4ASTBuilderExtension_postrhs::NVAction < Depager::LALR::Action #:nodoc:all
   include Depager::DecoratorUtils
-  
+  []
   on_reduce = [
     nil,
               :_act_0,
@@ -1089,6 +1108,7 @@ class D4ASTBuilderBaseExtension_postrhs::NVAction < Depager::LALR::Action #:nodo
   :_act_17,
   :_act_18,
   :_act_19,
+  :_act_20,
 
   ]
   Tables = [on_reduce]
@@ -1099,31 +1119,29 @@ class D4ASTBuilderBaseExtension_postrhs::NVAction < Depager::LALR::Action #:nodo
   end
   
 
-module_eval <<-'.,.,118754107714013.,.,', 'ast_base.dr', 170
-  def _act_0 val
-    _EG, _fnl = *val 
+module_eval <<-'.,.,120998292239108.,.,', 'ast.dr', 207
+def _act_0 val
+    _fnl, = *val 
 
         n = master.nrules
         master.optouter <<
-          master.gen_defm_code("_ast_#{n} val", _fnl, _EG.lineno)
+          master.gen_defm_code("_ast_#{n} val", _fnl, basis.file.lineno)
         master.on_reduce[n] = ":_ast_#{n}"
 
-  end
-
-.,.,118754107714013.,.,
+end
+.,.,120998292239108.,.,
       
-module_eval <<-'.,.,118754107760130.,.,', 'ast_base.dr', 178
-  def _act_1 val
-    _ID, _, _ = *val 
+module_eval <<-'.,.,120998292255540.,.,', 'ast.dr', 215
+def _act_1 val
+    _ID, _, _, = *val 
      "Node_#{_ID.value}.new(basis.file.lineno)" 
 
-  end
-
-.,.,118754107760130.,.,
+end
+.,.,120998292255540.,.,
       
-module_eval <<-'.,.,118754107725185.,.,', 'ast_base.dr', 180
-  def _act_2 val
-    _ID, _, _fnlpair, _ = *val 
+module_eval <<-'.,.,120998292239123.,.,', 'ast.dr', 217
+def _act_2 val
+    _ID, _, _fnlpair, _, = *val 
 
         if g_parser.rhs.size > 0
           "Node_#{_ID.value}.new(val[0].lineno, #{_fnlpair.join(', ')})" 
@@ -1131,143 +1149,136 @@ module_eval <<-'.,.,118754107725185.,.,', 'ast_base.dr', 180
           "Node_#{_ID.value}.new(basis.file.lineno, #{_fnlpair.join(', ')})" 
         end
 
-  end
-
-.,.,118754107725185.,.,
+end
+.,.,120998292239123.,.,
       
-module_eval <<-'.,.,118754107718708.,.,', 'ast_base.dr', 189
-  def _act_3 val
-    _fnl = *val 
+module_eval <<-'.,.,120998292218775.,.,', 'ast.dr', 226
+def _act_3 val
+    _fnl, = *val 
      [_fnl] 
 
-  end
-
-.,.,118754107718708.,.,
+end
+.,.,120998292218775.,.,
       
-module_eval <<-'.,.,118754107758988.,.,', 'ast_base.dr', 190
-  def _act_4 val
-    _fnlpair, _, _fnl = *val 
+module_eval <<-'.,.,120998292219935.,.,', 'ast.dr', 227
+def _act_4 val
+    _fnlpair, _, _fnl, = *val 
      _fnlpair << _fnl 
 
-  end
-
-.,.,118754107758988.,.,
+end
+.,.,120998292219935.,.,
       
-module_eval <<-'.,.,118754107723770.,.,', 'ast_base.dr', 193
-  def _act_5 val
-    _fact = *val 
+module_eval <<-'.,.,120998292237800.,.,', 'ast.dr', 230
+def _act_5 val
+    _fact, = *val 
      _fact 
 
-  end
-
-.,.,118754107723770.,.,
+end
+.,.,120998292237800.,.,
       
-module_eval <<-'.,.,118754107750177.,.,', 'ast_base.dr', 194
-  def _act_6 val
-    _node = *val 
+module_eval <<-'.,.,12099829227551.,.,', 'ast.dr', 231
+def _act_6 val
+    _node, = *val 
      _node 
 
-  end
-
-.,.,118754107750177.,.,
+end
+.,.,12099829227551.,.,
       
-module_eval <<-'.,.,118754107731712.,.,', 'ast_base.dr', 195
-  def _act_7 val
-    _list = *val 
+module_eval <<-'.,.,120998292244492.,.,', 'ast.dr', 232
+def _act_7 val
+    _list, = *val 
      _list 
 
-  end
-
-.,.,118754107731712.,.,
+end
+.,.,120998292244492.,.,
       
-module_eval <<-'.,.,118754107736385.,.,', 'ast_base.dr', 199
-  def _act_8 val
-    _ID, _opt_embed = *val 
+module_eval <<-'.,.,120998292242233.,.,', 'ast.dr', 236
+def _act_8 val
+    _ID, _opt_embed, = *val 
 
-        unless i = g_parser.name_to_rhs_index(val[0].value)
-          warn "#{g_parser.lineno}: ?#{val[0].value}"
+        unless i = g_parser.name_to_rhs_index(_ID.value)
+          warn "#{g_parser.lineno}: ?#{_ID.value}"
           raise
         end
         "val[#{i}]#{val[1]}"
 
-  end
-
-.,.,118754107736385.,.,
+end
+.,.,120998292242233.,.,
       
-module_eval <<-'.,.,118754107744168.,.,', 'ast_base.dr', 206
-  def _act_9 val
-    _CONST = *val 
+module_eval <<-'.,.,120998292219954.,.,', 'ast.dr', 243
+def _act_9 val
+    _CONST, = *val 
      "Depager::Token[#{_CONST.value}]" 
 
-  end
-
-.,.,118754107744168.,.,
+end
+.,.,120998292219954.,.,
       
-module_eval <<-'.,.,118754107728765.,.,', 'ast_base.dr', 207
-  def _act_10 val
-    _SYMBOL = *val 
+module_eval <<-'.,.,120998292251058.,.,', 'ast.dr', 244
+def _act_10 val
+    _SYMBOL, = *val 
      "Depager::Token[#{_SYMBOL.value}]" 
 
-  end
-
-.,.,118754107728765.,.,
+end
+.,.,120998292251058.,.,
       
-module_eval <<-'.,.,118754107732274.,.,', 'ast_base.dr', 208
-  def _act_11 val
-    _STR = *val 
+module_eval <<-'.,.,120998292253260.,.,', 'ast.dr', 245
+def _act_11 val
+    _STR, = *val 
      "Depager::Token['#{_STR.value}']" 
 
-  end
-
-.,.,118754107732274.,.,
+end
+.,.,120998292253260.,.,
       
-module_eval <<-'.,.,11875410774520.,.,', 'ast_base.dr', 209
-  def _act_12 val
-    _NIL = *val 
-     "nil" 
+module_eval <<-'.,.,120998292210497.,.,', 'ast.dr', 246
+def _act_12 val
+    _NILNODE, = *val 
+     "NilNode.new(basis.file.lineno)" 
 
-  end
-
-.,.,11875410774520.,.,
+end
+.,.,120998292210497.,.,
       
-module_eval <<-'.,.,118754107711537.,.,', 'ast_base.dr', 210
-  def _act_13 val
-    _NUMBER = *val 
+module_eval <<-'.,.,120998292239142.,.,', 'ast.dr', 247
+def _act_13 val
+    _NUMBER, = *val 
      "Depager::Token[#{_NUMBER.value}]" 
 
-  end
+end
+.,.,120998292239142.,.,
+      
+module_eval <<-'.,.,120998292241721.,.,', 'ast.dr', 248
+def _act_14 val
+    _NIL, = *val 
+     "nil" 
 
-.,.,118754107711537.,.,
+end
+.,.,120998292241721.,.,
       
-module_eval <<-'.,.,118754107736080.,.,', 'ast_base.dr', 213
-  def _act_14 val
+module_eval <<-'.,.,120998292222707.,.,', 'ast.dr', 251
+def _act_15 val
      '' 
 
-  end
-
-.,.,118754107736080.,.,
+end
+.,.,120998292222707.,.,
       
-module_eval <<-'.,.,118754107755265.,.,', 'ast_base.dr', 214
-  def _act_15 val
-    _EMBED = *val 
+module_eval <<-'.,.,120998292213288.,.,', 'ast.dr', 252
+def _act_16 val
+    _EMBED, = *val 
      _EMBED.value 
 
-  end
-
-.,.,118754107755265.,.,
+end
+.,.,120998292213288.,.,
       
-module_eval <<-'.,.,11875410774449.,.,', 'ast_base.dr', 217
-  def _act_16 val
-    _, _ = *val 
+module_eval <<-'.,.,120998292244551.,.,', 'ast.dr', 255
+def _act_17 val
+    _, _, = *val 
      "NodeList.new(basis.file.lineno, [])" 
 
-  end
-
-.,.,11875410774449.,.,
+end
+.,.,120998292244551.,.,
       
-module_eval <<-'.,.,118754107747720.,.,', 'ast_base.dr', 219
-  def _act_17 val
-    _, _fnlpair, _ = *val 
+module_eval <<-'.,.,120998292244197.,.,', 'ast.dr', 257
+def _act_18 val
+    _, _fnlpair, _, = *val 
 
         if g_parser.rhs.size > 0
           "NodeList.new(val[0].lineno, [#{_fnlpair.join(', ')}])"
@@ -1275,27 +1286,24 @@ module_eval <<-'.,.,118754107747720.,.,', 'ast_base.dr', 219
           "NodeList.new(basis.file.lineno, #{_fnlpair.join(', ')})" 
         end
 
-  end
-
-.,.,118754107747720.,.,
+end
+.,.,120998292244197.,.,
       
-module_eval <<-'.,.,118754107749519.,.,', 'ast_base.dr', 226
-  def _act_18 val
-    _l, _LL, _r = *val 
+module_eval <<-'.,.,120998292253403.,.,', 'ast.dr', 264
+def _act_19 val
+    _l, _LL, _r, = *val 
      "#{_l}.push(#{_r})" 
 
-  end
-
-.,.,118754107749519.,.,
+end
+.,.,120998292253403.,.,
       
-module_eval <<-'.,.,118754107726284.,.,', 'ast_base.dr', 227
-  def _act_19 val
-    _l, _, _r = *val 
+module_eval <<-'.,.,12099829222596.,.,', 'ast.dr', 265
+def _act_20 val
+    _l, _, _r, = *val 
      "#{_l}.concat(#{_r})" 
 
-  end
-
-.,.,118754107726284.,.,
+end
+.,.,12099829222596.,.,
       
 end