Swap arguments

2017-11-11 10:30:57 +03:00
parent 44dd3aad0a
commit 8199c1bd57
2 changed files with 9 additions and 9 deletions
--- a/test/Spec.hs
+++ b/test/Spec.hs
@ -3,11 +3,11 @@ import Test.QuickCheck
 import Control.Exception (evaluate)
 import Data.Dates

-import Lib (check)
+import Lib (match)

 main :: IO ()
 main = hspec $ do
  describe "Cron ckecker" $ do
    it "matches asterisks" $ do
-      check (DateTime 2017 10 11 0 0 0) "* * * * *" `shouldBe` (True :: Bool)
+      match "* * * * *" (DateTime 2017 10 11 0 0 0) `shouldBe` (True :: Bool)