cloudhead-less 1.2.3 → 1.2.4

data/lib/vendor/treetop/spec/compiler/character_class_spec.rb

@@ -1,182 +0,0 @@
-require File.join(File.dirname(__FILE__), '..', 'spec_helper')
-
-module CharacterClassSpec
-  class Foo < Treetop::Runtime::SyntaxNode
-  end
-
-  describe "a character class followed by a node class declaration and a block" do
-
-    testing_expression "[A-Z] <CharacterClassSpec::Foo> { def a_method; end }"
-
-    it "matches single characters within that range, returning instances of the declared node class that respond to the method defined in the inline module" do
-      result = parse('A')
-      result.should be_an_instance_of(Foo)
-      result.should respond_to(:a_method)
-      result = parse('N')
-      result.should be_an_instance_of(Foo)
-      result.should respond_to(:a_method)
-      result = parse('Z')
-      result.should be_an_instance_of(Foo)
-      result.should respond_to(:a_method)
-    end
-
-    it "does not match single characters outside of that range" do
-      parse('8').should be_nil
-      parse('a').should be_nil
-    end
-
-    it "matches a single character within that range at index 1" do
-      parse(' A', :index => 1).should_not be_nil
-    end
-
-    it "fails to match a single character out of that range at index 1" do
-      parse(' 1', :index => 1).should be_nil
-    end
-  end
-
-  module ModFoo
-  end
-
-  describe "a character class followed by a node module declaration and a block" do
-
-    testing_expression "[A-Z] <CharacterClassSpec::ModFoo> { def a_method; end }"
-
-    it "matches single characters within that range, returning instances of SyntaxNode extended by the specified module" do
-      result = parse('A')
-      result.should be_an_instance_of(Treetop::Runtime::SyntaxNode)
-      result.should be_a_kind_of(ModFoo)
-      result.should respond_to(:a_method)
-      result = parse('N')
-      result.should be_an_instance_of(Treetop::Runtime::SyntaxNode)
-      result.should be_a_kind_of(ModFoo)
-      result.should respond_to(:a_method)
-      result = parse('Z')
-      result.should be_an_instance_of(Treetop::Runtime::SyntaxNode)
-      result.should be_a_kind_of(ModFoo)
-      result.should respond_to(:a_method)
-    end
-
-    it "does not match single characters outside of that range" do
-      parse('8').should be_nil
-      parse('a').should be_nil
-    end
-
-    it "matches a single character within that range at index 1" do
-      parse(' A', :index => 1).should_not be_nil
-    end
-
-    it "fails to match a single character out of that range at index 1" do
-      parse(' 1', :index => 1).should be_nil
-    end
-  end
-
-  describe "A character class containing quotes" do
-    testing_expression "[\"']"
-
-    it "matches a quote" do
-      parse("'").should_not be_nil
-    end
-
-    it "matches a double-quote" do
-      parse('"').should_not be_nil
-    end
-  end
-
-  describe "A character class containing a special character" do
-    testing_expression "[\t]"
-    it "matches that character only" do
-      parse("\t").should_not be_nil
-      parse('t').should be_nil
-    end
-  end
-
-  describe "A character class containing an escaped backslash" do
-    slash = "\\"  # Make it explicit that there are *two* backslashes here
-    testing_expression "[#{slash}#{slash}]"
-    it "matches a backslash only" do
-      parse("\\").should_not be_nil
-      parse('t').should be_nil
-    end
-  end
-
-  describe "A character class containing a hex escape" do
-    slash = "\\"
-    testing_expression "[#{slash}x41]"
-    it "matches that character only" do
-      parse('A').should_not be_nil
-      parse('\\').should be_nil
-      parse('x').should be_nil
-      parse('4').should be_nil
-      parse('1').should be_nil
-    end
-  end
-
-  describe "A character class containing an octal escape" do
-    slash = "\\"
-    testing_expression "[#{slash}101]"
-    it "matches that character only" do
-      parse('A').should_not be_nil
-      parse('\\').should be_nil
-      parse('1').should be_nil
-      parse('0').should be_nil
-    end
-  end
-
-  describe "A character class containing a \\c control-char escape" do
-    slash = "\\"
-    testing_expression "[#{slash}cC]"
-    it "matches that character only" do
-      parse("\003").should_not be_nil
-      parse('\\').should be_nil
-      parse('c').should be_nil
-      parse('C').should be_nil
-    end
-  end
-
-  describe "A character class containing a \\C- control-char escape" do
-    slash = "\\"
-    testing_expression "[#{slash}C-C]"
-    it "matches that character only" do
-      parse("\003").should_not be_nil
-      parse('\\').should be_nil
-      parse('C').should be_nil
-      parse('-').should be_nil
-    end
-  end
-
-  describe "A character class containing a \\M- meta-char escape" do
-    slash = "\\"
-    testing_expression "[#{slash}M- ]"
-    it "matches that character only" do
-      parse("\240").should_not be_nil
-      parse('\\').should be_nil
-      parse('M').should be_nil
-      parse('-').should be_nil
-      parse(' ').should be_nil
-    end
-  end
-
-  describe "A character class containing an escaped non-special character" do
-    slash = "\\"
-    testing_expression "[#{slash}y]"
-    it "matches that character only" do
-      parse("y").should_not be_nil
-      parse('\\').should be_nil
-    end
-  end
-
-  describe "A character class containing an \#{...} insertion" do
-    testing_expression "[\#{raise 'error'}]"
-    it "doesn't evaluate the insertion" do
-      x = true
-      lambda{
-	x = parse("y")
-      }.should_not raise_error
-      x.should be_nil
-      parse('#').should_not be_nil
-      parse("'").should_not be_nil
-      parse("0").should be_nil
-    end
-  end
-
-end

data/lib/vendor/treetop/spec/compiler/choice_spec.rb

@@ -1,80 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-module ChoiceSpec
-  describe "A choice between terminal symbols" do
-    testing_expression '"foo" { def foo_method; end } / "bar" { def bar_method; end } / "baz" { def baz_method; end }'
-
-    it "successfully parses input matching any of the alternatives, returning a node that responds to methods defined in its respective inline module" do
-      result = parse('foo')
-      result.should_not be_nil
-      result.should respond_to(:foo_method)
-    
-      result = parse('bar')
-      result.should_not be_nil
-      result.should respond_to(:bar_method)
-    
-      result = parse('baz')
-      result.should_not be_nil
-      result.should respond_to(:baz_method)
-    end
-  
-    it "upon parsing a string matching the second alternative, records the failure of the first terminal" do
-      result = parse('bar')
-      terminal_failures = parser.terminal_failures
-      terminal_failures.size.should == 1
-      failure = terminal_failures[0]
-      failure.expected_string.should == 'foo'
-      failure.index.should == 0
-    end
-  
-    it "upon parsing a string matching the third alternative, records the failure of the first two terminals" do
-      result = parse('baz')
-      
-      terminal_failures = parser.terminal_failures
-      
-      terminal_failures.size.should == 2
-
-      failure_1 = terminal_failures[0]
-      failure_1.expected_string == 'foo'
-      failure_1.index.should == 0
-    
-      failure_2 = terminal_failures[1]
-      failure_2.expected_string == 'bar'
-      failure_2.index.should == 0
-    end
-  end
-
-  describe "A choice between sequences" do
-    testing_expression "'foo' 'bar' 'baz'\n/\n'bing' 'bang' 'boom'"
-
-    it "successfully parses input matching any of the alternatives" do
-      parse('foobarbaz').should_not be_nil
-      parse('bingbangboom').should_not be_nil
-    end
-  end
-
-  describe "A choice between terminals followed by a block" do  
-    testing_expression "('a'/ 'b' / 'c') { def a_method; end }"
-
-    it "extends a match of any of its subexpressions with a module created from the block" do
-      ['a', 'b', 'c'].each do |letter|
-        parse(letter).should respond_to(:a_method)
-      end
-    end
-  end
-
-  module TestModule
-    def a_method
-    end
-  end
-
-  describe "a choice followed by a declared module" do  
-    testing_expression "('a'/ 'b' / 'c') <ChoiceSpec::TestModule>"
-
-    it "extends a match of any of its subexpressions with a module created from the block" do
-      ['a', 'b', 'c'].each do |letter|
-        parse(letter).should respond_to(:a_method)
-      end
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/circular_compilation_spec.rb

@@ -1,28 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-BENCHMARK = false
-
-module CircularCompilationSpec
-  describe "a parser for the metagrammar" do
-    attr_reader :parser
-    
-    before do
-      @parser = Treetop::Compiler::MetagrammarParser.new
-    end
-    
-    it "can parse the metagrammar.treetop whence it was generated" do
-      File.open(METAGRAMMAR_PATH, 'r') do |f|
-        metagrammar_source = f.read
-        result = parser.parse(metagrammar_source)
-        result.should_not be_nil
-
-        # generated_parser = result.compile
-        # Object.class_eval(generated_parser)
-        # parser_2 = Treetop::Compiler::MetagrammarParser.new
-        # optionally_benchmark do
-        #   result = parser_2.parse(metagrammar_source)
-        #   result.should_not be_nil
-        # end
-      end
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/failure_propagation_functional_spec.rb

@@ -1,21 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-describe "An expression for braces surrounding zero or more letters followed by semicolons" do
-  testing_expression "'{' ([a-z] ';')* '}'"
-  
-  it "parses matching input successfully" do
-    parse('{a;b;c;}').should_not be_nil
-  end
-  
-  it "fails to parse input with an expression that is missing a semicolon, reporting the terminal failure occurring at the maximum index" do
-    parse('{a;b;c}') do |result|
-      result.should be_nil
-      
-      terminal_failures = parser.terminal_failures
-      terminal_failures.size.should == 1      
-      failure = terminal_failures[0]
-      failure.index.should == 6
-      failure.expected_string.should == ';'
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/grammar_compiler_spec.rb

@@ -1,84 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-describe Compiler::GrammarCompiler do
-  attr_reader :compiler, :source_path_with_treetop_extension, :source_path_with_tt_extension, :target_path, :alternate_target_path
-  before do
-    @compiler = Compiler::GrammarCompiler.new
-
-    dir = File.dirname(__FILE__)
-    @source_path_with_treetop_extension = "#{dir}/test_grammar.treetop"
-    @source_path_with_do = "#{dir}/test_grammar_do.treetop"
-    @source_path_with_tt_extension = "#{dir}/test_grammar.tt"
-    @target_path = "#{dir}/test_grammar.rb"
-    @target_path_with_do = "#{dir}/test_grammar_do.rb"
-    @alternate_target_path = "#{dir}/test_grammar_alt.rb"
-    delete_target_files
-  end
-
-  after do
-    delete_target_files
-    Object.class_eval do
-      remove_const(:Test) if const_defined?(:Test)
-    end
-  end
-
-  specify "compilation of a single file to a default file name" do
-    File.exists?(target_path).should be_false
-    compiler.compile(source_path_with_treetop_extension)
-    File.exists?(target_path).should be_true
-    require target_path
-    Test::GrammarParser.new.parse('foo').should_not be_nil
-  end
-
-  specify "compilation of a single file to an explicit file name" do
-    File.exists?(alternate_target_path).should be_false
-    compiler.compile(source_path_with_treetop_extension, alternate_target_path)
-    File.exists?(alternate_target_path).should be_true
-    require alternate_target_path
-    Test::GrammarParser.new.parse('foo').should_not be_nil
-  end
-
-  specify "compilation of a single file without writing it to an output file" do
-    compiler.ruby_source(source_path_with_treetop_extension).should_not be_nil
-  end
-  
-  specify "ruby_source_from_string compiles a grammar stored in string" do
-    compiler.ruby_source_from_string(File.read(source_path_with_treetop_extension)).should_not be_nil
-  end
-
-  specify "Treetop.load_from_string compiles and evaluates a source grammar stored in string" do
-    Treetop.load_from_string File.read(source_path_with_treetop_extension)
-    Test::GrammarParser.new.parse('foo').should_not be_nil
-  end
-
-  specify "Treetop.load compiles and evaluates a source grammar with a .treetop extension" do    
-    Treetop.load source_path_with_treetop_extension
-    Test::GrammarParser.new.parse('foo').should_not be_nil
-  end
-  
-  specify "Treetop.load compiles and evaluates a source grammar with a .tt extension" do
-    path_without_extension = source_path_with_tt_extension
-    Treetop.load path_without_extension
-    Test::GrammarParser.new.parse('foo').should_not be_nil
-  end
-
-
-  specify "Treetop.load compiles and evaluates source grammar with no extension" do
-    path_without_extension = source_path_with_treetop_extension.gsub(/\.treetop\Z/, '')
-    Treetop.load path_without_extension
-    Test::GrammarParser.new.parse('foo').should_not be_nil
-  end
-
-  specify "grammars with 'do' compile" do
-    compiler.compile(@source_path_with_do)
-    require @target_path_with_do
-    Test::GrammarParser.new.parse('foo').should_not be_nil
-  end
-
-  def delete_target_files
-    File.delete(target_path) if File.exists?(target_path)
-    File.delete(@target_path_with_do) if File.exists?(@target_path_with_do)
-    File.delete(alternate_target_path) if File.exists?(alternate_target_path)
-  end
-end
-

data/lib/vendor/treetop/spec/compiler/grammar_spec.rb

@@ -1,41 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-module GrammarSpec
-  module Bar
-  end
-
-  describe "a grammar" do
-    testing_grammar %{
-      grammar Foo
-              # This comment should not cause a syntax error, nor should the following empty one
-              #
-        include GrammarSpec::Bar
-
-        rule foo
-          bar / baz
-        end
-
-        rule bar
-          'bar' 'bar'
-        end
-
-        rule baz
-          'baz' 'baz'
-        end
-      end
-    }
-
-    it "parses matching input" do
-      parse('barbar').should_not be_nil
-      parse('bazbaz').should_not be_nil
-    end
-
-    it "fails if it does not parse all input" do
-      parse('barbarbazbaz').should be_nil
-    end
-
-    it "mixes in included modules" do
-      self.class.const_get(:Foo).ancestors.should include(GrammarSpec::Bar)
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/nonterminal_symbol_spec.rb

@@ -1,40 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-module NonterminalSymbolSpec
-  describe "A nonterminal symbol followed by a block" do
-    testing_expression 'foo { def a_method; end }'
-  
-    parser_class_under_test.class_eval do
-      def _nt_foo
-        '_nt_foo called'
-      end
-    end
-  
-    it "compiles to a method call, extending its results with the anonymous module for the block" do
-      result = parse('')
-      result.should == '_nt_foo called'
-      result.should respond_to(:a_method)
-    end
-  end
-
-  module TestModule
-    def a_method
-    end
-  end
-
-  describe "a non-terminal followed by a module declaration" do
-    testing_expression 'foo <NonterminalSymbolSpec::TestModule>'
-  
-    parser_class_under_test.class_eval do
-      def _nt_foo
-        '_nt_foo called'
-      end
-    end
-  
-    it "compiles to a method call, extending its results with the anonymous module for the block" do
-      result = parse('')
-      result.should == '_nt_foo called'
-      result.should respond_to(:a_method)
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/not_predicate_spec.rb

@@ -1,38 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-module NotPredicateSpec
-  describe "A !-predicated terminal symbol" do
-    testing_expression '!"foo"'
-
-    it "fails to parse input matching the terminal symbol" do
-      parse('foo').should be_nil
-    end
-  end
-
-  describe "A sequence of a terminal and an and another !-predicated terminal" do
-    testing_expression '"foo" !"bar"'
-
-    it "fails to match input matching both terminals" do
-      parse('foobar').should be_nil
-    end
-  
-    it "successfully parses input matching the first terminal and not the second, reporting the parse failure of the second terminal" do
-      parse('foo') do |result|
-        result.should_not be_nil
-        terminal_failures = parser.terminal_failures
-        terminal_failures.size.should == 1
-        failure = terminal_failures.first
-        failure.index.should == 3
-        failure.expected_string.should == 'bar'
-      end
-    end
-  end
-
-  describe "A !-predicated sequence" do
-    testing_expression '!("a" "b" "c")'
-
-    it "fails to parse matching input" do
-      parse('abc').should be_nil
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/one_or_more_spec.rb

@@ -1,35 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-module OneOrMoreSpec
-  class Foo < Treetop::Runtime::SyntaxNode
-  end
-
-  describe "one or more of a terminal symbol followed by a node class declaration and a block" do
-    testing_expression '"foo"+ <OneOrMoreSpec::Foo> { def a_method; end }'
-
-    it "fails to parse epsilon, reporting a failure" do
-      parse('') do |result|
-        result.should be_nil
-        terminal_failures = parser.terminal_failures
-        terminal_failures.size.should == 1
-        failure = terminal_failures.first
-        failure.index.should == 0
-        failure.expected_string.should == 'foo'
-      end
-    end
-  
-    it "successfully parses two of that terminal in a row, returning an instance of the declared node class and reporting the failure the third parsing attempt" do
-      parse("foofoo") do |result|
-        result.should_not be_nil
-        result.should be_an_instance_of(Foo)
-        result.should respond_to(:a_method)
-        
-        terminal_failures = parser.terminal_failures
-        terminal_failures.size.should == 1
-        failure = terminal_failures.first
-        failure.index.should == 6
-        failure.expected_string.should == 'foo'
-      end
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/optional_spec.rb

@@ -1,37 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-module OptionalSpec
-  describe "An optional terminal symbol" do
-    testing_expression '"foo"?'
-  
-    it "parses input matching the terminal" do
-      parse('foo').should_not be_nil
-    end
-  
-    it "parses epsilon, recording a failure" do
-      parse('') do |result|
-        result.should_not be_nil
-        result.interval.should == (0...0)
-        
-        terminal_failures = parser.terminal_failures
-        terminal_failures.size.should == 1
-        failure = terminal_failures.first
-        failure.index.should == 0
-        failure.expected_string.should == 'foo'
-      end
-    end
-  
-    it "parses input not matching the terminal, returning an epsilon result and recording a failure" do
-      parse('bar', :consume_all_input => false) do |result|
-        result.should_not be_nil
-        result.interval.should == (0...0)
-        
-        terminal_failures = parser.terminal_failures
-        terminal_failures.size.should == 1
-        failure = terminal_failures.first
-        failure.index.should == 0
-        failure.expected_string.should == 'foo'
-      end
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/parenthesized_expression_spec.rb

@@ -1,19 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-module ParenthesizedExpressionSpec
-  describe "An unadorned expression inside of parentheses" do
-    testing_expression '("foo")'
-  
-    it "should behave as normal" do
-      parse('foo').should_not be_nil
-    end
-  end
-
-  describe "A prefixed-expression inside of parentheses" do
-    testing_expression '(!"foo")'
-  
-    it "should behave as normal" do
-      parse('foo').should be_nil
-    end
-  end
-end

data/lib/vendor/treetop/spec/compiler/parsing_rule_spec.rb

@@ -1,32 +0,0 @@
-require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
-
-module ParsingRuleSpec
-  describe "a grammar with one parsing rule" do
-
-    testing_grammar %{
-      grammar Foo
-        rule bar
-          "baz"
-        end
-      end
-    }
-
-    it "stores and retrieves nodes in its node cache" do
-      parser = self.class.const_get(:FooParser).new
-      parser.send(:prepare_to_parse, 'baz')
-      node_cache = parser.send(:node_cache)
-    
-      node_cache[:bar][0].should be_nil
-    
-      parser._nt_bar
-    
-      cached_node = node_cache[:bar][0]        
-      cached_node.should be_an_instance_of(Runtime::SyntaxNode)
-      cached_node.text_value.should == 'baz'
-    
-      parser.instance_eval { @index = 0 }
-      parser._nt_bar.should equal(cached_node)
-      parser.index.should == cached_node.interval.end
-    end
-  end
-end