Add specs for ExpectationReporter

There is currently a segfault with this test code.
The issue will be addressed in the next commit.

spec/expectations/expectation_reporter_spec.cr

@@ -0,0 +1,117 @@
+require "../spec_helper"
+
+describe Spectator::Expectations::ExpectationReporter do
+  describe "#report" do
+    context "with raise flag set" do
+      context "given a successful result" do
+        it "stores the result" do
+          value = 42
+          partial = Spectator::Expectations::ValueExpectationPartial.new(value.to_s, value)
+          matcher = Spectator::Matchers::EqualityMatcher.new(value.to_s, value)
+          expectation = Spectator::Expectations::ValueExpectation.new(partial, matcher)
+          result = expectation.eval
+          result.successful?.should be_true # Sanity check.
+          reporter = Spectator::Expectations::ExpectationReporter.new(true)
+          reporter.report(result)
+          reporter.results.should contain(result)
+        end
+      end
+
+      context "given a failed result" do
+        it "raises and error" do
+          value1 = 42
+          value2 = 777
+          partial = Spectator::Expectations::ValueExpectationPartial.new(value1)
+          matcher = Spectator::Matchers::EqualityMatcher.new(value2)
+          expectation = Spectator::Expectations::ValueExpectation.new(partial, matcher)
+          result = expectation.eval
+          result.successful?.should be_false # Sanity check.
+          reporter = Spectator::Expectations::ExpectationReporter.new(true)
+          expect_raises(Spectator::ExpectationFailed) { reporter.report(result) }
+        end
+
+        it "stores the result" do
+          value1 = 42
+          value2 = 777
+          partial = Spectator::Expectations::ValueExpectationPartial.new(value1)
+          matcher = Spectator::Matchers::EqualityMatcher.new(value2)
+          expectation = Spectator::Expectations::ValueExpectation.new(partial, matcher)
+          result = expectation.eval
+          result.successful?.should be_false # Sanity check.
+          reporter = Spectator::Expectations::ExpectationReporter.new(true)
+          begin
+            reporter.report(result)
+          rescue
+            # Ignore error, not testing that in this example.
+          end
+          reporter.results.should contain(result)
+        end
+      end
+    end
+
+    context "with raise flag not set" do
+      context "given a successful result" do
+        it "stores the result" do
+          value = 42
+          partial = Spectator::Expectations::ValueExpectationPartial.new(value)
+          matcher = Spectator::Matchers::EqualityMatcher.new(value)
+          expectation = Spectator::Expectations::ValueExpectation.new(partial, matcher)
+          result = expectation.eval
+          result.successful?.should be_true # Sanity check.
+          reporter = Spectator::Expectations::ExpectationReporter.new(false)
+          reporter.report(result)
+          reporter.results.should contain(result)
+        end
+      end
+
+      context "given a failed result" do
+        it "stores the result" do
+          value1 = 42
+          value2 = 777
+          partial = Spectator::Expectations::ValueExpectationPartial.new(value1)
+          matcher = Spectator::Matchers::EqualityMatcher.new(value2)
+          expectation = Spectator::Expectations::ValueExpectation.new(partial, matcher)
+          result = expectation.eval
+          result.successful?.should be_false # Sanity check.
+          reporter = Spectator::Expectations::ExpectationReporter.new(false)
+          reporter.report(result)
+          reporter.results.should contain(result)
+        end
+      end
+    end
+  end
+
+  describe "#results" do
+    context "with no expectations" do
+      it "is empty" do
+        reporter = Spectator::Expectations::ExpectationReporter.new
+        reporter.results.size.should eq(0)
+      end
+    end
+
+    context "with multiple expectations" do
+      it "contains all expectations" do
+        value1 = 42
+        value2 = 777
+        partial = Spectator::Expectations::ValueExpectationPartial.new(value1)
+        matcher = Spectator::Matchers::EqualityMatcher.new(value1)
+        expectation = Spectator::Expectations::ValueExpectation.new(partial, matcher)
+        result1 = expectation.eval
+        partial = Spectator::Expectations::ValueExpectationPartial.new(value1)
+        matcher = Spectator::Matchers::EqualityMatcher.new(value2)
+        expectation = Spectator::Expectations::ValueExpectation.new(partial, matcher)
+        result2 = expectation.eval
+
+        reporter = Spectator::Expectations::ExpectationReporter.new(false)
+        begin
+          reporter.report(result1)
+          reporter.report(result2)
+        rescue
+          # Ignore errors for this test.
+        end
+        reporter.results.should contain(result1)
+        reporter.results.should contain(result2)
+      end
+    end
+  end
+end