summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2018-07-22 14:30:36 +0800
committerSean Whitton <spwhitton@spwhitton.name>2018-07-22 14:30:36 +0800
commit5e47ead106bebfd076d950934fbe11d9f1ef552c (patch)
treee1c73c513ccd98ba48ea022c063272e6a8d4c8b1
parentb17e6126389b9276bc8c50ea677ca9f2c0b27724 (diff)
downloadgit-repair-5e47ead106bebfd076d950934fbe11d9f1ef552c.tar.gz
patch duplicate Arbitrary instance out of Utility/QuickCheck.hs
-rw-r--r--Utility/QuickCheck.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/Utility/QuickCheck.hs b/Utility/QuickCheck.hs
index 8db03f4..2009476 100644
--- a/Utility/QuickCheck.hs
+++ b/Utility/QuickCheck.hs
@@ -33,9 +33,6 @@ instance (Arbitrary v, Eq v, Ord v) => Arbitrary (S.Set v) where
instance Arbitrary POSIXTime where
arbitrary = fromInteger <$> nonNegative arbitrarySizedIntegral
-instance Arbitrary EpochTime where
- arbitrary = fromInteger <$> nonNegative arbitrarySizedIntegral
-
{- Pids are never negative, or 0. -}
instance Arbitrary ProcessID where
arbitrary = arbitrarySizedBoundedIntegral `suchThat` (> 0)