@@ -35,6 +35,11 @@ module Data.Aeson.Types.Instances
3535 FromJSON(..)
3636 , ToJSON(..)
3737 , KeyValue(..)
38+ -- ** Keys for maps
39+ , ToJSONKey(..)
40+ , ToJSONKeyFunction(..)
41+ , FromJSONKey(..)
42+ , FromJSONKeyFunction(..)
3843 -- ** Generic JSON classes
3944 , GFromJSON(..)
4045 , GToJSON(..)
@@ -64,15 +69,11 @@ module Data.Aeson.Types.Instances
6469 , tuple
6570 , (>*<)
6671 , typeMismatch
67−
68− -- * Keys for maps
69− , ToJSONKey(..)
70− , FromJSONKey(..)
7172 ) where
7273
7374import Control.Applicative (Const(..))
7475import Data.Aeson.Encode.Functions (brackets, builder, encode, foldable, list, list')
75−import Data.Aeson.Functions (hashMapKey, mapHashKeyVal, mapKey, mapKeyVal)
76+import Data.Aeson.Functions (mapHashKeyVal, mapKey, mapKeyVal)
7677import Data.Aeson.Types.Class
7778import Data.Aeson.Types.Internal
7879import Data.Attoparsec.Number (Number(..))