Unbreak build

Author: phadej

.gitignore

@@ -1,5 +1,6 @@
 dist
 dist-newstyle
+.ghc.environment.*
 .cabal-sandbox/
 cabal.sandbox.config
 .stack-work/

aeson.cabal

@@ -225,7 +225,7 @@ test-suite tests
     unordered-containers,
     uuid-types,
     vector,
-    quickcheck-instances >=0.3.12
+    quickcheck-instances >=0.3.14
 
   if flag(bytestring-builder)
     build-depends: bytestring >= 0.9 && < 0.10.4,

tests/Instances.hs

@@ -16,15 +16,13 @@ import Data.Aeson.Types
 import Data.Function (on)
 import Data.Functor.Compose (Compose (..))
 import Data.Proxy (Proxy(..))
-import Data.Tagged (Tagged(..))
 import Data.Time (ZonedTime(..), TimeZone(..))
 import Data.Time.Clock (UTCTime(..))
 import Functions
 import Test.QuickCheck (Arbitrary(..), elements,  oneof)
 import Types
 import qualified Data.DList as DList
 import qualified Data.HashMap.Strict as HM
-import qualified Data.UUID.Types as UUID
 
 #if !MIN_VERSION_QuickCheck(2,9,0)
 import Control.Applicative (Const(..))
@@ -193,9 +191,6 @@ instance Arbitrary Natural where
 instance Arbitrary (Proxy a) where
     arbitrary = pure Proxy
 
-instance Arbitrary b => Arbitrary (Tagged a b) where
-    arbitrary = Tagged <$> arbitrary
-
 instance Arbitrary a => Arbitrary (DList.DList a) where
     arbitrary = DList.fromList <$> arbitrary
 
@@ -220,10 +215,3 @@ makeVersion b = Version b []
 instance Arbitrary a => Arbitrary (Identity a) where
     arbitrary = Identity <$> arbitrary
 #endif
-
-instance Arbitrary UUID.UUID where
-    arbitrary = UUID.fromWords
-        <$> arbitrary
-        <*> arbitrary
-        <*> arbitrary
-        <*> arbitrary