depager 0.3.0.b20160729 → 0.3.0.b20250423

data/lib/depager/{ruby/plugins → plugins}/lex.rb

@@ -1,5 +1,3 @@
-# -*- coding: utf-8 -*-
-
 ###
 ### Depager::LexerExtension - Depager Extension (master)
 ###
@@ -11,6 +9,7 @@ module Depager ; end
 class Depager::LexerExtension < Depager::Extension
 
   def initialize
+    super
     @master = self
     @slaves = []
   end
@@ -18,24 +17,23 @@ class Depager::LexerExtension < Depager::Extension
   def extension_registered g_parser
     super g_parser
 
-    @slaves[0] = Depager::LexerExtension::Slave_pre_rule_list::Parser.new(g_parser, self)
-    g_parser.hooks[:pre_rule_list].push [@slaves[0], :do_parse]
+    @slaves << Depager::LexerExtension::PreRuleList0::Parser.new(g_parser, self)
+    g_parser.hooks[:pre_rule_list].push [@slaves.last, :do_parse]
   end
 
 
 end
 
 ###
-### Depager::LexerExtension::Slave_pre_rule_list - Part of Depager Extension (slave)
+### Depager::LexerExtension::PreRuleList0 - Part of Depager Extension (slave)
 ###
 
-module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
+module Depager::LexerExtension::PreRuleList0 #:nodoc:all
   class Parser < Depager::LALR::Basis #:nodoc:all
     include Depager::Utils::ExtensionSlaveMethods
-    
 
     ### Reduce Table
-    reduce_table = [
+    REDUCE_TABLE = [
       [ -1, 1 ],
       [ 0, 1 ],
       [ 1, 1 ],
@@ -46,8 +44,10 @@ module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
       [ 3, 1 ],
       [ 3, 3 ],
     ]
+    def reduce_table; REDUCE_TABLE; end
+
     ### Term to Int
-    term_to_int = {
+    TERM_TO_INT = {
       nil => 0,
       false => 1,
       :ACTION => 2,
@@ -55,8 +55,10 @@ module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
       :LEX => 4,
       "," => 5,
     }
+    def term_to_int; TERM_TO_INT; end
+
     ### Int to Term
-    int_to_term = [
+    INT_TO_TERM = [
       nil,
       false,
       :ACTION,
@@ -64,8 +66,10 @@ module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
       :LEX,
       ",",
     ]
+    def int_to_term; INT_TO_TERM; end
+
     ### Action Table
-    action_table = [
+    ACTION_TABLE = [
       [ nil, nil, nil, nil, 5, nil, ],
       [ ACC, nil, nil, nil, nil, nil, ],
       [ nil, nil, nil, nil, 5, nil, ],
@@ -79,8 +83,10 @@ module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
       [ nil, nil, nil, nil, nil, nil, ],
       [ nil, nil, nil, nil, nil, nil, ],
     ]
+    def action_table; ACTION_TABLE; end
+
     ### Default Reduce Table
-    defred_table = [
+    DEFRED_TABLE = [
       nil,
       nil,
       -1,
@@ -94,7 +100,9 @@ module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
       -4,
       -8,
     ]
-    defred_after_shift_table = [
+    def defred_table; DEFRED_TABLE; end
+
+    DEFRED_AFTER_SHIFT_TABLE = [
       nil,
       nil,
       nil,
@@ -108,24 +116,30 @@ module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
       -4,
       -8,
     ]
+    def defred_after_shift_table; DEFRED_AFTER_SHIFT_TABLE; end
+
     ### Nonterm to Int
-    nonterm_to_int = {
-      :start => 0, 
-      :lexactlist => 1, 
-      :lexact => 2, 
-      :lexlist => 3, 
-      :opt_noskip => 4, 
+    NONTERM_TO_INT = {
+      :start => 0,
+      :lexactlist => 1,
+      :lexact => 2,
+      :lexlist => 3,
+      :opt_noskip => 4,
     }
+    def nonterm_to_int; NONTERM_TO_INT; end
+
     ### Int to Nonterm
-    int_to_nonterm = [
-      :start, 
-      :lexactlist, 
-      :lexact, 
-      :lexlist, 
-      :opt_noskip, 
+    INT_TO_NONTERM = [
+      :start,
+      :lexactlist,
+      :lexact,
+      :lexlist,
+      :opt_noskip,
     ]
+    def int_to_nonterm; INT_TO_NONTERM; end
+
     ### Goto Table
-    goto_table = [
+    GOTO_TABLE = [
       [ 1, 2, 3, 4, nil, ],
       [ nil, nil, nil, nil, nil, ],
       [ nil, nil, 6, 4, nil, ],
@@ -139,10 +153,7 @@ module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
       [ 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 goto_table; GOTO_TABLE; end
 
     def initialize g_parser, master
       super()
@@ -167,7 +178,7 @@ module Depager::LexerExtension::Slave_pre_rule_list #:nodoc:all
       "%LEX{ ... } / Depager::LexerExtension"
     end
 
-module_eval <<'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 9
+module_eval <<'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 9
   def lex
     until @file.eof?
       until @line.empty?
@@ -204,12 +215,10 @@ DEPAGER_EXPANDED_CODE
   end
 end
 
-
-class Depager::LexerExtension::Slave_pre_rule_list::Action < Depager::LALR::Action #:nodoc:all
+class Depager::LexerExtension::PreRuleList0::Action < Depager::LALR::Action #:nodoc:all
   include Depager::Utils::ExtensionSlaveDecoratorMethods
-
-            on_reduce = [
-                          nil,
+ON_REDUCE = [
+              nil,
             :_act_1,
             :_act_2,
             :_act_3,
@@ -219,20 +228,19 @@ class Depager::LexerExtension::Slave_pre_rule_list::Action < Depager::LALR::Acti
             :_act_7,
             :_act_8,
 
-            ]
-            Tables = [ on_reduce ]
+]
+def on_reduce; ON_REDUCE; end
 
-            
-module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 43
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 43
 def _act_1 val
-    _lexactlist, = *val 
+    _lexactlist, = *val
 
-        g_parser.inner_code << %{
+        g_parser.inner_code << <<~CODE
           def lex
             begin
               until @line.empty?
                 case @line
-                #{ _lexactlist }
+          #{ _lexactlist }
                 else
                   raise RuntimeError, "must not happen \#{@line}"
                 end
@@ -240,71 +248,66 @@ def _act_1 val
             end while @original_line = @line = file.gets
             yield nil, nil
           end
-        }; #code
+        CODE
 
 end
 DEPAGER_EXPANDED_CODE
-        
-module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 61
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 61
 def _act_2 val
-    _lexact, = *val 
+    _lexact, = *val
      _lexact 
 
 end
 DEPAGER_EXPANDED_CODE
-        
-module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 62
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 62
 def _act_3 val
-    _lexactlist, _lexact, = *val 
+    _lexactlist, _lexact, = *val
      _lexactlist << _lexact 
 
 end
 DEPAGER_EXPANDED_CODE
-        
-module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 66
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 66
 def _act_4 val
-    _lexlist, _opt_noskip, _ACTION, = *val 
+    _lexlist, _opt_noskip, _ACTION, = *val
 
-        %{
+        <<-CODE
           when #{_lexlist.join(', ')}
             #{ _opt_noskip ? '#' : "@line = $'" }
             #{ _ACTION }
-        }; #code
+        CODE
 
 end
 DEPAGER_EXPANDED_CODE
-        
-module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 75
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 75
 def _act_5 val
+    # empty rule
      false 
 
 end
 DEPAGER_EXPANDED_CODE
-        
-module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 76
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 76
 def _act_6 val
-    _, = *val 
+    _, = *val
      true  
 
 end
 DEPAGER_EXPANDED_CODE
-        
-module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 79
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 79
 def _act_7 val
-    _LEX, = *val 
+    _LEX, = *val
      [ _LEX ] 
 
 end
 DEPAGER_EXPANDED_CODE
-        
-module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/ruby/plugins/lex.dr', 80
+module_eval <<-'DEPAGER_EXPANDED_CODE', 'lib/depager/plugins/lex.dr', 80
 def _act_8 val
-    _lexlist, _, _LEX, = *val 
+    _lexlist, _, _LEX, = *val
      _lexlist << _LEX 
 
 end
 DEPAGER_EXPANDED_CODE
-        
-        
+
+
 end
-        
+
+

data/lib/depager/{ruby/plugins → plugins}/rie.dr

@@ -1,10 +1,11 @@
 %defext Depager::RieExtension
-%extend Depager::Lexer ('plugins/lex.rb')
-%extend Depager::Action ('plugins/action.rb')
+%extend Depager::Lexer ('depager/plugins/lex.rb')
+%extend Depager::Action ('depager/plugins/action.rb')
 %decorate @Action
-#%decorate Depager::LALR::ShiftReducePrinter ('plugins/srp.rb')
-%expanded_code_delimiter DEPAGER_EXPANDED_CODE
+#%decorate Depager::LALR::ShiftReducePrinter ('depager/plugins/srp.rb')
 %inner{
+  require "pp"
+
   module Nodes
     N_THREAD   = Struct.new :lineno, :targets, :excepts
     N_TRANSFER = Struct.new :lineno, :targets, :excepts
@@ -16,7 +17,7 @@
   include Nodes
 
   begin
-    Depager.debug_mode? and require 'plugins/_rie_debug.rb'
+    require 'depager/plugins/_rie_debug.rb' if Depager.debug_mode?
   rescue LoadError
   end
 
@@ -32,8 +33,9 @@
     @locals     = [{}]
     @ecs        = {}
     if Depager.debug_mode?
-      @debug_output_path = "#{g_parser.file.path}.rie_debug.output"
-      File.unlink @debug_output_path rescue nil
+      path = g_parser.file == $stdin ? "stdin" : g_parser.file.path
+      @debug_output_path = "#{path}.rie_debug.output"
+      File.write @debug_output_path, ""
     end
   end
 
@@ -464,7 +466,7 @@
   end
 
   def error_exit_if_error_pending
-    @pending_errors and (warn @pending_errors.join("\n") ; exit 1)
+    @pending_errors and error_exit(@pending_errors.join("\n"))
   end
 
   def debug_info s
@@ -475,7 +477,7 @@
     on_reduce_code = on_reduce.map{|i| "            #{i||'nil'},\n"}
     on_state_code  = on_state.map{|i| "            #{i||'nil'},\n"}
 
-    generate_decorator_code(decorator_name, "#{d_parser.parsing_method}::AdvancedParser", %{
+    generate_decorator_code(decorator_name, "#{d_parser.parsing_method}::AdvancedParser", <<-CODE)
       on_reduce = [\n#{on_reduce_code.join}
       ]
       on_state  = [\n#{on_state_code.join}
@@ -514,7 +516,7 @@
         raise
       end
       \n#{action_code}
-    }) #code
+    CODE
   end
 %}
 %hook post_lhs /\[/