Commit 57da5f95 authored by Mael NICOLAS's avatar Mael NICOLAS

remove test for now

parent 40809926
......@@ -20,8 +20,9 @@ fromRFC3339Inv :: Either ParseError ZonedTime -> Text
fromRFC3339Inv (Right z) = toRFC3339 z
fromRFC3339Inv (Left pe) = pack $ show pe
testFromRFC3339 :: IO ()
{-testFromRFC3339 :: IO ()
testFromRFC3339 = hspec $ do
describe "Test fromRFC3339: " $ do
it "is the inverse of Duckling's toRFC3339" $ property $
\x -> (fromRFC3339 . fromRFC3339Inv) x == (x :: Either ParseError ZonedTime)
--}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment