git.iko.soy/typeable/aeson
on master help sign in
Fix reduntant import warnings
25df642Bas van Dijk
Data/Aeson/TH.hs+1−5
compare with master
unifiedsplit
@@ -92,7 +92,6 @@ module Data.Aeson.TH
92 ) where
92 ) where
93
93
94import Control.Applicative ( pure, (<$>), (<*>) )
94import Control.Applicative ( pure, (<$>), (<*>) )
95−import Control.Monad ( return, mapM, liftM2, fail )
96import Data.Aeson ( toJSON, Object, (.=), (.:), (.:?)
95import Data.Aeson ( toJSON, Object, (.=), (.:), (.:?)
97 , ToJSON, toEncoding, toJSON
96 , ToJSON, toEncoding, toJSON
98 , FromJSON, parseJSON
97 , FromJSON, parseJSON
@@ -104,7 +103,7 @@ import Data.Aeson.Types ( Value(..), Parser
104 , defaultTaggedObject
103 , defaultTaggedObject
105 )
104 )
106import Data.Aeson.Types.Internal (Encoding(..))
105import Data.Aeson.Types.Internal (Encoding(..))
107−import Control.Monad ( join )
106+import Control.Monad ( join, liftM2, return, mapM, fail )
108import Data.Bool ( Bool(False, True), otherwise, (&&), not )
107import Data.Bool ( Bool(False, True), otherwise, (&&), not )
109import Data.Either ( Either(Left, Right) )
108import Data.Either ( Either(Left, Right) )
110import Data.Eq ( (==) )
109import Data.Eq ( (==) )
@@ -138,9 +137,6 @@ import qualified Data.Text as T ( Text, pack, unpack )
138import qualified Data.Vector as V ( unsafeIndex, null, length, create, fromList )
137import qualified Data.Vector as V ( unsafeIndex, null, length, create, fromList )
139import qualified Data.Vector.Mutable as VM ( unsafeNew, unsafeWrite )
138import qualified Data.Vector.Mutable as VM ( unsafeNew, unsafeWrite )
140
139
141−#if !MIN_VERSION_base(4,8,0)
142−import Control.Monad ( return, mapM, liftM2, fail )
143−#endif
144
140
145--------------------------------------------------------------------------------
141--------------------------------------------------------------------------------
146-- Convenience
142-- Convenience