mail 1.3.3 → 1.3.4

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

@@ -0,0 +1,28 @@
+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-1.4.3/spec/compiler/failure_propagation_functional_spec.rb

@@ -0,0 +1,21 @@
+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-1.4.3/spec/compiler/grammar_compiler_spec.rb

@@ -0,0 +1,84 @@
+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-1.4.3/spec/compiler/grammar_spec.rb

@@ -0,0 +1,41 @@
+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-1.4.3/spec/compiler/multibyte_chars_spec.rb

@@ -0,0 +1,46 @@
+#!ruby19
+# encoding: utf-8
+
+require File.expand_path("#{File.dirname(__FILE__)}/../spec_helper")
+
+# Require ActiveSupport for multibyte strings
+begin
+  require 'active_support'
+rescue
+  gem 'activesupport'
+  require 'active_support'
+end
+
+module MultibyteCharsSpec
+  describe "an anything symbol" do
+    testing_expression '.'
+    it "matches an UTF-8 character" do
+      parse_multibyte("ø").should_not be_nil
+    end
+  end
+  
+  describe "A character class containing UTF-8 characters" do
+    testing_expression "[æøå]"
+    it "recognizes the UTF-8 characters" do
+      parse_multibyte("ø").should_not be_nil
+    end
+  end
+  
+  describe "a character class repetition containing UTF-8 characters mixed with other expressions" do
+    testing_expression '[æøå]+ "a"'
+    it "lazily instantiates a node for the character" do
+      result = parse_multibyte('æøåa')
+      pending "Multibyte support is not supported in Ruby 1.8.6" if RUBY_VERSION =~ /^1\.8.6/
+      result.elements[0].instance_variable_get("@elements").should include(true)
+      result.elements[0].elements.should_not include(true)
+      result.elements[0].elements.size.should == 3
+      result.elements.size.should == 2
+      result.elements[0].text_value.should == "æøå"
+      result.elements[0].elements[0].text_value.should == "æ"
+      result.elements[0].elements[1].text_value.should == "ø"
+      result.elements[0].elements[2].text_value.should == "å"
+      result.elements[1].text_value == "a"
+    end
+  end
+  
+end

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

@@ -0,0 +1,40 @@
+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-1.4.3/spec/compiler/not_predicate_spec.rb

@@ -0,0 +1,38 @@
+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-1.4.3/spec/compiler/one_or_more_spec.rb

@@ -0,0 +1,35 @@
+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-1.4.3/spec/compiler/optional_spec.rb

@@ -0,0 +1,37 @@
+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-1.4.3/spec/compiler/parenthesized_expression_spec.rb

@@ -0,0 +1,19 @@
+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-1.4.3/spec/compiler/parsing_rule_spec.rb

@@ -0,0 +1,61 @@
+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
+  
+  
+  describe "a grammar with choice that uses the cache and has a subsequent expression" do    
+    testing_grammar %{
+      grammar Logic
+        rule expression
+          value_plus
+          /
+          value
+        end
+
+        rule value_plus
+          value "something else"
+        end
+
+        rule value
+          [a-z]
+          /
+          "foobar" # the subsequent expression that needs cached.interval.end
+        end
+      end
+    }
+    
+    it "parses a single-character value and generates a node from the cache" do
+      result = parse('a')
+      result.should be_a(Treetop::Runtime::SyntaxNode)
+      result.elements.should be_nil
+    end
+  end
+end