on master help sign in
Import fixes
9666888Adam Bergmark
Data/Aeson/TH.hs−5
@@ -141,12 +141,7 @@ import Language.Haskell.TH.Syntax (VarStrictType)
141import Language.Haskell.TH.Lib (starK)
141import Language.Haskell.TH.Lib (starK)
142#endif
142#endif
143#if MIN_VERSION_template_haskell(2,8,0) && !(MIN_VERSION_template_haskell(2,10,0))
143#if MIN_VERSION_template_haskell(2,8,0) && !(MIN_VERSION_template_haskell(2,10,0))
144−import Data.List (nub)
145import Language.Haskell.TH.Syntax (mkNameG_tc)
144import Language.Haskell.TH.Syntax (mkNameG_tc)
146−import Prelude (uncurry)
147−#endif
148−#if MIN_VERSION_template_haskell(2,11,0)
149−import Prelude (head)
150#endif
145#endif
151import Text.Printf (printf)
146import Text.Printf (printf)
152import qualified Data.Aeson as A
147import qualified Data.Aeson as A
Data/Aeson/Types/Generic.hs+1−1
@@ -26,7 +26,7 @@
26module Data.Aeson.Types.Generic
26module Data.Aeson.Types.Generic
27 (
27 (
28 IsRecord(..)
28 IsRecord(..)
29− , AllNullary(..)
29+ , AllNullary
30 , Tagged2(..)
30 , Tagged2(..)
31 , True
31 , True
32 , False
32 , False
Data/Aeson/Types/ToJSON.hs+5−3
@@ -61,9 +61,10 @@ import Prelude.Compat
61
61
62import Control.Applicative (Const(..))
62import Control.Applicative (Const(..))
63import Control.Monad.ST (ST)
63import Control.Monad.ST (ST)
64−import Data.Aeson.Encoding.Internal ((>*<), (><), Encoding, Encoding', Series, dict, emptyArray_, tuple)
64+import Data.Aeson.Encoding (Encoding, Encoding', Series, dict, emptyArray_)
65+import Data.Aeson.Encoding.Internal ((>*<), (><), tuple)
65import Data.Aeson.Internal.Functions (mapHashKeyVal, mapKeyVal)
66import Data.Aeson.Internal.Functions (mapHashKeyVal, mapKeyVal)
66−import Data.Aeson.Types.Generic
67+import Data.Aeson.Types.Generic (AllNullary, False, IsRecord(..), One, ProductSize, Tagged2(..), True, Zero, productSize)
67import Data.Aeson.Types.Internal
68import Data.Aeson.Types.Internal
68import Data.Attoparsec.Number (Number(..))
69import Data.Attoparsec.Number (Number(..))
69import Data.Bits (unsafeShiftR)
70import Data.Bits (unsafeShiftR)
@@ -92,8 +93,9 @@ import Data.Word (Word16, Word32, Word64, Word8)
92import Foreign.Storable (Storable)
93import Foreign.Storable (Storable)
93import GHC.Generics
94import GHC.Generics
94import Numeric.Natural (Natural)
95import Numeric.Natural (Natural)
96+import qualified Data.Aeson.Encoding as E
95-- We need internal here for generic deriving
97-- We need internal here for generic deriving
96−import qualified Data.Aeson.Encoding.Internal as E
98+import qualified Data.Aeson.Encoding.Internal as E (InArray, closeCurly, colon, comma, econcat, empty, openCurly, retagEncoding, tuple, wrapObject)
97import qualified Data.ByteString as S
99import qualified Data.ByteString as S
98import qualified Data.ByteString.Lazy as L
100import qualified Data.ByteString.Lazy as L
99import qualified Data.DList as DList
101import qualified Data.DList as DList