69ef475 · typeable/openapi3

src/Data/Swagger/Internal/ParamSchema.hs+3−1

compare with master

unifiedsplit

@@ -22,7 +22,7 @@

22module Data.Swagger.Internal.ParamSchema where

23

24import Control.Lens

25−import Data.Aeson

25+import Data.Aeson (ToJSON (..))

26import Data.Proxy

27import GHC.Generics

28

@@ -315,3 +315,5 @@ instance Constructor c => GEnumParamSchema (C1 c U1) where

315

316data Proxy3 a b c = Proxy3

317

318+-- $setup

319+-- >>> import Data.Aeson (encode)

src/Data/Swagger/Internal/Schema.hs+2−1

@@ -32,7 +32,7 @@ import Data.Data.Lens (template)

32

33import Control.Monad

34import Control.Monad.Writer

35−import Data.Aeson

35+import Data.Aeson (ToJSON (..), ToJSONKey (..), ToJSONKeyFunction (..), Value (..))

36import Data.Char

37import Data.Data (Data)

38import Data.Foldable (traverse_)

@@ -796,3 +796,4 @@ data Proxy3 a b c = Proxy3

796

797-- $setup

798-- >>> import Data.Swagger

799+-- >>> import Data.Aeson (encode)

stack.yaml+2

@@ -1,3 +1,5 @@

1resolver: lts-9.3

2packages:

3- '.'

4+extra-deps:

5+- aeson-1.2.2.0

test/Data/Swagger/ParamSchemaSpec.hs+1−1

@@ -5,7 +5,7 @@

5{-# LANGUAGE QuasiQuotes #-}

6module Data.Swagger.ParamSchemaSpec where

7

8−import Data.Aeson

8+import Data.Aeson (Value)

9import Data.Aeson.QQ

10import Data.Char

11import Data.Proxy

test/Data/Swagger/SchemaSpec.hs+1−1

@@ -8,7 +8,7 @@ import Prelude ()

8import Prelude.Compat

9

10import Control.Lens ((^.))

11−import Data.Aeson

11+import Data.Aeson (Value)

12import Data.Aeson.QQ

13import Data.Char

14import qualified Data.HashMap.Strict.InsOrd as InsOrdHashMap