Move helper methods and classes to their own directory

spec/helpers/expectations_helper.cr

@@ -0,0 +1,64 @@
+# Utility methods for creating expectations, partials, and matchers.
+
+def new_partial(label : String, actual : T) forall T
+  Spectator::Expectations::ValueExpectationPartial.new(label, actual)
+end
+
+def new_partial(actual : T = 123) forall T
+  new_partial(actual.to_s, actual)
+end
+
+def new_matcher(label : String, expected : T) forall T
+  Spectator::Matchers::EqualityMatcher.new(label, expected)
+end
+
+def new_matcher(expected : T = 123) forall T
+  new_matcher(expected.to_s, expected)
+end
+
+def new_expectation(expected : ExpectedType = 123, actual : ActualType = 123) forall ExpectedType, ActualType
+  partial = new_partial("foo", actual)
+  matcher = new_matcher("bar", expected)
+  Spectator::Expectations::ValueExpectation.new(partial, matcher)
+end
+
+def new_met_expectation(value : T = 123) forall T
+  new_expectation(value, value).tap do |expectation|
+    expectation.satisfied?.should be_true # Sanity check.
+  end
+end
+
+def new_unmet_expectation(expected : ExpectedType = 123, actual : ActualType = 456) forall ExpectedType, ActualType
+  new_expectation(expected, actual).tap do |expectation|
+    expectation.satisfied?.should be_false # Sanity check.
+  end
+end
+
+def new_successful_result
+  new_met_expectation.eval.tap do |result|
+    result.successful?.should be_true # Sanity check.
+  end
+end
+
+def new_failure_result
+  new_unmet_expectation.eval.tap do |result|
+    result.successful?.should be_false # Sanity check.
+  end
+end
+
+def generate_results(success_count = 1, failure_count = 0)
+  successful = Array.new(success_count) { new_successful_result }
+  failures = Array.new(failure_count) { new_failure_result }
+  results = (successful + failures).shuffle
+  reporter = Spectator::Expectations::ExpectationReporter.new(false)
+  results.each do |result|
+    reporter.report(result)
+  end
+  {successful: successful, failures: failures, results: results, reporter: reporter}
+end
+
+def report_results(success_count = 1, failure_count = 0)
+  harness = Spectator::Internals::Harness.current
+  success_count.times { harness.report_expectation(new_successful_result) }
+  failure_count.times { harness.report_expectation(new_failure_result) }
+end