depager 0.1.9 → 0.2.0

data/examples/sample_calc/calc.tab.rb

@@ -0,0 +1,183 @@
+
+begin; require 'rubygems'; rescue Exception; end
+require 'depager/parser.rb'
+
+
+module D4TinyCalc
+end
+
+class TinyCalc < Depager::LALR::Basis
+  
+
+  ### Reduce Table
+  reduce_table = [
+    [   -1,    1 ], # (  0) $start : expr
+    [    0,    3 ], # (  1) expr : expr + term
+    [    0,    3 ], # (  2) expr : expr - term
+    [    0,    1 ], # (  3) expr : term
+    [    1,    3 ], # (  4) term : term * fact
+    [    1,    3 ], # (  5) term : term / fact
+    [    1,    1 ], # (  6) term : fact
+    [    2,    1 ], # (  7) fact : NUM
+    [    2,    3 ], # (  8) fact : ( expr )
+  ]
+  ### Extension Params
+  nparams = {
+  }
+  ### Term to Int
+  t2i = {
+    nil => 0, 
+    false => 1, 
+    "+" => 2, 
+    "-" => 3, 
+    "*" => 4, 
+    "/" => 5, 
+    :NUM => 6, 
+    "(" => 7, 
+    ")" => 8, 
+  }
+  ### Int to Term
+  i2t = [
+    nil, 
+    false, 
+    "+", 
+    "-", 
+    "*", 
+    "/", 
+    :NUM, 
+    "(", 
+    ")", 
+  ]
+  ### Action Table
+  action_table = [
+    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
+    [ ACC, nil, 7, 8, nil, nil, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, 9, 10, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
+    [ nil, nil, 7, 8, nil, nil, nil, nil, 11, ], 
+    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, 5, 1, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, 9, 10, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, 9, 10, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
+  ]
+  ### Default Reduce Table
+  defred_table = [
+    nil, 
+    nil, 
+    nil, 
+    -3, 
+    -6, 
+    -7, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    -8, 
+    -1, 
+    -2, 
+    -4, 
+    -5, 
+  ]
+  defred_after_shift_table = [
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    -6, 
+    -7, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    -8, 
+    nil, 
+    nil, 
+    -4, 
+    -5, 
+  ]
+  ### Nonterm to Int
+  nt2i = { 
+    :expr => 0,  
+    :term => 1,  
+    :fact => 2, 
+  }
+  ### Int to Nonterm
+  i2nt = [
+    :expr, 
+    :term, 
+    :fact, 
+  ]
+  ### Goto Table
+  goto_table = [ 
+   [ 2, 3, 4, ], 
+   [ 6, 3, 4, ], 
+   [ nil, nil, nil, ], 
+   [ nil, nil, nil, ], 
+   [ nil, nil, nil, ], 
+   [ nil, nil, nil, ], 
+   [ nil, nil, nil, ], 
+   [ nil, 12, 4, ], 
+   [ nil, 13, 4, ], 
+   [ nil, nil, 14, ], 
+   [ nil, nil, 15, ], 
+   [ nil, nil, nil, ], 
+   [ nil, nil, nil, ], 
+   [ nil, nil, nil, ], 
+   [ nil, nil, nil, ], 
+   [ nil, nil, nil, ], 
+  ]
+
+  Tables = [ reduce_table, nparams, action_table,
+             defred_table, defred_after_shift_table, goto_table,
+             t2i, i2t, nt2i, i2nt ]
+
+  def self.createDecoratedParser
+    TinyCalc.new()
+  end
+
+  ### Inner Code
+  def lex
+    until @file.eof?
+      @line = @file.gets
+      until @line.empty? do
+        case @line
+        when /\A\s+/, /\A\#.*/, /\A\n/
+          #skip blank and comment
+        when /\A[0-9]+/
+          yield :NUM, $&
+        when /\A./
+          yield $&, $&
+        else
+          raise RuntimeError, "must not happen #{line}"
+        end
+        @line = $'
+      end
+    end
+    yield nil, nil
+  end
+
+end
+
+### Outer Code
+
+
+def createDecoratedTinyCalc
+  TinyCalc.new()
+end
+
+### main
+if __FILE__ == $0
+### Main Code
+parser = TinyCalc.new()
+parser.yyparse(STDIN)
+
+end

data/examples/sample_calc/calc_prec.nvaction.tab.rb

@@ -0,0 +1,257 @@
+
+begin; require 'rubygems'; rescue Exception; end
+require 'depager/parser.rb'
+
+
+module D4TinyCalc
+end
+
+class TinyCalc < Depager::LALR::Basis
+  
+
+  ### Reduce Table
+  reduce_table = [
+    [   -1,    1 ], # (  0) $start : expr
+    [    0,    3 ], # (  1) expr : expr + expr
+    [    0,    3 ], # (  2) expr : expr - expr
+    [    0,    3 ], # (  3) expr : expr * expr
+    [    0,    3 ], # (  4) expr : expr / expr
+    [    0,    3 ], # (  5) expr : ( expr )
+    [    0,    1 ], # (  6) expr : NUM
+  ]
+  ### Extension Params
+  nparams = {
+    'NVAction' => 2, 
+  }
+  ### Term to Int
+  t2i = {
+    nil => 0, 
+    false => 1, 
+    "+" => 2, 
+    "-" => 3, 
+    "*" => 4, 
+    "/" => 5, 
+    "(" => 6, 
+    ")" => 7, 
+    :NUM => 8, 
+  }
+  ### Int to Term
+  i2t = [
+    nil, 
+    false, 
+    "+", 
+    "-", 
+    "*", 
+    "/", 
+    "(", 
+    ")", 
+    :NUM, 
+  ]
+  ### Action Table
+  action_table = [
+    [ nil, nil, nil, nil, nil, nil, 2, nil, 3, ], 
+    [ ACC, nil, 7, 4, 5, 6, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, 2, nil, 3, ], 
+    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, 2, nil, 3, ], 
+    [ nil, nil, nil, nil, nil, nil, 2, nil, 3, ], 
+    [ nil, nil, nil, nil, nil, nil, 2, nil, 3, ], 
+    [ nil, nil, nil, nil, nil, nil, 2, nil, 3, ], 
+    [ nil, nil, 7, 4, 5, 6, nil, 13, nil, ], 
+    [ nil, nil, nil, nil, 5, 6, nil, 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, 6, nil, nil, nil, ], 
+    [ nil, nil, nil, nil, nil, nil, nil, nil, nil, ], 
+  ]
+  ### Default Reduce Table
+  defred_table = [
+    nil, 
+    nil, 
+    nil, 
+    -6, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    -2, 
+    -3, 
+    -4, 
+    -1, 
+    -5, 
+  ]
+  defred_after_shift_table = [
+    nil, 
+    nil, 
+    nil, 
+    -6, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    nil, 
+    -3, 
+    -4, 
+    nil, 
+    -5, 
+  ]
+  ### Nonterm to Int
+  nt2i = { 
+    :expr => 0, 
+  }
+  ### Int to Nonterm
+  i2nt = [
+    :expr, 
+  ]
+  ### Goto Table
+  goto_table = [ 
+   [ 1, ], 
+   [ nil, ], 
+   [ 8, ], 
+   [ nil, ], 
+   [ 9, ], 
+   [ 10, ], 
+   [ 11, ], 
+   [ 12, ], 
+   [ nil, ], 
+   [ nil, ], 
+   [ nil, ], 
+   [ nil, ], 
+   [ nil, ], 
+   [ nil, ], 
+  ]
+
+  Tables = [ reduce_table, nparams, action_table,
+             defred_table, defred_after_shift_table, goto_table,
+             t2i, i2t, nt2i, i2nt ]
+
+  def self.createDecoratedParser
+    D4TinyCalc::NVAction.new(TinyCalc.new())
+  end
+
+  ### Inner Code
+
+          def lex
+            begin
+              until @line.empty?
+                case @line
+                
+          when /\A\s+/, /\A\#.*/
+            @oldline = @line; @line = $'
+                 
+
+        
+          when /\A[1-9][0-9]*/
+            @oldline = @line; @line = $'
+                 yield _Token(:NUM, $&.to_i) 
+
+        
+          when /\A./
+            @oldline = @line; @line = $'
+                 yield _Token($&, $&) 
+
+        
+                else
+                  raise RuntimeError, "must not happen #{@line}"
+                end
+              end
+            end while @line0 = @line = getline
+            yield nil, nil
+          end
+        
+end
+
+### Outer Code
+
+class D4TinyCalc::NVAction < Depager::LALR::Action #:nodoc:all
+  include Depager::DecoratorUtils
+  
+  on_reduce = [
+    nil,
+              :_act_0,
+  :_act_1,
+  :_act_2,
+  :_act_3,
+  :_act_4,
+  :_act_5,
+
+  ]
+  Tables = [on_reduce]
+  def initialize inside
+    super inside, 'NVAction'
+    @on_reduce, = self.class::Tables
+    init_parser
+  end
+  
+
+module_eval <<-'.,.,118754109222632.,.,', 'sample_calc/calc_prec.nvaction.dr', 18
+  def _act_0 val
+    _left, _, _right = *val 
+     _left + _right 
+
+  end
+
+.,.,118754109222632.,.,
+      
+module_eval <<-'.,.,118754109254894.,.,', 'sample_calc/calc_prec.nvaction.dr', 19
+  def _act_1 val
+    _left, _, _right = *val 
+     _left - _right 
+
+  end
+
+.,.,118754109254894.,.,
+      
+module_eval <<-'.,.,118754109239243.,.,', 'sample_calc/calc_prec.nvaction.dr', 20
+  def _act_2 val
+    _left, _, _right = *val 
+     _left * _right 
+
+  end
+
+.,.,118754109239243.,.,
+      
+module_eval <<-'.,.,118754109238225.,.,', 'sample_calc/calc_prec.nvaction.dr', 21
+  def _act_3 val
+    _left, _, _right = *val 
+     _left / _right 
+
+  end
+
+.,.,118754109238225.,.,
+      
+module_eval <<-'.,.,118754109226405.,.,', 'sample_calc/calc_prec.nvaction.dr', 22
+  def _act_4 val
+    _, _expr, _ = *val 
+     _expr 
+
+  end
+
+.,.,118754109226405.,.,
+      
+module_eval <<-'.,.,118754109237470.,.,', 'sample_calc/calc_prec.nvaction.dr', 23
+  def _act_5 val
+    _NUM = *val 
+     _NUM.value 
+
+  end
+
+.,.,118754109237470.,.,
+      
+end
+      
+
+def createDecoratedTinyCalc
+  D4TinyCalc::NVAction.new(TinyCalc.new())
+end
+
+### main
+if __FILE__ == $0
+### Main Code
+parser = createDecoratedTinyCalc
+r, = parser.yyparse(STDIN)
+puts r
+
+end

data/examples/sample_calc/test.calc

@@ -0,0 +1 @@
+1+2*3

data/{data/depager/sample/slex_test/slextest1.dr → examples/slex_test/divreg.slex.dr}

@@ -11,27 +11,19 @@
   /\/(([^\/\\]+|\\.)*)\// { yield _Token(:REGEXP, $&) }
   /./                     { yield _Token($&, $&) }
   <OPMODE : START>
-  '\/'                    { yield _Token($&, $&) }
+  '/'                     { yield _Token($&, $&) }
 %}
 
 #begin-rule
   expr:
-      expr '/' [>:START] fact
+      expr '/' [>:START ?] fact
     | fact
   ;
   fact:
-      REGEXP [>:OPMODE]
+      REGEXP [>:OPMODE ?]
        { warn "REGEXP: #{_REGEXP.value}" }
   ;
 #end-rule
 %%
-=begin
-  stmt:
-      TYPEDEF [>:TNMODE] TYPENAME ';' [>:START] 
-       { warn 'TYPEDEF:'+val[2] }
-    | ID ';'
-       { warn 'ID:'+val[0] }
-  ;
-=end
 p = createDecoratedStatefulLexerTest1
 p.yyparse(STDIN)