Rewrite Satisfy to use blocks

1 files changed, 1 insertions, 3 deletions

diff --git a/spec/parcom_spec.cr b/spec/parcom_spec.cr
index bdf8b5b..5be59b9 100644
--- a/spec/parcom_spec.cr
+++ b/spec/parcom_spec.cr
@@ -190,8 +190,7 @@ describe Assert do
 end
 
 describe Satisfy do
-  test_f = ->(x : Char) { x == 't' }
-  p = Satisfy.new(test_f)
+  p = Satisfy(Char).new { |x| x == 't' }
 
   describe "#parse" do
     it "fails if the input is empty" do
@@ -210,7 +209,6 @@ describe Satisfy do
       result = p.parse(tokens)
 
       result.value.should eq(expected_char)
-      test_f.call(result.value).should be_true
     end
   end
 end