Contents

require 'rspec/matchers'

module RSpec
  module Matchers
    module Dalton
      class ClojureEqual < BuiltIn::BaseMatcher
        def match(expected, actual)
          ::Dalton::Utility.clojure_equal?(actual, expected)
        end

        def failure_message_for_should
          return <<-MESSAGE

expected #{inspect_object(expected)}
     got #{inspect_object(actual)}

Compared using clojure_equal?, which compares using clojure.core/=

MESSAGE
        end

        def failure_message_for_should_not
          return <<-MESSAGE

expected not #{inspect_object(actual)}
         got #{inspect_object(expected)}

Compared using clojure_equal?, which compares using clojure.core/=

MESSAGE
        end

        def diffable?; true; end

        private

        def inspect_object(o)
          "#<#{o.class}:#{o.object_id}> => #{o.to_edn}"
        end

        def eq_expression
          Expectations::Syntax.positive_expression("actual", "clojure_equal?(expected)")
        end
      end
    end

    def clojure_equal(expected)
      Dalton::ClojureEqual.new(expected)
    end

  end
end

Version data entries

1 entries across 1 versions & 1 rubygems

Version	Path
dalton-0.0.1	spec/support/clojure_equal_matcher.rb