on master help sign in
UTCTime roundtrip does not need approximate equality
69248f5Bryan O'Sullivan
tests/Properties.hs+1−1
@@ -110,7 +110,7 @@ tests = [
110 , testProperty "Text" $ roundTripEq T.empty
110 , testProperty "Text" $ roundTripEq T.empty
111 , testProperty "Foo" $ roundTripEq (undefined::Foo)
111 , testProperty "Foo" $ roundTripEq (undefined::Foo)
112 , testProperty "DotNetTime" $ roundTripEq (undefined :: Approx DotNetTime)
112 , testProperty "DotNetTime" $ roundTripEq (undefined :: Approx DotNetTime)
113− , testProperty "UTCTime" $ roundTripEq (undefined :: Approx UTCTime)
113+ , testProperty "UTCTime" $ roundTripEq (undefined :: UTCTime)
114 , testProperty "ZonedTime" $ roundTripEq (undefined::ZonedTime)
114 , testProperty "ZonedTime" $ roundTripEq (undefined::ZonedTime)
115#ifdef GHC_GENERICS
115#ifdef GHC_GENERICS
116 , testGroup "ghcGenerics" [
116 , testGroup "ghcGenerics" [