citrus 1.0.0

data/test/repeat_test.rb

@@ -0,0 +1,93 @@
+require File.dirname(__FILE__) + '/helper'
+
+class RepeatTest < Test::Unit::TestCase
+
+  def test_terminal?
+    rule = Repeat.new
+    assert_equal(false, rule.terminal?)
+  end
+
+  def test_match_zero_or_one
+    rule = Repeat.new(0, 1, 'a')
+
+    match = rule.match(input(''))
+    assert(match)
+    assert_equal('', match.text)
+    assert_equal(0, match.length)
+
+    match = rule.match(input('a'))
+    assert(match)
+    assert_equal('a', match.text)
+    assert_equal(1, match.length)
+  end
+
+  def test_match_one_or_more
+    rule = Repeat.new(1, Infinity, 'a')
+
+    match = rule.match(input(''))
+    assert_equal(nil, match)
+
+    match = rule.match(input('a'))
+    assert(match)
+    assert_equal('a', match.text)
+    assert_equal(1, match.length)
+
+    match = rule.match(input('a' * 200))
+    assert(match)
+    assert_equal('a' * 200, match.text)
+    assert_equal(200, match.length)
+  end
+
+  def test_match_one
+    rule = Repeat.new(1, 1, 'a')
+
+    match = rule.match(input(''))
+    assert_equal(nil, match)
+
+    match = rule.match(input('a'))
+    assert(match)
+    assert_equal('a', match.text)
+    assert_equal(1, match.length)
+  end
+
+  def test_operator
+    rule = Repeat.new(1, 2, '')
+    assert_equal('1*2', rule.operator)
+  end
+
+  def test_operator_asterisk
+    rule = Repeat.new(0, Infinity, '')
+    assert_equal('*', rule.operator)
+  end
+
+  def test_operator_question_mark
+    rule = Repeat.new(0, 1, '')
+    assert_equal('?', rule.operator)
+  end
+
+  def test_operator_plus
+    rule = Repeat.new(1, Infinity, '')
+    assert_equal('+', rule.operator)
+  end
+
+  def test_to_s
+    rule = Repeat.new(1, 2, /a/)
+    assert_equal('/a/1*2', rule.to_s)
+  end
+
+  def test_to_s_asterisk
+    rule = Repeat.new(0, Infinity, 'a')
+    assert_equal('"a"*', rule.to_s)
+  end
+
+  def test_to_s_question_mark
+    rule = Repeat.new(0, 1, 'a')
+    assert_equal('"a"?', rule.to_s)
+  end
+
+  def test_to_s_plus
+    rule = Repeat.new(1, Infinity, 'a')
+    assert_equal('"a"+', rule.to_s)
+  end
+
+end

data/test/rule_test.rb

@@ -0,0 +1,49 @@
+require File.dirname(__FILE__) + '/helper'
+
+class RuleTest < Test::Unit::TestCase
+
+  module MatchModule
+    def a_test; end
+  end
+
+  NumericProc = Proc.new {
+    def to_i
+      text.to_i
+    end
+
+    def to_f
+      text.to_f
+    end
+  }
+
+  NumericModule = Module.new(&NumericProc)
+
+  def test_match_module
+    rule = EqualRule.new('a')
+    rule.ext = MatchModule
+    match = rule.match(input('a'))
+    assert(match)
+    assert_kind_of(MatchModule, match)
+    assert_respond_to(match, :a_test)
+  end
+
+  def test_numeric_proc
+    rule = EqualRule.new(1)
+    rule.ext = NumericProc
+    match = rule.match(input('1'))
+    assert(match)
+    assert_equal(1, match.to_i)
+    assert_instance_of(Float, match.to_f)
+  end
+
+  def test_numeric_module
+    rule = EqualRule.new(1)
+    rule.ext = NumericModule
+    match = rule.match(input('1'))
+    assert(match)
+    assert_kind_of(NumericModule, match)
+    assert_equal(1, match.to_i)
+    assert_instance_of(Float, match.to_f)
+  end
+
+end

data/test/sequence_test.rb

@@ -0,0 +1,53 @@
+require File.dirname(__FILE__) + '/helper'
+
+class SequenceTest < Test::Unit::TestCase
+
+  def test_terminal?
+    rule = Sequence.new
+    assert_equal(false, rule.terminal?)
+  end
+
+  def test_match
+    rule = Sequence.new(%w<a b>)
+
+    match = rule.match(input(''))
+    assert_equal(nil, match)
+
+    match = rule.match(input('a'))
+    assert_equal(nil, match)
+
+    match = rule.match(input('ab'))
+    assert(match)
+    assert_equal('ab', match.text)
+    assert_equal(2, match.length)
+  end
+
+  def test_match_mixed
+    rule = Sequence.new([/\d+/, '+', /\d+/])
+    match = rule.match(input('1+2'))
+    assert(match)
+    assert_equal('1+2', match.text)
+    assert_equal(3, match.length)
+  end
+
+  def test_match_embed
+    rule = Sequence.new([/[0-9]+/, Choice.new(%w<+ ->), /\d+/])
+    match = rule.match(input('1+2'))
+    assert(match)
+    assert_equal('1+2', match.text)
+    assert_equal(3, match.length)
+  end
+
+  def test_to_s
+    rule = Sequence.new(%w<a b>)
+    assert_equal('"a" "b"', rule.to_s)
+  end
+
+  def test_to_s_embed
+    rule1 = Sequence.new(%w<a b>)
+    rule2 = Sequence.new(%w<c d>)
+    rule = Sequence.new([rule1, rule2])
+    assert_equal('("a" "b") ("c" "d")', rule.to_s)
+  end
+
+end

data/test/super_test.rb

@@ -0,0 +1,66 @@
+require File.dirname(__FILE__) + '/helper'
+Citrus.load(File.dirname(__FILE__) + '/_files/super')
+
+class SuperTest < Test::Unit::TestCase
+
+  def test_terminal?
+    rule = Super.new
+    assert_equal(false, rule.terminal?)
+  end
+
+  def test_match
+    grammar1 = Grammar.new {
+      rule :a, 'a'
+    }
+
+    grammar2 = Grammar.new {
+      include grammar1
+      rule :a, any('b', sup)
+    }
+
+    match = grammar2.parse('b')
+    assert(match)
+    assert('b', match.text)
+    assert(1, match.length)
+
+    match = grammar2.parse('a')
+    assert(match)
+    assert('a', match.text)
+    assert(1, match.length)
+  end
+
+  def test_peg
+    match = SuperTwo.parse('2')
+    assert(match)
+
+    match = SuperTwo.parse('1')
+    assert(match)
+  end
+
+  def test_nested
+    grammar1 = Grammar.new {
+      rule :a, 'a'
+      rule :b, 'b'
+    }
+
+    grammar2 = Grammar.new {
+      include grammar1
+      rule :a, any(sup, :b)
+      rule :b, sup
+    }
+
+    match = grammar2.parse('a')
+    assert(match)
+    assert_equal(:a, match.first.name)
+
+    match = grammar2.parse('b')
+    assert(match)
+    assert_equal(:b, match.first.name)
+  end
+
+  def test_to_s
+    rule = Super.new
+    assert_equal('super', rule.to_s)
+  end
+
+end

metadata

@@ -0,0 +1,133 @@
+--- !ruby/object:Gem::Specification 
+name: citrus
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 1
+  - 0
+  - 0
+  version: 1.0.0
+platform: ruby
+authors: 
+- Michael Jackson
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-05-13 00:00:00 -06:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: builder
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rake
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        version: "0"
+  type: :development
+  version_requirements: *id002
+description: Parsing Expressions for Ruby
+email: mjijackson@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README
+files: 
+- lib/citrus/debug.rb
+- lib/citrus/peg.rb
+- lib/citrus/sugar.rb
+- lib/citrus.rb
+- examples/calc.citrus
+- examples/calc.rb
+- examples/calc_sugar.rb
+- test/alias_test.rb
+- test/and_predicate_test.rb
+- test/calc_peg_test.rb
+- test/calc_sugar_test.rb
+- test/calc_test.rb
+- test/choice_test.rb
+- test/expression_test.rb
+- test/fixed_width_test.rb
+- test/grammar_test.rb
+- test/helper.rb
+- test/label_test.rb
+- test/match_test.rb
+- test/not_predicate_test.rb
+- test/peg_test.rb
+- test/repeat_test.rb
+- test/rule_test.rb
+- test/sequence_test.rb
+- test/super_test.rb
+- citrus.gemspec
+- Rakefile
+- README
+has_rdoc: true
+homepage: http://github.com/mjijackson/citrus
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Citrus
+- --main
+- Citrus
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: Parsing Expressions for Ruby
+test_files: 
+- test/alias_test.rb
+- test/and_predicate_test.rb
+- test/calc_peg_test.rb
+- test/calc_sugar_test.rb
+- test/calc_test.rb
+- test/choice_test.rb
+- test/expression_test.rb
+- test/fixed_width_test.rb
+- test/grammar_test.rb
+- test/label_test.rb
+- test/match_test.rb
+- test/not_predicate_test.rb
+- test/peg_test.rb
+- test/repeat_test.rb
+- test/rule_test.rb
+- test/sequence_test.rb
+- test/super_test.rb