rattler 0.2.2 → 0.3.0

data/spec/rattler/parsers/direct_action_spec.rb

@@ -2,26 +2,35 @@ require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 
 describe DirectAction do
   include CombinatorParserSpecHelper
-  
+
   describe '#parse' do
-    
+
     context 'with a capturing parser' do
-      
-      subject { DirectAction[Match[/[[:digit:]]+/], '|_| _ * 2'] }
-      
+
+      subject { DirectAction[Match[/[[:digit:]]+/], '|s| s * 2'] }
+
       context 'when the parser matches' do
         it 'applies the action binding the captured results as arguments' do
           parsing('451a').should result_in('451451').at(3)
         end
       end
-      
+
       context 'when the parser fails' do
         it 'fails' do
           parsing('foo').should fail
         end
       end
+
+      context 'using the "_" character' do
+
+        subject { DirectAction[Match[/[[:digit:]]+/], '_ * 2'] }
+
+        it 'applies the action binding the captured result as "_"' do
+          parsing('451a').should result_in('451451').at(3)
+        end
+      end
     end
-    
+
     context 'with a sequence parser' do
       subject do
         DirectAction[
@@ -29,86 +38,99 @@ describe DirectAction do
           '|l, r| "#{r} -> #{l}"'
         ]
       end
-      
+
       context 'when the parser matches' do
         it 'applies the action binding the captured results as arguments' do
           parsing('val=42 ').should result_in('42 -> val').at(6)
         end
       end
+
+      context 'using the "_" character' do
+        subject do
+          DirectAction[
+            Sequence[Match[/[[:alpha:]]+/], Skip[Match[/\=/]], Match[/[[:digit:]]+/]],
+            '_.join " <- "'
+          ]
+        end
+
+        it 'applies the action binding the captured result array as "_"' do
+          parsing('val=42 ').should result_in('val <- 42').at(6)
+        end
+      end
     end
-    
+
     context 'with an optional parser' do
-      
-      subject { DirectAction[Optional[Match[/\d+/]], '|_| _'] }
-      
+
+      subject { DirectAction[Optional[Match[/\d+/]], '|s| s'] }
+
       context 'when the nested parser matches' do
         it 'applies the action to an array containing the match' do
           parsing('451a').should result_in(['451']).at(3)
         end
       end
-      
+
       context 'when the nested parser fails' do
         it 'applies the action to an empty array' do
           parsing('foo').should result_in([]).at(0)
         end
       end
     end
-    
+
     context 'with a zero-or-more parser' do
-      
-      subject { DirectAction[ZeroOrMore[Match[/\d/]], '|_| _'] }
-      
+
+      subject { DirectAction[ZeroOrMore[Match[/\d/]], '|s| s'] }
+
       context 'when the nested parser matches' do
         it 'applies the action to an array containing the matches' do
           parsing('451a').should result_in(['4', '5', '1']).at(3)
         end
       end
-      
+
       context 'when the nested parser fails' do
         it 'applies the action to an empty array' do
           parsing('foo').should result_in([]).at(0)
         end
       end
     end
-    
+
     context 'with a one-or-more parser' do
-      
-      subject { DirectAction[OneOrMore[Match[/\d/]], '|_| _'] }
-      
+
+      subject { DirectAction[OneOrMore[Match[/\d/]], '|s| s'] }
+
       context 'when the nested parser matches' do
         it 'applies the action to an array containing the matches' do
           parsing('451a').should result_in(['4', '5', '1']).at(3)
         end
       end
-      
+
       context 'when the nested parser fails' do
         it 'fails' do
           parsing('foo').should fail
         end
       end
     end
-    
+
     context 'with a token parser' do
-      subject { DirectAction[Token[Match[/[[:digit:]]+/]], '|_| _.to_i'] }
-      
+      subject { DirectAction[Token[Match[/[[:digit:]]+/]], '|s| s.to_i'] }
+
       context 'when the parser matches' do
         it 'applies the action to the matched string' do
           parsing('42 ').should result_in(42).at(2)
         end
       end
     end
-    
+
     context 'with a non-capturing parser' do
-      
+
       subject { DirectAction[Skip[Match[/\w+/]], '42'] }
-      
+
       context 'when the parser matches' do
         it 'applies the action with no arguments' do
           parsing('abc123 ').should result_in(42).at(6)
         end
       end
     end
-    
+
     context 'with a sequence of labeled parsers' do
       subject do
         DirectAction[
@@ -127,16 +149,16 @@ describe DirectAction do
       end
     end
   end
-  
+
   describe '#capturing?' do
-    
+
     context 'with a capturing parser' do
       subject { DirectAction[Match[/\w+/], ''] }
       it 'is true' do
         subject.should be_capturing
       end
     end
-    
+
     context 'with a non-capturing parser' do
       subject { DirectAction[Skip[Match[/\s*/]], ''] }
       it 'is false' do
@@ -144,5 +166,5 @@ describe DirectAction do
       end
     end
   end
-  
+
 end

data/spec/rattler/parsers/fail_spec.rb

@@ -0,0 +1,20 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe Assert do
+  include CombinatorParserSpecHelper
+
+  subject { Fail[:expr, 'malformed expression'] }
+  
+  describe '#parse' do
+    it 'fails' do
+      parsing('anything').should fail
+    end
+  end
+  
+  describe '#capturing?' do
+    it 'is false' do
+      subject.should_not be_capturing
+    end
+  end
+  
+end

data/spec/rattler/parsers/list1_spec.rb

@@ -0,0 +1,82 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe List1 do
+  include CombinatorParserSpecHelper
+
+  describe '#parse' do
+
+    context 'with a capturing term parser' do
+
+      subject { List1[Match[/\w+/], Match[/[,;]/]] }
+
+      context 'when no terms match' do
+        it 'fails' do
+          parsing('   ').should fail
+        end
+      end
+
+      context 'when a single term matches' do
+        it 'returns an array with the result of matching the term' do
+          parsing('foo').should result_in(['foo']).at(3)
+        end
+      end
+
+      context 'when multiple terms match' do
+        it 'returns an array with the results of matching the terms' do
+          parsing('foo,bar;baz ').should result_in(['foo', 'bar', 'baz']).at(11)
+        end
+      end
+
+      context 'with a separator not followed by a term' do
+        it 'matches without consuming the extra separator' do
+          parsing('foo,bar,').should result_in(['foo', 'bar']).at(7)
+        end
+      end
+    end
+
+    context 'with a non-capturing parser' do
+
+      subject { List1[Skip[Match[/\w+/]], Match[/[,;]/]] }
+
+      context 'when no terms match' do
+        it 'fails' do
+          parsing('   ').should fail
+        end
+      end
+
+      context 'when a single term matches' do
+        it 'returns true consuming the term' do
+          parsing('foo  ').should result_in(true).at(3)
+        end
+      end
+
+      context 'when multiple terms match' do
+        it 'returns true consuming the list' do
+          parsing('foo,bar;baz  ').should result_in(true).at(11)
+        end
+      end
+    end
+  end
+
+  describe '#capturing?' do
+
+    context 'with a capturing term parser' do
+
+      subject { List1[Match[/\w+/], Match[/[,;]/]] }
+
+      it 'is true' do
+        subject.should be_capturing
+      end
+    end
+
+    context 'with a non-capturing term parser' do
+
+      subject { List1[Skip[Match[/\w+/]], Match[/[,;]/]] }
+
+      it 'is true' do
+        subject.should_not be_capturing
+      end
+    end
+  end
+
+end

data/spec/rattler/parsers/list_spec.rb

@@ -0,0 +1,82 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
+
+describe List do
+  include CombinatorParserSpecHelper
+
+  describe '#parse' do
+
+    context 'with a capturing term parser' do
+
+      subject { List[Match[/\w+/], Match[/[,;]/]] }
+
+      context 'when no terms match' do
+        it 'returns an empty array without advancing' do
+          parsing('   ').should result_in([]).at(0)
+        end
+      end
+
+      context 'when a single term matches' do
+        it 'returns an array with the result of matching the term' do
+          parsing('foo').should result_in(['foo']).at(3)
+        end
+      end
+
+      context 'when multiple terms match' do
+        it 'returns an array with the results of matching the terms' do
+          parsing('foo,bar;baz ').should result_in(['foo', 'bar', 'baz']).at(11)
+        end
+      end
+
+      context 'with a separator not followed by a term' do
+        it 'matches without consuming the extra separator' do
+          parsing('foo,bar,').should result_in(['foo', 'bar']).at(7)
+        end
+      end
+    end
+
+    context 'with a non-capturing parser' do
+
+      subject { List[Skip[Match[/\w+/]], Match[/[,;]/]] }
+
+      context 'when no terms match' do
+        it 'returns true without advancing' do
+          parsing('   ').should result_in(true).at(0)
+        end
+      end
+
+      context 'when a single term matches' do
+        it 'returns true consuming the term' do
+          parsing('foo  ').should result_in(true).at(3)
+        end
+      end
+
+      context 'when multiple terms match' do
+        it 'returns true consuming the list' do
+          parsing('foo,bar;baz  ').should result_in(true).at(11)
+        end
+      end
+    end
+  end
+
+  describe '#capturing?' do
+
+    context 'with a capturing term parser' do
+
+      subject { List[Match[/\w+/], Match[/[,;]/]] }
+
+      it 'is true' do
+        subject.should be_capturing
+      end
+    end
+
+    context 'with a non-capturing term parser' do
+
+      subject { List[Skip[Match[/\w+/]], Match[/[,;]/]] }
+
+      it 'is true' do
+        subject.should_not be_capturing
+      end
+    end
+  end
+
+end

data/spec/rattler/parsers/parser_dsl_spec.rb

@@ -3,9 +3,9 @@ require File.expand_path(File.dirname(__FILE__) + '/../../spec_helper')
 include Rattler::Parsers
 
 describe ParserDSL do
-  
+
   subject { ParserDSL.new }
-  
+
   describe '#match' do
     context 'given a regexp' do
       it 'creates a regexp match parser' do
@@ -34,7 +34,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#optional' do
     context 'given a parser' do
       it 'creates an optional parser' do
@@ -47,7 +47,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#zero_or_more' do
     context 'given a parser' do
       it 'creates a zero-or-more parser' do
@@ -60,7 +60,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#one_or_more' do
     context 'given a parser' do
       it 'creates a one-or-more parser' do
@@ -73,7 +73,36 @@ describe ParserDSL do
       end
     end
   end
-  
+
+  describe '#list' do
+    context 'given parsers' do
+      it 'creates a list parser' do
+        subject.list(subject.match(/\w+/), subject.match(/,/)).
+        should == List[Match[/\w+/], Match[/,/]]
+      end
+    end
+    context 'given match arguments' do
+      it 'creates a list parser' do
+        subject.list(/\w+/, ',').should == List[Match[/\w+/], Match[/,/]]
+      end
+    end
+  end
+
+  describe '#list1' do
+    context 'given parsers' do
+      it 'creates a list parser' do
+        subject.list1(subject.match(/\w+/), subject.match(/,/)).
+        should == List1[Match[/\w+/], Match[/,/]]
+      end
+    end
+    context 'given match arguments' do
+      it 'creates a list parser' do
+        subject.list1(/\w+/, ',').
+        should == List1[Match[/\w+/], Match[/,/]]
+      end
+    end
+  end
+
   describe '#assert' do
     context 'given a parser' do
       it 'create an assert parser' do
@@ -86,7 +115,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#disallow' do
     context 'given a parser' do
       it 'creates a disallow parser' do
@@ -99,13 +128,13 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#eof' do
     it 'creates the eof parser' do
       subject.eof.should == Eof[]
     end
   end
-  
+
   describe '#dispatch_action' do
     context 'given a parser' do
       context 'given options' do
@@ -134,7 +163,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#direct_action' do
     context 'given a parser' do
       it 'creates a direct-action parser' do
@@ -149,7 +178,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#token' do
     context 'given a parser' do
       it 'creates a token parser' do
@@ -168,7 +197,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#skip' do
     context 'given a parser' do
       it 'creates a skip parser' do
@@ -181,7 +210,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#label' do
     context 'given a parser' do
       it 'creates a label parser' do
@@ -194,25 +223,25 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#fail' do
     it 'creates a fail-expr parser' do
       subject.fail('var expected').should == Fail[:expr, 'var expected']
     end
   end
-  
+
   describe '#fail_rule' do
     it 'creates a fail-rule parser' do
       subject.fail_rule('var expected').should == Fail[:rule, 'var expected']
     end
   end
-  
+
   describe '#fail_parse' do
     it 'creates a fail-parse parser' do
       subject.fail_parse('var expected').should == Fail[:parse, 'var expected']
     end
   end
-  
+
   describe '#rule' do
     context 'given a block' do
       it 'creates a rule' do
@@ -227,7 +256,7 @@ describe ParserDSL do
       end
     end
   end
-  
+
   describe '#rules' do
     context 'given a block' do
       it 'creates multiple rules' do
@@ -242,5 +271,5 @@ describe ParserDSL do
       end
     end
   end
-  
+
 end

data/spec/rattler/runtime/extended_packrat_parser_spec.rb

@@ -21,7 +21,6 @@ describe Rattler::Runtime::ExtendedPackratParser do
     end
 
     it 'supports indirectly left-recursive rules' do
-      pending 'implement full algorithm'
       given_rules do
         rule(:a) { match(:b) | match(/\d/) }
         rule(:b) { match(:a) & match(/\d/) }