@@ -140,12 +140,12 @@ import Data.Aeson.Types ( Value(..) )
140140import Control.Applicative ( pure, (<$>), (<*>) )
141141import Control.Monad ( return, mapM, mzero, liftM2 )
142142import Data.Bool ( otherwise )
143−import GHC.Base ( String )
143+import GHC.Base ( Monad(..), String )
144144import Data.Eq ( (==) )
145145import Data.Function ( ($), (.), id )
146146import Data.Functor ( fmap )
147147import Data.List ( (++), foldl', map, zip, genericLength )
148−import Prelude ( (-), Integer, error )
148+import Prelude ( (-), Integer, fromInteger, error )
149149import Text.Show ( show )
150150-- from containers:
151151import qualified Data.Map as M ( toList )