git.iko.soy/deriving-openapi3
on master help sign in
Added typeable constraint
85acdc1iko
src/Deriving/OpenApi.hs+2−1
compare with master
unifiedsplit
@@ -17,6 +17,7 @@ import Data.OpenApi.Internal.Schema
17import Data.Proxy
17import Data.Proxy
18import Data.Text (Text)
18import Data.Text (Text)
19import qualified Data.Text as T
19import qualified Data.Text as T
20+import Data.Typeable
20import Deriving.Aeson
21import Deriving.Aeson
21import GHC.Generics
22import GHC.Generics
22import GHC.TypeLits
23import GHC.TypeLits
@@ -24,7 +25,7 @@ import Servant.API
24
25
25type CustomOpenApi = CustomJSON
26type CustomOpenApi = CustomJSON
26
27
27−instance (OpenApiOptions xs, GToSchema (Rep x), Generic x) => ToSchema (CustomJSON xs x) where
28+instance (OpenApiOptions xs, GToSchema (Rep x), Generic x, Typeable x) => ToSchema (CustomJSON xs x) where
28 declareNamedSchema Proxy =
29 declareNamedSchema Proxy =
29 openApiSchemaModifier @xs <$> genericDeclareNamedSchema (openApiOptions @xs) (Proxy @x)
30 openApiSchemaModifier @xs <$> genericDeclareNamedSchema (openApiOptions @xs) (Proxy @x)
30
31