tvl-depot/users/aspen/xanthous/build/generic-arbitrary-export-garbitrary.patch

diff --git a/src/Test/QuickCheck/Arbitrary/Generic.hs b/src/Test/QuickCheck/Arbitrary/Generic.hs
index fed6ab3..91f59f1 100644
--- a/src/Test/QuickCheck/Arbitrary/Generic.hs
+++ b/src/Test/QuickCheck/Arbitrary/Generic.hs
@@ -23,6 +23,7 @@ The generated 'arbitrary' method is equivalent to
 
 module Test.QuickCheck.Arbitrary.Generic
   ( Arbitrary(..)
+  , GArbitrary
   , genericArbitrary
   , genericShrink
   ) where
Add DerivingVia newtype for generic arbitrary Add a newtype, GenericArbitrary, which can be used with -XDerivingVia to derive Arbitrary instances for types with Generic, via patching generic-arbitrary to expose the underlying typeclass it uses for surfacing the type information. 2019-11-30 04:57:58 +01:00			`diff --git a/src/Test/QuickCheck/Arbitrary/Generic.hs b/src/Test/QuickCheck/Arbitrary/Generic.hs`
			`index fed6ab3..91f59f1 100644`
			`--- a/src/Test/QuickCheck/Arbitrary/Generic.hs`
			`+++ b/src/Test/QuickCheck/Arbitrary/Generic.hs`
			`@@ -23,6 +23,7 @@ The generated 'arbitrary' method is equivalent to`

			`module Test.QuickCheck.Arbitrary.Generic`
			`( Arbitrary(..)`
			`+ , GArbitrary`
			`, genericArbitrary`
			`, genericShrink`
			`) where`