From d3bea30a6bd50ad691be4b88d8038c6c68d0bd83 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 20 Oct 2021 15:12:12 -0400 Subject: [PATCH] fix build failure on windows Utility.QuickCheck also has an instance Arbitrary FileID. It seems that this problem used to be ignored by ghc but now it notices it. --- Utility/InodeCache.hs | 5 ----- 1 file changed, 5 deletions(-) diff --git a/Utility/InodeCache.hs b/Utility/InodeCache.hs index 266b739735..b697ab34ed 100644 --- a/Utility/InodeCache.hs +++ b/Utility/InodeCache.hs @@ -300,11 +300,6 @@ instance Arbitrary MTime where , (50, MTimeHighRes <$> arbitrary) ] -#ifdef mingw32_HOST_OS -instance Arbitrary FileID where - arbitrary = fromIntegral <$> (arbitrary :: Gen Word64) -#endif - prop_read_show_inodecache :: InodeCache -> Bool prop_read_show_inodecache c = case readInodeCache (showInodeCache c) of Nothing -> False