raabro 0.9.0 → 1.0.0

data/spec/spec_helper.rb

@@ -5,6 +5,8 @@
 # Sat Sep 19 21:12:35 JST 2015
 #
 
+require 'pp'
+
 require 'raabro'
 
 #
@@ -12,4 +14,59 @@ require 'raabro'
 
 def ta(i); Raabro.str(nil, i, 'ta'); end
 def to(i); Raabro.str(nil, i, 'to'); end
+def tu(i); Raabro.str(nil, i, 'tu'); end
+
+def to_plus(input); Raabro.rep(:tos, input, :to, 1); end
+
+def nta(i); Raabro.str('the-ta', i, 'ta'); end
+
+def cha(i); Raabro.rex(nil, i, /\A[a-z]/); end
+def com(i); Raabro.str(nil, i, ','); end
+
+def lt(i); Raabro.str(nil, i, '<'); end
+def gt(i); Raabro.str(nil, i, '>'); end
+
+def onex(i); Raabro.str(:onex, i, 'x'); end
+def twox(i); Raabro.str(:twox, i, 'xx'); end
+
+
+#
+# test modules
+
+module Sample; end
+
+module Sample::Cal include Raabro
+
+  def sp(i); rex(nil, i, /\s+/); end
+
+  def num(i); rex(:num, i, /-?[0-9]+/); end
+  def op(i); rex(:op, i, /[+\-*\/]/); end
+  def item(i); alt(:item, i, :num, :op); end
+
+  def suite(i); jseq(nil, i, :item, :sp); end
+
+  # entry point
+
+  def parse(input)
+
+    all(nil, Raabro::Input.new(input, :prune => true), :suite)
+  end
+end
+
+module Sample::Arith include Raabro
+
+  def number(i); rex(:number, i, /-?[0-9]+\s*/); end
+  def plus(i); rex(:plus, i, /\+\s*/); end
+  def minus(i); rex(:minus, i, /-\s*/); end
+
+  def addition(i); seq(:addition, i, :number, :plus, :op_or_num); end
+  def substraction(i); seq(:substraction, i, :number, :minus, :op_or_num); end
+
+  def op_or_num(i); alt(nil, i, :addition, :substraction, :number); end
+
+  def parse(input)
+
+    all(nil, Raabro::Input.new(input, prune: true), :op_or_num)
+  end
+end
 

data/spec/str_spec.rb

@@ -10,63 +10,67 @@ require 'spec_helper'
 
 describe Raabro do
 
-  before :each do
-
-    @input = Raabro::Input.new('toto')
-  end
-
   describe '.str' do
 
     it 'returns a tree with result == 0 in case of failure' do
 
-      t = Raabro.str(nil, @input, 'nada')
+      i = Raabro::Input.new('toto')
+
+      t = Raabro.str(nil, i, 'nada')
 
       expect(t.to_a).to eq(
         [ nil, 0, 0, 0, nil, :str, [] ]
       )
-      expect(@input.offset).to eq(0)
+      expect(i.offset).to eq(0)
     end
 
     it "returns a tree with result == 1 in case of success" do
 
-      t = Raabro.str(nil, @input, 'toto')
+      i = Raabro::Input.new('toto')
+
+      t = Raabro.str(nil, i, 'toto')
 
       expect(t.to_a).to eq(
         [ nil, 1, 0, 4, nil, :str, [] ]
       )
-      expect(@input.offset).to eq(4)
+      expect(i.offset).to eq(4)
     end
 
     it "names the result if there is a name" do
 
-      t = Raabro.str(:x, @input, 'toto')
+      i = Raabro::Input.new('toto')
+
+      t = Raabro.str(:x, i, 'toto')
 
       expect(t.to_a).to eq(
         [ :x, 1, 0, 4, nil, :str, [] ]
       )
-      expect(@input.offset).to eq(4)
+      expect(i.offset).to eq(4)
     end
 
     it "names in case of failure as well" do
 
-      t = Raabro.str(:y, @input, 'nada')
+      i = Raabro::Input.new('toto')
+
+      t = Raabro.str(:y, i, 'nada')
 
       expect(t.to_a).to eq(
         [ :y, 0, 0, 0, nil, :str, [] ]
       )
-      expect(@input.offset).to eq(0)
+      expect(i.offset).to eq(0)
     end
 
     it "accepts an empty input" do
 
-      @input.offset = 4
+      i = Raabro::Input.new('toto')
+      i.offset = 4
 
-      t = Raabro.str(nil, @input, 'nada')
+      t = Raabro.str(nil, i, 'nada')
 
       expect(t.to_a).to eq(
         [ nil, 0, 4, 0, nil, :str, [] ]
       )
-      expect(@input.offset).to eq(4)
+      expect(i.offset).to eq(4)
     end
   end
 end

data/spec/tree_spec.rb

@@ -0,0 +1,47 @@
+
+#
+# specifying raabro
+#
+# Tue Sep 22 07:55:52 JST 2015
+#
+
+require 'spec_helper'
+
+
+describe Raabro::Tree do
+
+  describe '.lookup' do
+
+    it 'returns the first node with the given name' do
+
+      t = Sample::Cal.parse('4 5 6 + 1 2 3 * +')
+
+      expect(
+        t.lookup('item').to_a(:leaves)
+      ).to eq(
+        [ :item, 1, 0, 1, nil, :alt, [
+          [ :num, 1, 0, 1, nil, :rex, '4' ]
+        ] ]
+      )
+    end
+  end
+
+  describe '.gather' do
+
+    it 'returns all the nodes with a given name' do
+
+      t = Sample::Cal.parse('4 5 6 + 1 2 3 * +')
+
+      expect(
+        t.gather('op').collect { |n| n.to_a(:leaves) }
+      ).to eq(
+        [
+          [ :op, 1, 6, 1, nil, :rex, '+' ],
+          [ :op, 1, 14, 1, nil, :rex, '*' ],
+          [ :op, 1, 16, 1, nil, :rex, '+' ]
+        ]
+      )
+    end
+  end
+end
+

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: raabro
 version: !ruby/object:Gem::Version
-  version: 0.9.0
+  version: 1.0.0
   prerelease: 
 platform: ruby
 authors:
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2015-09-20 00:00:00.000000000 Z
+date: 2015-09-22 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rake
@@ -52,13 +52,20 @@ extra_rdoc_files: []
 files:
 - Rakefile
 - lib/raabro.rb
+- spec/all_spec.rb
 - spec/alt_spec.rb
+- spec/eseq_spec.rb
+- spec/jseq_spec.rb
+- spec/ren_spec.rb
 - spec/rep_spec.rb
 - spec/rex_spec.rb
+- spec/sample_xel_spec.rb
 - spec/seq_spec.rb
 - spec/spec_helper.rb
 - spec/str_spec.rb
+- spec/tree_spec.rb
 - raabro.gemspec
+- CHANGELOG.txt
 - LICENSE.txt
 - README.md
 homepage: http://github.com/jmettraux/rufus-scheduler