rattler 0.5.0 → 0.6.0

data/spec/rattler/back_end/parser_generator/direct_action_generator_spec.rb

@@ -1,204 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../../spec_helper')
-
-include Rattler::BackEnd::ParserGenerator
-include Rattler::Parsers
-
-describe DirectActionGenerator do
-
-  include ParserGeneratorSpecHelper
-
-  let(:action) { DirectAction[Match[/\w+/], '|_| _.to_sym'] }
-
-  describe '#gen_basic' do
-
-    context 'when nested' do
-      it 'generates nested matching code with a direct action' do
-        nested_code {|g| g.gen_basic action }.
-          should == (<<-CODE).strip
-begin
-  (r = @scanner.scan(/\\w+/)) &&
-  (r.to_sym)
-end
-          CODE
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level matching code with a direct action' do
-        top_level_code {|g| g.gen_basic action }.
-          should == (<<-CODE).strip
-(r = @scanner.scan(/\\w+/)) &&
-(r.to_sym)
-          CODE
-      end
-    end
-  end
-
-  describe '#gen_assert' do
-
-    context 'when nested' do
-      it 'generates nested positive lookahead code' do
-        nested_code {|g| g.gen_assert action }.
-          should == '(@scanner.skip(/(?=\w+)/) && true)'
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level positive lookahead code' do
-        top_level_code {|g| g.gen_assert action }.
-          should == '@scanner.skip(/(?=\w+)/) && true'
-      end
-    end
-  end
-
-  describe '#gen_disallow' do
-
-    context 'when nested' do
-      it 'generates nested negative lookahead code' do
-        nested_code {|g| g.gen_disallow action }.
-          should == '(@scanner.skip(/(?!\w+)/) && true)'
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level negative lookahead code' do
-        top_level_code {|g| g.gen_disallow action }.
-          should == '@scanner.skip(/(?!\w+)/) && true'
-      end
-    end
-  end
-
-  describe '#gen_dispatch_action' do
-
-    let(:code) { NodeCode.new('Word', 'parsed') }
-
-    context 'when nested' do
-      it 'generates nested matching code with a direct action and a dispatch action' do
-        nested_code {|g| g.gen_dispatch_action action, code }.
-          should == (<<-CODE).strip
-begin
-  (r = begin
-    (r = @scanner.scan(/\\w+/)) &&
-    (r.to_sym)
-  end) &&
-  Word.parsed([r])
-end
-          CODE
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level matching code with a direct action and a dispatch action' do
-        top_level_code {|g| g.gen_dispatch_action action, code }.
-          should == (<<-CODE).strip
-(r = begin
-  (r = @scanner.scan(/\\w+/)) &&
-  (r.to_sym)
-end) &&
-Word.parsed([r])
-          CODE
-      end
-    end
-  end
-
-  describe '#gen_direct_action' do
-
-    let(:code) { ActionCode.new('|_| _.size') }
-
-    context 'when nested' do
-      it 'generates nested matching code with nested direct actions' do
-        nested_code {|g| g.gen_direct_action action, code }.
-          should == (<<-CODE).strip
-begin
-  (r = begin
-    (r = @scanner.scan(/\\w+/)) &&
-    (r.to_sym)
-  end) &&
-  (r.size)
-end
-          CODE
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level matching code with nested direct actions' do
-        top_level_code {|g| g.gen_direct_action action, code }.
-          should == (<<-CODE).strip
-(r = begin
-  (r = @scanner.scan(/\\w+/)) &&
-  (r.to_sym)
-end) &&
-(r.size)
-          CODE
-      end
-    end
-  end
-
-  describe '#gen_token' do
-
-    context 'when nested' do
-      it 'generates nested token matching code' do
-        nested_code {|g| g.gen_token action }.
-          should == '@scanner.scan(/\w+/)'
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level token matching code' do
-        top_level_code {|g| g.gen_token action }.
-          should == '@scanner.scan(/\w+/)'
-      end
-    end
-  end
-
-  describe '#gen_skip' do
-
-    context 'when nested' do
-      it 'generates nested skipping code' do
-        nested_code {|g| g.gen_skip action }.
-          should == '(@scanner.skip(/\w+/) && true)'
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level skipping code' do
-        top_level_code {|g| g.gen_skip action }.
-          should == '@scanner.skip(/\w+/) && true'
-      end
-    end
-  end
-
-  describe '#gen_intermediate' do
-    it 'generates nested matching code with a direct action' do
-      nested_code {|g| g.gen_intermediate action }.
-        should == (<<-CODE).strip
-begin
-  (r = @scanner.scan(/\\w+/)) &&
-  (r.to_sym)
-end
-        CODE
-    end
-  end
-
-  describe '#gen_intermediate_assert' do
-    it 'generates intermediate positive lookahead code' do
-      nested_code {|g| g.gen_intermediate_assert action }.
-        should == '@scanner.skip(/(?=\w+)/)'
-    end
-  end
-
-  describe '#gen_intermediate_disallow' do
-    it 'generates intermediate negative lookahead code' do
-      nested_code {|g| g.gen_intermediate_disallow action }.
-        should == '@scanner.skip(/(?!\w+)/)'
-    end
-  end
-
-  describe '#gen_intermediate_skip' do
-    it 'generates intermediate skipping code' do
-      nested_code {|g| g.gen_intermediate_skip action }.
-        should == '@scanner.skip(/\w+/)'
-    end
-  end
-
-end

data/spec/rattler/back_end/parser_generator/dispatch_action_generator_spec.rb

@@ -1,204 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../../spec_helper')
-
-include Rattler::BackEnd::ParserGenerator
-include Rattler::Parsers
-
-describe DispatchActionGenerator do
-
-  include ParserGeneratorSpecHelper
-
-  let(:action) { DispatchAction[Match[/\w+/]] }
-
-  describe '#gen_basic' do
-
-    context 'when nested' do
-      it 'generates nested matching code with a dispatch action' do
-        nested_code {|g| g.gen_basic action }.
-          should == (<<-CODE).strip
-begin
-  (r = @scanner.scan(/\\w+/)) &&
-  Rattler::Runtime::ParseNode.parsed([r])
-end
-          CODE
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level matching code with a dispatch action' do
-        top_level_code {|g| g.gen_basic action }.
-          should == (<<-CODE).strip
-(r = @scanner.scan(/\\w+/)) &&
-Rattler::Runtime::ParseNode.parsed([r])
-          CODE
-      end
-    end
-  end
-
-  describe '#gen_assert' do
-
-    context 'when nested' do
-      it 'generates nested positive lookahead code' do
-        nested_code {|g| g.gen_assert action }.
-          should == '(@scanner.skip(/(?=\w+)/) && true)'
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level positive lookahead code' do
-        top_level_code {|g| g.gen_assert action }.
-          should == '@scanner.skip(/(?=\w+)/) && true'
-      end
-    end
-  end
-
-  describe '#gen_disallow' do
-
-    context 'when nested' do
-      it 'generates nested negative lookahead code' do
-        nested_code {|g| g.gen_disallow action }.
-          should == '(@scanner.skip(/(?!\w+)/) && true)'
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level negative lookahead code' do
-        top_level_code {|g| g.gen_disallow action }.
-          should == '@scanner.skip(/(?!\w+)/) && true'
-      end
-    end
-  end
-
-  describe '#gen_dispatch_action' do
-
-    let(:code) { NodeCode.new('Word', 'parsed') }
-
-    context 'when nested' do
-      it 'generates nested matching code with nested dispatch actions' do
-        nested_code {|g| g.gen_dispatch_action action, code }.
-          should == (<<-CODE).strip
-begin
-  (r = begin
-    (r = @scanner.scan(/\\w+/)) &&
-    Rattler::Runtime::ParseNode.parsed([r])
-  end) &&
-  Word.parsed([r])
-end
-          CODE
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level matching code with nested dispatch actions' do
-        top_level_code {|g| g.gen_dispatch_action action, code }.
-          should == (<<-CODE).strip
-(r = begin
-  (r = @scanner.scan(/\\w+/)) &&
-  Rattler::Runtime::ParseNode.parsed([r])
-end) &&
-Word.parsed([r])
-          CODE
-      end
-    end
-  end
-
-  describe '#gen_direct_action' do
-
-    let(:code) { ActionCode.new('|_| _.children') }
-
-    context 'when nested' do
-      it 'generates nested matching code with a dispatch action and a direct action' do
-        nested_code {|g| g.gen_direct_action action, code }.
-          should == (<<-CODE).strip
-begin
-  (r = begin
-    (r = @scanner.scan(/\\w+/)) &&
-    Rattler::Runtime::ParseNode.parsed([r])
-  end) &&
-  (r.children)
-end
-          CODE
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level matching code with a dispatch action and a direct action' do
-        top_level_code {|g| g.gen_direct_action action, code }.
-          should == (<<-CODE).strip
-(r = begin
-  (r = @scanner.scan(/\\w+/)) &&
-  Rattler::Runtime::ParseNode.parsed([r])
-end) &&
-(r.children)
-          CODE
-      end
-    end
-  end
-
-  describe '#gen_token' do
-
-    context 'when nested' do
-      it 'generates nested token matching code' do
-        nested_code {|g| g.gen_token action }.
-          should == '@scanner.scan(/\w+/)'
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level token matching code' do
-        top_level_code {|g| g.gen_token action }.
-          should == '@scanner.scan(/\w+/)'
-      end
-    end
-  end
-
-  describe '#gen_skip' do
-
-    context 'when nested' do
-      it 'generates nested skipping code' do
-        nested_code {|g| g.gen_skip action }.
-          should == '(@scanner.skip(/\w+/) && true)'
-      end
-    end
-
-    context 'when top-level' do
-      it 'generates top level skipping code' do
-        top_level_code {|g| g.gen_skip action }.
-          should == '@scanner.skip(/\w+/) && true'
-      end
-    end
-  end
-
-  describe '#gen_intermediate' do
-    it 'generates nested matching code with a dispatch action' do
-      nested_code {|g| g.gen_intermediate action }.
-        should == (<<-CODE).strip
-begin
-  (r = @scanner.scan(/\\w+/)) &&
-  Rattler::Runtime::ParseNode.parsed([r])
-end
-        CODE
-    end
-  end
-
-  describe '#gen_intermediate_assert' do
-    it 'generates intermediate positive lookahead code' do
-      nested_code {|g| g.gen_intermediate_assert action }.
-        should == '@scanner.skip(/(?=\w+)/)'
-    end
-  end
-
-  describe '#gen_intermediate_disallow' do
-    it 'generates intermediate negative lookahead code' do
-      nested_code {|g| g.gen_intermediate_disallow action }.
-        should == '@scanner.skip(/(?!\w+)/)'
-    end
-  end
-
-  describe '#gen_intermediate_skip' do
-    it 'generates intermediate skipping code' do
-      nested_code {|g| g.gen_intermediate_skip action }.
-        should == '@scanner.skip(/\w+/)'
-    end
-  end
-
-end

data/spec/rattler/back_end/parser_generator/group_match_generator_spec.rb

@@ -1,185 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/../../../spec_helper')
-
-include Rattler::BackEnd::ParserGenerator
-include Rattler::Parsers
-
-describe GroupMatchGenerator do
-
-  include ParserGeneratorSpecHelper
-
-  let(:single_group) { GroupMatch[Match[/\s*(\w+)/], {:num_groups => 1}] }
-
-  let(:multi_group) { GroupMatch[Match[/\s*(\w+)\s+(\w+)/], {:num_groups => 2}] }
-
-  describe '#gen_basic' do
-
-    context 'given a single-group match' do
-
-      context 'when nested' do
-        it 'generates nested regex group matching code returning the group' do
-          nested_code {|g| g.gen_basic single_group }.
-            should == (<<-CODE).strip
-begin
-  @scanner.skip(/\\s*(\\w+)/) &&
-  @scanner[1]
-end
-            CODE
-        end
-      end
-
-      context 'when top-level' do
-        it 'generates top-level regex group matching code returning the group' do
-          top_level_code {|g| g.gen_basic single_group }.
-            should == (<<-CODE).strip
-@scanner.skip(/\\s*(\\w+)/) &&
-@scanner[1]
-            CODE
-        end
-      end
-    end
-
-    context 'given a multi-group match' do
-
-      context 'when nested' do
-        it 'generates nested regex matching code returning an array of groups' do
-          nested_code {|g| g.gen_basic multi_group }.
-            should == (<<-CODE).strip
-begin
-  @scanner.skip(/\\s*(\\w+)\\s+(\\w+)/) &&
-  [@scanner[1], @scanner[2]]
-end
-            CODE
-        end
-      end
-
-      context 'when top-level' do
-        it 'generates top-level regex matching code returning an array of groups' do
-          top_level_code {|g| g.gen_basic multi_group }.
-            should == (<<-CODE).strip
-@scanner.skip(/\\s*(\\w+)\\s+(\\w+)/) &&
-[@scanner[1], @scanner[2]]
-            CODE
-        end
-      end
-    end
-  end
-
-  describe '#gen_dispatch_action' do
-
-    let(:code) { NodeCode.new('Word', 'parsed') }
-
-    context 'given a single-group match' do
-
-      let(:match) { single_group }
-
-      context 'when nested' do
-        it 'generates nested regex group matching code with a dispatch action' do
-          nested_code {|g| g.gen_dispatch_action match, code }.
-            should == (<<-CODE).strip
-begin
-  @scanner.skip(/\\s*(\\w+)/) &&
-  Word.parsed([@scanner[1]])
-end
-            CODE
-        end
-      end
-
-      context 'when top-level' do
-        it 'generates top-level regex group matching code with a dispatch action' do
-          top_level_code {|g| g.gen_dispatch_action match, code }.
-            should == (<<-CODE).strip
-@scanner.skip(/\\s*(\\w+)/) &&
-Word.parsed([@scanner[1]])
-            CODE
-        end
-      end
-    end
-
-    context 'given a multi-group match' do
-
-      let(:match) { multi_group }
-
-      context 'when nested' do
-        it 'generates nested regex group matching code with a dispatch action' do
-          nested_code {|g| g.gen_dispatch_action match, code }.
-            should == (<<-CODE).strip
-begin
-  @scanner.skip(/\\s*(\\w+)\\s+(\\w+)/) &&
-  Word.parsed([@scanner[1], @scanner[2]])
-end
-            CODE
-        end
-      end
-
-      context 'when top-level' do
-        it 'generates top-level regex group matching code with a dispatch action' do
-          top_level_code {|g| g.gen_dispatch_action match, code }.
-            should == (<<-CODE).strip
-@scanner.skip(/\\s*(\\w+)\\s+(\\w+)/) &&
-Word.parsed([@scanner[1], @scanner[2]])
-            CODE
-        end
-      end
-    end
-  end
-
-  describe '#gen_direct_action' do
-
-    context 'given a single-group match' do
-
-      let(:match) { single_group }
-      let(:code) { ActionCode.new('_.to_sym') }
-
-      context 'when nested' do
-        it 'generates nested regex matching code with a direct action' do
-          nested_code {|g| g.gen_direct_action match, code }.
-            should == (<<-CODE).strip
-begin
-  @scanner.skip(/\\s*(\\w+)/) &&
-  (@scanner[1].to_sym)
-end
-            CODE
-        end
-      end
-
-      context 'when top-level' do
-        it 'generates top level regex matching code with a direct action' do
-          top_level_code {|g| g.gen_direct_action match, code }.
-            should == (<<-CODE).strip
-@scanner.skip(/\\s*(\\w+)/) &&
-(@scanner[1].to_sym)
-            CODE
-        end
-      end
-    end
-
-    context 'given a multi-group match' do
-
-      let(:match) { multi_group }
-      let(:code) { ActionCode.new('_.size') }
-
-      context 'when nested' do
-        it 'generates nested regex matching code with a direct action' do
-          nested_code {|g| g.gen_direct_action match, code }.
-            should == (<<-CODE).strip
-begin
-  @scanner.skip(/\\s*(\\w+)\\s+(\\w+)/) &&
-  ([@scanner[1], @scanner[2]].size)
-end
-            CODE
-        end
-      end
-
-      context 'when top-level' do
-        it 'generates top level regex matching code with a direct action' do
-          top_level_code {|g| g.gen_direct_action match, code }.
-            should == (<<-CODE).strip
-@scanner.skip(/\\s*(\\w+)\\s+(\\w+)/) &&
-([@scanner[1], @scanner[2]].size)
-            CODE
-        end
-      end
-
-    end
-  end
-end