d-parse 0.1

data/spec/d-parse/parsers/string_spec.rb

@@ -0,0 +1,19 @@
+describe DParse::Parsers::String do
+  let(:parser) { described_class.new('donkey') }
+
+  example { expect(parser).to parse('donkey').up_to(6) }
+  example { expect(parser).to parse('donkeys').up_to(6) }
+  example { expect(parser).to parse('donkey mania').up_to(6) }
+
+  example { expect(parser).not_to parse('') }
+  example { expect(parser).not_to parse('d') }
+  example { expect(parser).not_to parse('donke') }
+  example { expect(parser).not_to parse('some donkey') }
+  example { expect(parser).not_to parse('giraffe') }
+
+  describe '#inspect' do
+    subject { parser.inspect }
+
+    it { is_expected.to eql('seq(char("d"),char("o"),char("n"),char("k"),char("e"),char("y"))') }
+  end
+end

data/spec/d-parse/parsers/succeed_spec.rb

@@ -0,0 +1,12 @@
+describe DParse::Parsers::Succeed do
+  let(:parser) { described_class.new }
+
+  example { expect(parser).to parse('').up_to(0).line(0).column(0) }
+  example { expect(parser).to parse('a').up_to(0).line(0).column(0) }
+
+  describe '#inspect' do
+    subject { parser.inspect }
+
+    it { is_expected.to eql('succeed()') }
+  end
+end

data/spec/d-parse/parsers/whitespace_char_spec.rb

@@ -0,0 +1,14 @@
+describe DParse::Parsers::WhitespaceChar do
+  let(:parser) { described_class.new }
+
+  example { expect(parser).to parse(' ').up_to(1) }
+  example { expect(parser).to parse("\t").up_to(1) }
+  example { expect(parser).to parse("\t ").up_to(1) }
+  example { expect(parser).to parse(" \t").up_to(1) }
+
+  describe '#inspect' do
+    subject { parser.inspect }
+
+    it { is_expected.to eql('alt(char(" "),char("\\t"))') }
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,97 @@
+require 'rspec'
+require 'coveralls'
+
+Coveralls.wear!
+
+require 'd-parse'
+
+RSpec::Matchers.define :parse do |text|
+  match do |actual|
+    res = actual.apply(text)
+
+    conditions = [
+      res.is_a?(DParse::Success),
+      -> { (@new_pos.nil? || res.pos.index == @new_pos) },
+      -> { (@line.nil? || res.pos.line == @line) },
+      -> { (@column.nil? || res.pos.column == @column) },
+      -> { (@capture.nil? || @capture == res.data) },
+    ]
+
+    conditions.all? { |e| e.respond_to?(:call) ? e.call : e }
+  end
+
+  match_when_negated do |actual|
+    res = actual.read(text, DParse::Position.new)
+
+    conditions = [
+      res.is_a?(DParse::Failure),
+      -> { (@new_pos.nil? || res.pos.index == @new_pos) },
+      -> { (@line.nil? || res.pos.line == @line) },
+      -> { (@column.nil? || res.pos.column == @column) },
+      -> { (@failure_msg.nil? || res.message == @failure_msg) },
+    ]
+
+    conditions.all? { |e| e.respond_to?(:call) ? e.call : e }
+  end
+
+  failure_message do |actual| # expected success, is other success or failure
+    res = actual.read(text, DParse::Position.new)
+
+    s = []
+    s << "parse #{expected.inspect}"
+    case res
+    when DParse::Failure
+      s << "and not fail (rather than fail with #{res.message.inspect})"
+    when DParse::Success
+      s << "up to position #{@new_pos} (rather than #{res.pos.index})" if @new_pos && @new_pos != res.pos.index
+      s << "line #{@line} (rather than #{res.pos.line})" if @line && @line != res.pos.line
+      s << "column #{@column} (rather than #{res.pos.column})" if @column && @column != res.pos.column
+      s << "and capture #{@capture.inspect} (rather than #{res.data.inspect})" if @capture && @capture != res.data
+    end
+
+    "expected #{actual} to #{s.join(' ')}"
+  end
+
+  failure_message_when_negated do |actual| # expected failure, is other failure or success
+    res = actual.read(text, DParse::Position.new)
+
+    s = []
+    s << "not to parse #{expected.inspect}"
+    case res
+    when DParse::Success
+      s << "and fail (rather than parse up to #{res.pos.inspect})"
+    when DParse::Failure
+      buts = []
+      buts << "with #{@failure_msg.inspect} (rather than #{res.message.inspect})" if @failure_msg && @failure_msg != res.message
+      buts << "at position #{@new_pos} (rather than #{res.pos.index})" if @new_pos && @new_pos != res.pos.index
+      buts << "line #{@line} (rather than #{res.pos.line})" if @line && @line != res.pos.line
+      buts << "column #{@column} (rather than #{res.pos.column})" if @column && @column != res.pos.column
+
+      s <<
+        if buts.any?
+          "and fail, but #{buts.join(', ')}"
+        else
+          'and fail'
+        end
+    end
+
+    "expected #{actual} to #{s.join(' ')}"
+  end
+
+  chain :up_to, :new_pos
+  chain :and_fail_at, :new_pos
+  chain :column, :column
+  chain :line, :line
+
+  chain :and_capture, :capture
+
+  chain :with_failure, :failure_msg
+
+  description do
+    s = []
+    s << "parse #{expected.inspect}"
+    s << "up to position #{@new_pos}" if @new_pos
+    s << "and capture #{@capture.inspect}" if @capture
+    s.join(' ')
+  end
+end

metadata

@@ -0,0 +1,140 @@
+--- !ruby/object:Gem::Specification
+name: d-parse
+version: !ruby/object:Gem::Version
+  version: '0.1'
+platform: ruby
+authors:
+- Denis Defreyne
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2016-07-02 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 1.11.2
+    - - "<"
+      - !ruby/object:Gem::Version
+        version: '2.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: 1.11.2
+    - - "<"
+      - !ruby/object:Gem::Version
+        version: '2.0'
+description: D★Parse is a library for building parser combinators.
+email: denis.defreyne@stoneship.org
+executables: []
+extensions: []
+extra_rdoc_files:
+- LICENSE
+- README.md
+- NEWS.md
+files:
+- Gemfile
+- Gemfile.lock
+- Guardfile
+- LICENSE
+- NEWS.md
+- README.md
+- Rakefile
+- d-parse.gemspec
+- lib/d-parse.rb
+- lib/d-parse/dsl.rb
+- lib/d-parse/failure.rb
+- lib/d-parse/parser.rb
+- lib/d-parse/parsers.rb
+- lib/d-parse/parsers/combinators/alt.rb
+- lib/d-parse/parsers/combinators/repeat.rb
+- lib/d-parse/parsers/combinators/seq.rb
+- lib/d-parse/parsers/highlevel/char_in.rb
+- lib/d-parse/parsers/highlevel/intersperse.rb
+- lib/d-parse/parsers/highlevel/json.rb
+- lib/d-parse/parsers/highlevel/opt.rb
+- lib/d-parse/parsers/highlevel/string.rb
+- lib/d-parse/parsers/highlevel/whitespace_char.rb
+- lib/d-parse/parsers/modifiers/capturing.rb
+- lib/d-parse/parsers/modifiers/describe.rb
+- lib/d-parse/parsers/modifiers/ignore.rb
+- lib/d-parse/parsers/modifiers/lazy.rb
+- lib/d-parse/parsers/modifiers/map.rb
+- lib/d-parse/parsers/primitives/any.rb
+- lib/d-parse/parsers/primitives/bind.rb
+- lib/d-parse/parsers/primitives/char.rb
+- lib/d-parse/parsers/primitives/char_not.rb
+- lib/d-parse/parsers/primitives/char_not_in.rb
+- lib/d-parse/parsers/primitives/eof.rb
+- lib/d-parse/parsers/primitives/except.rb
+- lib/d-parse/parsers/primitives/fail.rb
+- lib/d-parse/parsers/primitives/succeed.rb
+- lib/d-parse/position.rb
+- lib/d-parse/success.rb
+- lib/d-parse/version.rb
+- samples/parse-bind
+- samples/parse-csv
+- samples/parse-errortest
+- samples/parse-fun
+- samples/parse-json
+- samples/parse-readme
+- spec/d-parse/failure_spec.rb
+- spec/d-parse/parser_spec.rb
+- spec/d-parse/parsers/alt_spec.rb
+- spec/d-parse/parsers/any_spec.rb
+- spec/d-parse/parsers/bind_spec.rb
+- spec/d-parse/parsers/capture_spec.rb
+- spec/d-parse/parsers/char_in_spec.rb
+- spec/d-parse/parsers/char_not_in_spec.rb
+- spec/d-parse/parsers/char_not_spec.rb
+- spec/d-parse/parsers/char_spec.rb
+- spec/d-parse/parsers/describe_spec.rb
+- spec/d-parse/parsers/end_of_input_spec.rb
+- spec/d-parse/parsers/except_spec.rb
+- spec/d-parse/parsers/fail_spec.rb
+- spec/d-parse/parsers/intersperse_spec.rb
+- spec/d-parse/parsers/json_spec.rb
+- spec/d-parse/parsers/lazy_spec.rb
+- spec/d-parse/parsers/map_spec.rb
+- spec/d-parse/parsers/optional_spec.rb
+- spec/d-parse/parsers/or_spec.rb
+- spec/d-parse/parsers/repeat_spec.rb
+- spec/d-parse/parsers/sequence_spec.rb
+- spec/d-parse/parsers/string_spec.rb
+- spec/d-parse/parsers/succeed_spec.rb
+- spec/d-parse/parsers/whitespace_char_spec.rb
+- spec/spec_helper.rb
+homepage: http://rubygems.org/gems/d-parse
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options:
+- "--main"
+- README.md
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: 2.1.0
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.6.6
+signing_key: 
+specification_version: 4
+summary: parser combinator library
+test_files: []
+has_rdoc: