neg 0.2.0

data/spec/parser_sequence_spec.rb

@@ -0,0 +1,65 @@
+
+require 'spec_helper'
+
+
+describe Neg::Parser::SequenceParser do
+
+  class SeqParser < Neg::Parser
+    text == `x` + `y`
+  end
+
+  it 'parses' do
+
+    SeqParser.parse('xy').should ==
+      [ :text, true, [ 0, 1, 1 ], [
+        [ nil, true, [ 0, 1, 1 ], 'x' ],
+        [ nil, true, [ 1, 1, 2 ], 'y' ] ] ]
+  end
+
+  it 'fails gracefully' do
+
+    SeqParser.parse('xx').should ==
+      [ :text, false, [ 0, 1, 1 ], [
+        [ nil, true, [ 0, 1, 1 ], 'x' ],
+        [ nil, false, [ 1, 1, 2 ], 'expected "y", got "x"' ] ] ]
+  end
+
+  it 'goes beyond two elements' do
+
+    parser = Class.new(Neg::Parser) do
+      text == `x` + `y` + `z`
+    end
+
+    text = parser.text
+
+    text.class.should ==
+      Neg::Parser::NonTerminalParser
+    text.child.children.collect(&:class).should ==
+      [ Neg::Parser::StringParser ] * 3
+  end
+
+  it 'backtracks correctly' do
+
+    parser = Class.new(Neg::Parser) do
+      word    == poodle | pool
+      poodle  == `poo` + `dle`
+      pool    == `poo` + `l`
+    end
+
+    parser.parse('pool').should ==
+      [ :word,
+        true,
+        [ 0, 1, 1 ],
+        [ [ :poodle,
+            false,
+            [ 0, 1, 1 ],
+            [ [ nil, true, [ 0, 1, 1 ], "poo" ],
+              [ nil, false, [ 3, 1, 4 ], "expected \"dle\", got \"l\"" ] ] ],
+          [ :pool,
+            true,
+            [ 0, 1, 1],
+            [ [ nil, true, [ 0, 1, 1 ], "poo" ],
+              [ nil, true, [ 3, 1, 4 ], "l" ] ] ] ] ]
+  end
+end
+

data/spec/parser_spec.rb

@@ -0,0 +1,48 @@
+
+require 'spec_helper'
+
+
+describe 'Neg::Parser' do
+
+  describe 'using parentheses' do
+
+    it 'influences precedence' do
+
+      parser = Class.new(Neg::Parser) do
+        t0 == `x` + `y` | `z`
+        t1 == (`x` | `y`) + `z`
+      end
+
+      parser.t0.to_s.should == 't0 == ((`x` + `y`) | `z`)'
+      parser.t1.to_s.should == 't1 == ((`x` | `y`) + `z`)'
+    end
+  end
+
+  describe '.parse' do
+
+    let(:parser) {
+      Class.new(Neg::Parser) do
+        text == `x`
+      end
+    }
+
+    it 'raises on unconsumed input' do
+
+      lambda {
+        parser.parse('xy')
+      }.should raise_error(
+        Neg::UnconsumedInputError,
+        'remaining: "y"')
+    end
+
+    it 'raises on unconsumed input (...)' do
+
+      lambda {
+        parser.parse('xyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy')
+      }.should raise_error(
+        Neg::UnconsumedInputError,
+        'remaining: "yyyyyyy..."')
+    end
+  end
+end
+

data/spec/parser_string_spec.rb

@@ -0,0 +1,41 @@
+
+require 'spec_helper'
+
+
+describe Neg::Parser::StringParser do
+
+  context 'standalone' do
+
+    it 'parses' do
+
+      parser = Neg::Parser::StringParser.new('xxx')
+
+      parser.parse('xxx').should ==
+        [ nil, true, [ 0, 1, 1 ], 'xxx' ]
+    end
+
+    it 'fails gracefully' do
+
+      parser = Neg::Parser::StringParser.new('xxx')
+
+      parser.parse('yyy').should ==
+        [ nil, false, [ 0, 1, 1 ], 'expected "xxx", got "yyy"' ]
+    end
+  end
+
+  context 'within Neg::Parser' do
+
+    let(:parser) {
+      Class.new(Neg::Parser) do
+        root == `x`
+      end
+    }
+
+    it 'parses an exact string' do
+
+      parser.parse('x').should ==
+        [ :root, true, [ 0, 1, 1 ], 'x' ]
+    end
+  end
+end
+

data/spec/sample_json_parser_spec.rb

@@ -0,0 +1,83 @@
+
+require 'spec_helper'
+
+
+describe 'sample JSON parser' do
+
+  class JsonParser < Neg::Parser
+
+    #rule(:spaces) { match('\s').repeat(1) }
+    #rule(:spaces?) { spaces.maybe }
+
+    #rule(:comma) { spaces? >> str(',') >> spaces? }
+    #rule(:digit) { match('[0-9]') }
+
+    #rule(:number) {
+    #  (
+    #    str('-').maybe >> (
+    #      str('0') | (match('[1-9]') >> digit.repeat)
+    #    ) >> (
+    #      str('.') >> digit.repeat(1)
+    #    ).maybe >> (
+    #      match('[eE]') >> (str('+') | str('-')).maybe >> digit.repeat(1)
+    #    ).maybe
+    #  ).as(:number)
+    #}
+
+    #rule(:array) {
+    #  str('[') >> spaces? >>
+    #  (value >> (comma >> value).repeat).maybe.as(:array) >>
+    #  spaces? >> str(']')
+    #}
+
+    #rule(:object) {
+    #  str('{') >> spaces? >>
+    #  (entry >> (comma >> entry).repeat).maybe.as(:object) >>
+    #  spaces? >> str('}')
+    #}
+
+    #rule(:entry) {
+    #  (
+    #     string.as(:key) >> spaces? >>
+    #     str(':') >> spaces? >>
+    #     value.as(:val)
+    #  ).as(:entry)
+    #}
+
+    #rule(:attribute) { (entry | value).as(:attribute) }
+
+    json == spaces? + value + spaces?
+
+    value == string | number | object | array | btrue | bfalse | null
+
+    btrue == `true`
+    bfalse == `false`
+    null == `null`
+
+    # TODO: continue here with "string"
+
+    #rule(:string) {
+    #  str('"') >> (
+    #    str('\\') >> any | str('"').absent? >> any
+    #  ).repeat.as(:string) >> str('"')
+    #}
+
+    #rule(:value) {
+    #  string | number |
+    #  object | array |
+    #  str('true').as(:true) | str('false').as(:false) |
+    #  str('null').as(:null)
+    #}
+
+    #rule(:top) { spaces? >> value >> spaces? }
+    #root(:top)
+  end
+
+  it 'flips burgers' do
+
+    puts '-' * 80
+    puts JsonParser
+    puts '-' * 80
+  end
+end
+

data/spec/spec_helper.rb

@@ -0,0 +1,20 @@
+
+$:.unshift(File.expand_path('../../lib', __FILE__))
+
+require 'neg'
+
+
+class Neg::Parser::CompositeParser
+
+  attr_reader :children
+end
+
+class Neg::Parser::NonTerminalParser
+
+  attr_reader :child
+end
+
+
+#RSpec.configure do |config|
+#end
+

metadata

@@ -0,0 +1,97 @@
+--- !ruby/object:Gem::Specification
+name: neg
+version: !ruby/object:Gem::Version
+  version: 0.2.0
+  prerelease: 
+platform: ruby
+authors:
+- John Mettraux
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-09-16 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.9.0
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 2.9.0
+description: not a peg parser, just a neg narser
+email:
+- jmettraux@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- Rakefile
+- lib/neg/input.rb
+- lib/neg/parser.rb
+- lib/neg/version.rb
+- lib/neg.rb
+- spec/input_spec.rb
+- spec/parser_alternative_spec.rb
+- spec/parser_character_spec.rb
+- spec/parser_non_terminal_spec.rb
+- spec/parser_repetition_spec.rb
+- spec/parser_sequence_spec.rb
+- spec/parser_spec.rb
+- spec/parser_string_spec.rb
+- spec/sample_json_parser_spec.rb
+- spec/spec_helper.rb
+- neg.gemspec
+- LICENSE.txt
+- TODO.txt
+- CHANGELOG.md
+- README.md
+homepage: https://github.com/jmettraux/leg
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: ruote
+rubygems_version: 1.8.24
+signing_key: 
+specification_version: 3
+summary: a neg narser
+test_files: []