depager 0.2.0 → 0.2.2

data/lib/depager/lr_put_table.rb

@@ -0,0 +1,116 @@
+class Depager::LALR::Table
+  def state_info
+    @state_info
+  end
+
+  #puts grammar.closure.values.join("\n")
+  #puts "-----"
+  #puts grammar.memo_closure1.sort_by{|k,v| k}.map{|k,v| "#{k.inspect}:\n#{v.join("\n")}"}
+  #puts 'mk'; mk.each{|k, v| p "#{k}=>#{v}"}
+  #trn = trn.uniq
+  #puts 'trn',trn.map{|a| "<#{a[2].n}>#{a[0]} => <#{a[3].n}>#{a[1]}"}
+
+  def gen_state_info
+    g = grammar
+    @state_info = []
+    @action_table.each_with_index {|s,x|
+      shi, red, acc = "", "", ""
+      s.each_with_index {|t, y|
+        next unless t
+        hd = ("  %-15s" % g.symname(y + g.nonterms.size))
+        if t == 'ACC'
+          acc = "#{hd} accept\n\n"
+        elsif t < 0
+          red << "#{hd} reduce using rule #{-t} (#{g.symname g[-t].lhs})\n"            
+        else
+          shi << "#{hd} shift, and goto to state #{t}\n"
+        end
+      }
+      if t = @defred_table[x]
+        as = @defred_after_shift_table[x] ? " [after shift]" : ""
+        red << ("  %-15s" % '$default') <<
+          "reduce using rule #{-t} (#{g.symname g[-t].lhs}) #{as}\n"
+      end
+
+      @state_info << (@states[x].to_s << "\n\n#{shi}\n#{red}\n#{acc}")
+    }
+  end
+
+  def verbose dp
+    g, output = grammar, []
+
+    if $MP_DEBUG.match(/f/)
+      output << "** FIRST1 **"
+      str = g.first1.map{|k, v|
+        "#{g.symname k} => #{v.map{|i| g.symname i}.join(' ')}"
+      }.join("\n")
+      output << "#{str}\n\n"
+    end
+
+    if $MP_DEBUG.match(/e/)
+      output << "** Empty Reduction **"
+      str = g.f0e.map {|k, v| 
+        "#{g.symname k} =>\n" << v.map{|n, f|
+          "  #{rulelist[n]} ? #{f.map{|i| g.symname i}.join(' ')}"
+        }.join("\n")
+      }.join("\n")
+      output << "#{str}\n\n"
+    end
+
+    if $MP_DEBUG.match(/s/)
+      output << "** SYMBOLS **"
+      str = g.syms.map{|k,_| "#{"%03i" % k} #{ g.symname k}"}.sort.join("\n")
+      output << "#{str}\n\n"
+    end
+
+    if $MP_DEBUG.match(/g/)
+      output << "*** Grammar ***"
+      str = g.rulelist.join("\n")
+      output << "#{str}\n\n"
+    end
+
+    if $MP_DEBUG.match(/c/)
+      output << "*** States ***"
+      output << @state_info.to_s
+    end
+
+    nssize = g.nonterms.size
+    if $MP_DEBUG.match(/t/)
+      output << "*** Action Table ***"
+      ws = (nssize...g.syms.size).map{|i| j = g.symname(i).size; j < 6 ? 6 : j}
+      str = "   |"
+      (nssize...g.syms.size).each_with_index{|i, x|
+        str << ("%0#{ws[x]}s|" % g.symname(i))
+      }; str << " $default|\n"
+      
+      @action_table.each_with_index{|i,x|
+        str << ("%03i|" % x)
+        i.each_with_index{|j, y|
+          str << ("%0#{ws[y]}s|" % j)
+        }
+        str << ("%04s,%04s|\n" % [@defred_table[x], @defred_after_shift_table[x]])
+      }
+      output << "#{str}\n\n"
+
+      output <<  "*** Goto Table ***"
+      ws = (1...nssize).map{|i| j = g.symname(i).size; j < 6 ? 6 : j}
+      str = "   |"
+      (1...nssize).each_with_index{|i, x|
+        str << ("%0#{ws[x]}s|" % g.symname(i))
+      }; str << "\n"
+      
+      @goto_table.each_with_index{|i,x|
+        str << ("%03i|" % x)
+        i.each_with_index{|j, y|
+          str << ("%0#{ws[y]}s|" % j)
+        }
+        str << "\n"
+      }
+      output << "#{str}\n\n"
+    end
+
+    File.open("#{File.basename(dp.files.fname, '.dr')}.output", "w"){|f|
+      f.write output.join("\n") 
+    }
+  end
+end

data/lib/depager/nvaction.rb

@@ -14,7 +14,7 @@ class NVActionExtension < ActionExtension #:nodoc:all
           '_'
         end
       end
-      let_code = "    #{let_code.join(', ')} = *val \n"
+      let_code = "    #{let_code.join(', ')}, = *val \n"
     end
     return let_code << code, 1
   end

data/lib/depager/parser.rb

@@ -1,5 +1,4 @@
-require "depager/utils.rb"
-
+module Depager; end
 #
 # Token
 # 
@@ -104,6 +103,28 @@ module Depager::LALR
     end
     def reduce
     end
+
+    def enable?(act, sym)
+      case act
+      when :shift
+        la = @basis.t2i[sym] || @basis.t2i[false]
+        val = @basis.action_table[@basis.stack.last][la]
+      else
+      end
+    end
+
+    def enables(act, sym)
+      case act
+      when :shift
+        la = @basis.t2i[sym] || @basis.t2i[false]
+        res = []
+        @basis.action_table.each_with_index{|i, x|
+          i[la] and res.push(x)
+        }
+        return res
+      else
+      end
+    end
   end
 
   class Basis < Parser

data/lib/depager/slex.dr

@@ -106,7 +106,7 @@
           ll << %{
             def lex_#{m}(&block)
               case @line
-                #{l.map{|i| ' '*4+i}}
+                #{l}
               else
                 #{else_code}
               end
@@ -140,7 +140,7 @@
     | ':' ID                      { _ID.value }
   ;
   lexactlist:
-      lexact            { [ _lexact ] }
+      lexact            { _lexact }
     | lexactlist lexact { _lexactlist << _lexact }
   ;
   lexact:
@@ -159,7 +159,7 @@
   ;
   lexlist:
       LEX               { [ _LEX.value ] }
-    | lexlist ',' LEX   { _lexlist.push _LEX }
+    | lexlist ',' LEX   { _lexlist.push _LEX.value }
   ;
 #end-rule
 %%

data/lib/depager/slex.rb

@@ -31,10 +31,10 @@ class StatefulLexerExtension #:nodoc:all
     
     @hook[1] = StatefulLexerExtension_prerhs_postsymbol.new(p, @nparam, self)
     @h2p['prerhs_postsymbol'] = @hook[1] 
-    p.postsymbol.push [@hook[1], :do_parse]
+    p.prerhs.push [@hook[1], :do_parse]
     
     # use @hook[1](StatefulLexerExtension_prerhs_postsymbol)
-    p.prerhs.push [@hook[1], :do_parse]
+    p.postsymbol.push [@hook[1], :do_parse]
     
     regext p
   end
@@ -170,20 +170,20 @@ class StatefulLexerExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
   action_table = [
     [ nil, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
     [ ACC, nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, 3, 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, 6, nil, ], 
-    [ nil, nil, nil, nil, nil, 11, 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, nil, 8, nil, ], 
+    [ nil, nil, nil, 9, nil, nil, 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, nil, nil, nil, 12, nil, 13, ], 
-    [ nil, nil, nil, nil, nil, nil, nil, nil, 6, nil, ], 
-    [ nil, nil, nil, nil, 16, 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, 18, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, 19, 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, 17, nil, ], 
+    [ nil, nil, nil, nil, 18, nil, nil, nil, nil, nil, ], 
+    [ nil, nil, nil, 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, ], 
@@ -196,21 +196,21 @@ class StatefulLexerExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
     -1, 
     nil, 
     nil, 
-    -5, 
-    -12, 
+    -3, 
     -7, 
     -10, 
-    -3, 
-    nil, 
+    -12, 
+    -5, 
+    -8, 
     nil, 
     -11, 
     nil, 
     nil, 
-    -8, 
+    nil, 
+    -9, 
+    -13, 
     -4, 
     -6, 
-    -13, 
-    -9, 
   ]
   defred_after_shift_table = [
     -2, 
@@ -219,20 +219,20 @@ class StatefulLexerExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
     nil, 
     nil, 
     nil, 
-    -12, 
     -7, 
     nil, 
+    -12, 
     nil, 
-    nil, 
+    -8, 
     nil, 
     -11, 
     nil, 
     nil, 
-    -8, 
+    nil, 
+    -9, 
+    -13, 
     -4, 
     -6, 
-    -13, 
-    -9, 
   ]
   ### Nonterm to Int
   nt2i = { 
@@ -260,14 +260,14 @@ class StatefulLexerExtension_prerulelist < Depager::LALR::Basis #:nodoc:all
   goto_table = [ 
    [ 1, 2, nil, nil, nil, nil, nil, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, 4, nil, nil, nil, nil, nil, ], 
+   [ nil, nil, 3, nil, nil, nil, nil, nil, ], 
+   [ nil, nil, nil, 5, nil, 6, 7, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, nil, ], 
-   [ nil, nil, nil, 9, nil, 7, 8, nil, ], 
-   [ nil, nil, nil, nil, 10, nil, nil, nil, ], 
+   [ nil, nil, nil, nil, nil, 10, 7, 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, ], 
-   [ nil, nil, nil, nil, nil, nil, nil, 14, ], 
-   [ nil, nil, nil, nil, nil, 15, 8, nil, ], 
+   [ nil, nil, nil, nil, 14, nil, nil, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, nil, ], 
    [ nil, nil, nil, nil, nil, nil, nil, nil, ], 
@@ -368,8 +368,7 @@ end
 
 class D4StatefulLexerExtension_prerulelist::NVAction < Depager::LALR::Action #:nodoc:all
   include Depager::DecoratorUtils
-          include ActionParser
-
+  ["        include ActionParser\n"]
   on_reduce = [
     nil,
               :_act_0,
@@ -395,9 +394,9 @@ class D4StatefulLexerExtension_prerulelist::NVAction < Depager::LALR::Action #:n
   end
   
 
-module_eval <<-'.,.,118754107818868.,.,', 'slex.dr', 96
-  def _act_0 val
-    _mode_list = *val 
+module_eval <<-'.,.,120998292328650.,.,', 'slex.dr', 96
+def _act_0 val
+    _mode_list, = *val 
 
         ll = ''
         _mode_list.each do |m, s, l|
@@ -409,7 +408,7 @@ module_eval <<-'.,.,118754107818868.,.,', 'slex.dr', 96
           ll << %{
             def lex_#{m}(&block)
               case @line
-                #{l.map{|i| ' '*4+i}}
+                #{l}
               else
                 #{else_code}
               end
@@ -430,74 +429,66 @@ module_eval <<-'.,.,118754107818868.,.,', 'slex.dr', 96
           end
         }; #code
 
-  end
-
-.,.,118754107818868.,.,
+end
+.,.,120998292328650.,.,
       
-module_eval <<-'.,.,118754107863583.,.,', 'slex.dr', 130
-  def _act_1 val
+module_eval <<-'.,.,120998292354849.,.,', 'slex.dr', 130
+def _act_1 val
      [ ] 
 
-  end
-
-.,.,118754107863583.,.,
+end
+.,.,120998292354849.,.,
       
-module_eval <<-'.,.,118754107817072.,.,', 'slex.dr', 131
-  def _act_2 val
-    _mode_list, _mode, _lexactlist = *val 
+module_eval <<-'.,.,120998292352082.,.,', 'slex.dr', 131
+def _act_2 val
+    _mode_list, _mode, _lexactlist, = *val 
      _mode_list << [_mode[0], _mode[1], _lexactlist] 
 
-  end
-
-.,.,118754107817072.,.,
+end
+.,.,120998292352082.,.,
       
-module_eval <<-'.,.,118754107816434.,.,', 'slex.dr', 134
-  def _act_3 val
-    _, _ID, _opt_super, _ = *val 
+module_eval <<-'.,.,12099829232991.,.,', 'slex.dr', 134
+def _act_3 val
+    _, _ID, _opt_super, _, = *val 
      [ _ID.value, _opt_super ] 
 
-  end
-
-.,.,118754107816434.,.,
+end
+.,.,12099829232991.,.,
       
-module_eval <<-'.,.,118754107840777.,.,', 'slex.dr', 137
-  def _act_4 val
+module_eval <<-'.,.,12099829237562.,.,', 'slex.dr', 137
+def _act_4 val
      nil 
 
-  end
-
-.,.,118754107840777.,.,
+end
+.,.,12099829237562.,.,
       
-module_eval <<-'.,.,118754107819808.,.,', 'slex.dr', 138
-  def _act_5 val
-    _, _ID = *val 
+module_eval <<-'.,.,120998292348892.,.,', 'slex.dr', 138
+def _act_5 val
+    _, _ID, = *val 
      _ID.value 
 
-  end
-
-.,.,118754107819808.,.,
+end
+.,.,120998292348892.,.,
       
-module_eval <<-'.,.,118754107825523.,.,', 'slex.dr', 141
-  def _act_6 val
-    _lexact = *val 
-     [ _lexact ] 
+module_eval <<-'.,.,120998292360134.,.,', 'slex.dr', 141
+def _act_6 val
+    _lexact, = *val 
+     _lexact 
 
-  end
-
-.,.,118754107825523.,.,
+end
+.,.,120998292360134.,.,
       
-module_eval <<-'.,.,11875410787826.,.,', 'slex.dr', 142
-  def _act_7 val
-    _lexactlist, _lexact = *val 
+module_eval <<-'.,.,120998292332012.,.,', 'slex.dr', 142
+def _act_7 val
+    _lexactlist, _lexact, = *val 
      _lexactlist << _lexact 
 
-  end
-
-.,.,11875410787826.,.,
+end
+.,.,120998292332012.,.,
       
-module_eval <<-'.,.,118754107820340.,.,', 'slex.dr', 146
-  def _act_8 val
-    _lexlist, _opt_noskip, _ACTION = *val 
+module_eval <<-'.,.,12099829232968.,.,', 'slex.dr', 146
+def _act_8 val
+    _lexlist, _opt_noskip, _ACTION, = *val 
 
         %{
           when #{_lexlist.join(', ')}
@@ -505,44 +496,39 @@ module_eval <<-'.,.,118754107820340.,.,', 'slex.dr', 146
             #{ _ACTION.value }
         }; #code
 
-  end
-
-.,.,118754107820340.,.,
+end
+.,.,12099829232968.,.,
       
-module_eval <<-'.,.,118754107818518.,.,', 'slex.dr', 155
-  def _act_9 val
+module_eval <<-'.,.,120998292350935.,.,', 'slex.dr', 155
+def _act_9 val
      false 
 
-  end
-
-.,.,118754107818518.,.,
+end
+.,.,120998292350935.,.,
       
-module_eval <<-'.,.,118754107850066.,.,', 'slex.dr', 156
-  def _act_10 val
-    _ = *val 
+module_eval <<-'.,.,120998292356440.,.,', 'slex.dr', 156
+def _act_10 val
+    _, = *val 
      true  
 
-  end
-
-.,.,118754107850066.,.,
+end
+.,.,120998292356440.,.,
       
-module_eval <<-'.,.,118754107825362.,.,', 'slex.dr', 159
-  def _act_11 val
-    _LEX = *val 
+module_eval <<-'.,.,120998292318605.,.,', 'slex.dr', 159
+def _act_11 val
+    _LEX, = *val 
      [ _LEX.value ] 
 
-  end
-
-.,.,118754107825362.,.,
+end
+.,.,120998292318605.,.,
       
-module_eval <<-'.,.,118754107856852.,.,', 'slex.dr', 160
-  def _act_12 val
-    _lexlist, _, _LEX = *val 
-     _lexlist.push _LEX 
-
-  end
+module_eval <<-'.,.,120998292362428.,.,', 'slex.dr', 160
+def _act_12 val
+    _lexlist, _, _LEX, = *val 
+     _lexlist.push _LEX.value 
 
-.,.,118754107856852.,.,
+end
+.,.,120998292362428.,.,
       
 end
       
@@ -598,21 +584,21 @@ class StatefulLexerExtension_prerhs_postsymbol < Depager::LALR::Basis #:nodoc:al
   ]
   ### Action Table
   action_table = [
-    [ nil, nil, 1, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, 7, nil, 3, 4, ], 
+    [ nil, nil, 2, nil, nil, nil, nil, nil, nil, ], 
     [ ACC, nil, nil, nil, nil, nil, nil, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, 8, nil, nil, ], 
-    [ nil, nil, nil, nil, nil, nil, 9, nil, nil, ], 
-    [ nil, nil, nil, 10, 11, 7, nil, 3, 4, ], 
+    [ nil, nil, nil, nil, nil, 5, nil, 6, 7, ], 
+    [ nil, nil, nil, 8, 10, 5, nil, 6, 7, ], 
     [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, 11, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, 12, nil, nil, ], 
     [ nil, nil, nil, nil, nil, 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, 14, nil, nil, nil, nil, nil, ], 
     [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
     [ nil, nil, nil, 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 = [
@@ -620,16 +606,16 @@ class StatefulLexerExtension_prerhs_postsymbol < Depager::LALR::Basis #:nodoc:al
     nil, 
     nil, 
     nil, 
+    -3, 
     nil, 
     nil, 
-    -3, 
     nil, 
-    -6, 
-    -7, 
     -1, 
-    nil, 
     -4, 
+    nil, 
     -5, 
+    -6, 
+    -7, 
     -2, 
   ]
   defred_after_shift_table = [
@@ -637,16 +623,16 @@ class StatefulLexerExtension_prerhs_postsymbol < Depager::LALR::Basis #:nodoc:al
     nil, 
     nil, 
     nil, 
+    -3, 
     nil, 
     nil, 
-    -3, 
     nil, 
-    -6, 
-    -7, 
     -1, 
-    nil, 
     -4, 
+    nil, 
     -5, 
+    -6, 
+    -7, 
     -2, 
   ]
   ### Nonterm to Int
@@ -663,12 +649,12 @@ class StatefulLexerExtension_prerhs_postsymbol < Depager::LALR::Basis #:nodoc:al
   ]
   ### Goto Table
   goto_table = [ 
-   [ 2, nil, nil, ], 
-   [ nil, 5, 6, ], 
+   [ 1, nil, nil, ], 
    [ nil, nil, nil, ], 
+   [ nil, 3, 4, ], 
+   [ nil, nil, 9, ], 
    [ nil, nil, nil, ], 
    [ nil, nil, nil, ], 
-   [ nil, nil, 12, ], 
    [ nil, nil, nil, ], 
    [ nil, nil, nil, ], 
    [ nil, nil, nil, ], 
@@ -750,7 +736,7 @@ end
 
 class D4StatefulLexerExtension_prerhs_postsymbol::NVAction < Depager::LALR::Action #:nodoc:all
   include Depager::DecoratorUtils
-  
+  []
   on_reduce = [
     nil,
               :_act_0,
@@ -770,70 +756,63 @@ class D4StatefulLexerExtension_prerhs_postsymbol::NVAction < Depager::LALR::Acti
   end
   
 
-module_eval <<-'.,.,11875410786796.,.,', 'slex.dr', 180
-  def _act_0 val
-    _, _option_list, _ = *val 
+module_eval <<-'.,.,120998292310380.,.,', 'slex.dr', 180
+def _act_0 val
+    _, _option_list, _, = *val 
 
         master.ins.push [g_parser.rhs.size, _option_list, false]
 
-  end
-
-.,.,11875410786796.,.,
+end
+.,.,120998292310380.,.,
       
-module_eval <<-'.,.,118754107862281.,.,', 'slex.dr', 184
-  def _act_1 val
-    _, _option_list, _, _ = *val 
+module_eval <<-'.,.,120998292354182.,.,', 'slex.dr', 184
+def _act_1 val
+    _, _option_list, _, _, = *val 
 
         master.ins.push [g_parser.rhs.size, _option_list, true]
 
-  end
-
-.,.,118754107862281.,.,
+end
+.,.,120998292354182.,.,
       
-module_eval <<-'.,.,118754107859502.,.,', 'slex.dr', 190
-  def _act_2 val
-    _option = *val 
+module_eval <<-'.,.,120998292345458.,.,', 'slex.dr', 190
+def _act_2 val
+    _option, = *val 
      [_option] 
 
-  end
-
-.,.,118754107859502.,.,
+end
+.,.,120998292345458.,.,
       
-module_eval <<-'.,.,118754107825820.,.,', 'slex.dr', 191
-  def _act_3 val
-    _option_list, _option = *val 
+module_eval <<-'.,.,120998292359833.,.,', 'slex.dr', 191
+def _act_3 val
+    _option_list, _option, = *val 
      _option_list << _option 
 
-  end
-
-.,.,118754107825820.,.,
+end
+.,.,120998292359833.,.,
       
-module_eval <<-'.,.,118754107852027.,.,', 'slex.dr', 194
-  def _act_4 val
-    _, _SYMBOL = *val 
+module_eval <<-'.,.,120998292340459.,.,', 'slex.dr', 194
+def _act_4 val
+    _, _SYMBOL, = *val 
      [:GOTO, _SYMBOL.value] 
 
-  end
-
-.,.,118754107852027.,.,
+end
+.,.,120998292340459.,.,
       
-module_eval <<-'.,.,118754107811272.,.,', 'slex.dr', 195
-  def _act_5 val
-    _, _SYMBOL = *val 
+module_eval <<-'.,.,120998292339947.,.,', 'slex.dr', 195
+def _act_5 val
+    _, _SYMBOL, = *val 
      [:ADD, _SYMBOL.value]  
 
-  end
-
-.,.,118754107811272.,.,
+end
+.,.,120998292339947.,.,
       
-module_eval <<-'.,.,118754107839236.,.,', 'slex.dr', 196
-  def _act_6 val
-    _, _SYMBOL = *val 
+module_eval <<-'.,.,120998292319195.,.,', 'slex.dr', 196
+def _act_6 val
+    _, _SYMBOL, = *val 
      [:SUB, _SYMBOL.value]  
 
-  end
-
-.,.,118754107839236.,.,
+end
+.,.,120998292319195.,.,
       
 end