diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2017-06-17 13:04:48 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2017-06-17 13:04:48 -0400 |
| commit | f2c83fe1c7bfefe3a59fef75fa6ecc93a8fd95e2 (patch) | |
| tree | b615affa7a75fe8508049706209daeb470444559 /Utility/QuickCheck.hs | |
| parent | 64662aaaf313fe681648d5b62171102b769eab99 (diff) | |
Fix build with QuickCheck 2.10.
QuickCheck added an Arbitrary instance for CTime aka EpochTime. However,
while git-annex's instance disallowed times before the epoch, QuickCheck's
does not. So, rather than using its instance, convert from an Integer.
This commit was sponsored by Thomas Hochstein on Patreon.
Diffstat (limited to 'Utility/QuickCheck.hs')
| -rw-r--r-- | Utility/QuickCheck.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/Utility/QuickCheck.hs b/Utility/QuickCheck.hs index 0181ea950..e89d103dd 100644 --- a/Utility/QuickCheck.hs +++ b/Utility/QuickCheck.hs @@ -35,9 +35,6 @@ instance (Arbitrary 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) |