depager 0.2.3 → 0.3.0.b20160729

data/examples/sample_calc/calc.action.dr

@@ -1,33 +1,33 @@
-%class TinyCalc
-%extend Lexer ('plugins/lex.rb')
-%extend Action ('plugins/action.rb')
-%decorate @Action
-#%decorate ShiftReducePrinter ('plugins/srp.rb')
-%%
-
-%LEX{
-  /\s+/, /\#.*/ { }
-  /[1-9][0-9]*/ { yield token(:NUM, $&.to_i) }
-  /./           { yield token($&, $&) }
-%}
-
-#begin-rule
-  expr : 
-      expr '+' term { val[0] + val[2] }
-    | expr '-' term { val[0] - val[2] }
-    | term          { val[0] }
-  ;
-  term :
-      term '*' fact { val[0] * val[2] }
-    | term '/' fact { val[0] / val[2] }
-    | fact          { val[0] }
-  ;
-  fact :
-      NUM           { val[0].value }
-    | '(' expr ')'  { val[1] }
-  ;
-#end-rule
-%%
-parser = TinyCalc::createDecoratedParser
-r, = parser.parse(STDIN)
-puts r
+%class TinyCalc::Parser
+%extend Depager::Lexer ('plugins/lex.rb')
+%extend Depager::Action ('plugins/action.rb')
+%decorate @Action
+#%decorate Depager::LALR::ShiftReducePrinter ('plugins/srp.rb')   
+%%
+
+%LEX{
+  /\s+/, /\#.*/ { }
+  /[1-9][0-9]*/ { yield token(:NUM, $&.to_i) }
+  /./           { yield token($&, $&) }
+%}
+
+#begin-rule
+  expr :
+      expr '+' term { _expr + _term }
+    | expr '-' term { _expr - _term }
+    | term          { _term }
+  ;
+  term :
+      term '*' fact { _term * _fact }
+    | term '/' fact { _term / _fact }
+    | fact          { _fact }
+  ;
+  fact :
+      NUM           { _NUM.value }
+    | '(' expr ')'  { _expr }
+  ;
+#end-rule
+%%
+parser = TinyCalc.create_decorated_parser
+r, = parser.parse(STDIN)
+puts r

data/examples/sample_calc/calc.ast.action.dr

@@ -1,66 +1,65 @@
-%class TinyCalc
-%extend Lexer ('plugins/lex.rb')
-%extend ASTBuilder ('plugins/ast.rb')
-%extend Action ('plugins/action.rb')
-%decorate @ASTBuilder
-%decorate @Action
-#%decorate ShiftReducePrinter ('plugins/srp.rb')
-%mixin Depager
-%%
-
-%LEX{
-  /\s+/, /\#.*/, /\n/  { }
-  /[1-9][0-9]*/        { yield token(:NUM, $&.to_i) }
-  /./                  { yield token($&, $&) }
-%}
-
-%AST{
-  Node [value]     { @value = nil }
-  Visitor          { }
-  add(left, right) { $.value = visit($.left).value + visit($.right).value }
-  sub(left, right) { $.value = visit($.left).value - visit($.right).value }
-  mul(left, right) { $.value = visit($.left).value * visit($.right).value }
-  div(left, right) { $.value = visit($.left).value / visit($.right).value }
-  literal(-n)      { $.value = $.n.value }
-%}
-
-#begin-rule
-  expr :
-      expr '+' term
-      => add(expr, term)
-      { val[0] + val[2] }
-    | expr '-' term
-      => sub(expr, term)
-      { val[0] - val[2] }
-    | term
-      => term
-      { val[0] }
-  ;
-  term :
-      term '*' fact
-      => mul(term, fact)
-      { val[0] * val[2] }
-    | term '/' fact
-      => div(term, fact)
-      { val[0] / val[2] }
-    | fact
-      => fact
-      { val[0] }
-  ;
-  fact :
-      NUM
-      => literal(NUM)
-      { val[0].value }
-    | '(' expr ')'
-      => expr
-      { val[1].value }
-  ;
-#end-rule
-%%
-require 'pp'
-parser = createDecoratedTinyCalc()
-t, r = parser.parse(STDIN)
-v = Visitor.new
-pp r
-pp t.accept(v).value
-pp t
+%class TinyCalc::Parser
+%extend Depager::Lexer ('plugins/lex.rb')
+%extend Depager::ASTBuilder ('plugins/ast.rb')
+%extend Depager::Action ('plugins/action.rb')
+%decorate @ASTBuilder
+%decorate @Action
+#%decorate Depager::LALR::ShiftReducePrinter ('plugins/srp.rb')
+%%
+
+%LEX{
+  /\s+/, /\#.*/, /\n/  { }
+  /[1-9][0-9]*/        { yield token(:NUM, $&.to_i) }
+  /./                  { yield token($&, $&) }
+%}
+
+%AST{
+  Node [value]     { @value = nil }
+  Visitor          { }
+  add(left, right) { $.value = visit($.left).value + visit($.right).value }
+  sub(left, right) { $.value = visit($.left).value - visit($.right).value }
+  mul(left, right) { $.value = visit($.left).value * visit($.right).value }
+  div(left, right) { $.value = visit($.left).value / visit($.right).value }
+  literal(-n)      { $.value = $.n.value }
+%}
+
+#begin-rule
+  expr :
+      expr '+' term
+      => add(expr, term)
+      { val[0] + val[2] }
+    | expr '-' term
+      => sub(expr, term)
+      { val[0] - val[2] }
+    | term
+      => term
+      { val[0] }
+  ;
+  term :
+      term '*' fact
+      => mul(term, fact)
+      { val[0] * val[2] }
+    | term '/' fact
+      => div(term, fact)
+      { val[0] / val[2] }
+    | fact
+      => fact
+      { val[0] }
+  ;
+  fact :
+      NUM
+      => literal(NUM)
+      { val[0].value }
+    | '(' expr ')'
+      => expr
+      { val[1].value }
+  ;
+#end-rule
+%%
+require 'pp'
+parser = TinyCalc.create_decorated_parser()
+t, r = parser.parse(STDIN)
+v = TinyCalc::Visitor.new
+pp r
+pp t.accept(v).value
+pp t

data/examples/sample_calc/calc.ast.dr

@@ -1,55 +1,55 @@
-%class TinyCalc
-%extend Lexer ('plugins/lex.rb')
-%extend ASTBuilder ('plugins/ast.rb')
-%decorate @ASTBuilder
-#%decorate ShiftReducePrinter ('plugins/srp.rb')
-%%
-
-%LEX{
-  /\s+/, /\#.*/ { }
-  /[1-9][0-9]*/ { yield token(:NUM, $&.to_i) }
-  /./           { yield token($&, $&) }
-%}
-
-%AST{
-  Node [value]     { @value = nil }
-  Visitor          { }
-  add(left, right) { $.value = visit($.left).value + visit($.right).value }
-  sub(left, right) { $.value = visit($.left).value - visit($.right).value }
-  mul(left, right) { $.value = visit($.left).value * visit($.right).value }
-  div(left, right) { $.value = visit($.left).value / visit($.right).value }
-  literal(-n)      { $.value = $.n.value }
-%}
-
-#begin-rule
-  expr :
-      expr '+' term
-      => add(expr, term)
-    | expr '-' term
-      => sub(expr, term)
-    | term
-      => term
-  ;
-  term :
-      term '*' fact
-      => mul(term, fact)
-    | term '/' fact
-      => div(term, fact)
-    | fact
-      => fact
-  ;
-  fact :
-      NUM
-      => literal(NUM)
-    | '(' expr ')'
-      => expr
-  ;
-#end-rule
-%%
-require 'pp'
-parser = createDecoratedTinyCalc()
-t, = parser.parse(STDIN)
-v = Visitor.new
-pp t.accept(v).value
-pp t
-
+%class TinyCalc::Parser
+%extend Depager::Lexer ('plugins/lex.rb')
+%extend Depager::ASTBuilder ('plugins/ast.rb')
+%decorate @ASTBuilder
+#%decorate Depager::LALR::ShiftReducePrinter ('plugins/srp.rb')
+%%
+
+%LEX{
+  /\s+/, /\#.*/ { }
+  /[1-9][0-9]*/ { yield token(:NUM, $&.to_i) }
+  /./           { yield token($&, $&) }
+%}
+
+%AST{
+  Node [value]     { @value = nil }
+  Visitor          { }
+  add(left, right) { $.value = visit($.left).value + visit($.right).value }
+  sub(left, right) { $.value = visit($.left).value - visit($.right).value }
+  mul(left, right) { $.value = visit($.left).value * visit($.right).value }
+  div(left, right) { $.value = visit($.left).value / visit($.right).value }
+  literal(-n)      { $.value = $.n.value }
+%}
+
+#begin-rule
+  expr :
+      expr '+' term
+      => add(expr, term)
+    | expr '-' term
+      => sub(expr, term)
+    | term
+      => term
+  ;
+  term :
+      term '*' fact
+      => mul(term, fact)
+    | term '/' fact
+      => div(term, fact)
+    | fact
+      => fact
+  ;
+  fact :
+      NUM
+      => literal(NUM)
+    | '(' expr ')'
+      => expr
+  ;
+#end-rule
+%%
+require 'pp'
+parser = TinyCalc.create_decorated_parser()
+t, = parser.parse(STDIN)
+v = TinyCalc::Visitor.new
+pp t.accept(v).value
+pp t
+

data/examples/sample_calc/calc.cst.dr

@@ -1,45 +1,45 @@
-%class TinyCalc
-%extend Lexer ('plugins/lex.rb')
-%extend CSTBuilder ('plugins/cst.rb')
-%decorate @CSTBuilder
-%%
-
-%LEX{
-  /\s+/, /\#.*/ { }
-  /[1-9][0-9]*/ { yield token(:NUM, $&.to_i) }
-  /./           { yield token($&, $&) }
-%}
-
-%CST{
-  Node {
-    attr_accessor :value
-    def initialize
-      @value = nil
-    end
-  }
-%}
-
-#begin-rule
-  expr :
-      expr '+' term { ~value = ~expr.value + ~term.value }
-    | expr '-' term { ~value = ~expr.value + ~term.value }
-    | term          { ~value = ~term.value }
-  ;
-  term :
-      term '*' fact { ~value = ~term.value * ~fact.value }
-    | term '/' fact { ~value = ~term.value / ~fact.value }
-    | fact          { ~value = ~fact.value }
-  ;
-  fact :
-      NUM           { ~value = ~num.value }
-    | '(' expr ')'  { ~value = ~expr }
-  ;
-#end-rule
-%%
-require 'pp'
-parser = createDecoratedTinyCalc
-r, = parser.parse(STDIN)
-v = Visitor.new
-r.accept(v)
-pp r
-puts r.value
+%class TinyCalc::Parser
+%extend Depager::Lexer ('plugins/lex.rb')
+%extend Depager::CSTBuilder ('plugins/cst.rb')
+%decorate @CSTBuilder
+%%
+
+%LEX{
+  /\s+/, /\#.*/ { }
+  /[1-9][0-9]*/ { yield token(:NUM, $&.to_i) }
+  /./           { yield token($&, $&) }
+%}
+
+%CST{
+  Node {
+    attr_accessor :value
+    def initialize
+      @value = nil
+    end
+  }
+%}
+
+#begin-rule
+  expr :
+      expr '+' term { $.value = $.expr.value + $.term.value }
+    | expr '-' term { $.value = $.expr.value + $.term.value }
+    | term          { $.value = $.term.value }
+  ;
+  term :
+      term '*' fact { $.value = $.term.value * $.fact.value }
+    | term '/' fact { $.value = $.term.value / $.fact.value }
+    | fact          { $.value = $.fact.value }
+  ;
+  fact :
+      NUM           { $.value = $.num.value }
+    | '(' expr ')'  { $.value = $.expr }
+  ;
+#end-rule
+%%
+require 'pp'
+parser = TinyCalc.create_decorated_parser
+r, = parser.parse(STDIN)
+v = TinyCalc::Visitor.new
+r.accept(v)
+pp r
+puts r.value

data/examples/sample_calc/calc.dr

@@ -1,43 +1,43 @@
-%class TinyCalc
-%inner{
-  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
-%}
-%%
-
-#begin-rule
-  expr :
-      expr '+' term
-    | expr '-' term
-    | term
-  ;
-  term :
-      term '*' fact
-    | term '/' fact
-    | fact
-  ;
-  fact :
-      NUM
-    | '(' expr ')'
-  ;
-#end-rule
-%%
-parser = TinyCalc.new()
-parser.parse(STDIN)
+%class TinyCalc::Parser
+%inner{
+  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
+%}
+%%
+
+#begin-rule
+  expr :
+      expr '+' term
+    | expr '-' term
+    | term
+  ;
+  term :
+      term '*' fact
+    | term '/' fact
+    | fact
+  ;
+  fact :
+      NUM
+    | '(' expr ')'
+  ;
+#end-rule
+%%
+parser = TinyCalc.create_decorated_parser()
+parser.parse(STDIN)