@@ -1,10 +1,3 @@
1−#if __GLASGOW_HASKELL__ >= 806
2−{-# OPTIONS_GHC -Wno-star-is-type #-}
3−#endif
4−#if __GLASGOW_HASKELL__ >= 800
5−{-# OPTIONS_GHC -Wno-unticked-promoted-constructors #-}
6−#endif
7−
81{-|
92
103This module is a generic implementation of the 'arbitrary' method. Example
@@ -153,14 +146,13 @@ module Test.QuickCheck.Arbitrary.Generic
153146 ) where
154147
155148import Control.Applicative
149+import Data.Coerce (coerce)
156150import Data.Proxy
157151import Data.Type.Bool
158152import GHC.Generics as G
159153import GHC.TypeLits
160−import Prelude
161154import Test.QuickCheck as QC
162155#if MIN_VERSION_QuickCheck(2, 14, 0)
163−import Data.Coerce (coerce)
164156import Test.QuickCheck.Arbitrary (GSubterms, RecursivelyShrink)
165157
166158