@@ -1,20 +1,13 @@
1−{-# LANGUAGE DefaultSignatures
2− , EmptyDataDecls
3− , FlexibleInstances
4− , FunctionalDependencies
5− , KindSignatures
6− , OverlappingInstances
7− , ScopedTypeVariables
8− , TypeOperators
9− , UndecidableInstances
10− , ViewPatterns
11− #-}
12−
1+{-# LANGUAGE DefaultSignatures, EmptyDataDecls, FlexibleInstances,
2+ FunctionalDependencies, KindSignatures, OverlappingInstances,
3+ ScopedTypeVariables, TypeOperators, UndecidableInstances, ViewPatterns #-}
134{-# OPTIONS_GHC -fno-warn-orphans #-}
145
156-- |
167-- Module: Data.Aeson.Types.Generic
17−-- Copyright: (c) 2011 MailRank, Inc.
8+-- Copyright: (c) 2012 Bryan O'Sullivan
9+-- (c) 2011 Bas Van Dijk
10+-- (c) 2011 MailRank, Inc.
1811-- License: Apache
1912-- Maintainer: Bryan O'Sullivan <bos@serpentine.com>
2013-- Stability: experimental
@@ -24,15 +17,15 @@
2417
2518module Data.Aeson.Types.Generic ( ) where
2619
27−import Control.Applicative
28−import Data.Bits (shiftR)
20+import Control.Applicative ((<*>), (<$>), (<|>), pure)
21+import Control.Monad.ST (ST)
2922import Data.Aeson.Types.Class
3023import Data.Aeson.Types.Internal
31−import Data.Text (pack, unpack)
24+import Data.Bits (shiftR)
3225import Data.DList (DList, toList)
3326import Data.Monoid (mappend)
27+import Data.Text (pack, unpack)
3428import GHC.Generics
35−import Control.Monad.ST (ST)
3629import qualified Data.HashMap.Strict as H
3730import qualified Data.Text as T
3831import qualified Data.Vector as V