ToParamSchema instance for SetCookie

src/Data/Swagger/Internal/ParamSchema.hs

@@ -43,7 +43,7 @@ import Data.Version (Version)
 import Numeric.Natural.Compat (Natural)
 import Data.Word
 import Data.UUID.Types (UUID)
-
+import Web.Cookie (SetCookie)
 import Data.Swagger.Internal
 import Data.Swagger.Lens
 import Data.Swagger.SchemaOptions
@@ -224,6 +224,10 @@ instance ToParamSchema Version where
     & type_ .~ SwaggerString
     & pattern ?~ "^\\d+(\\.\\d+)*$"
 
+-- Swagger 2.0 doesn't have Cookie support in param schema
+instance ToParamSchema SetCookie where
+  toParamSchema _ = mempty
+
 #if __GLASGOW_HASKELL__ < 800
 #else
 type family ToParamSchemaByteStringError bs where

swagger2.cabal

@@ -76,6 +76,7 @@ library
   build-depends:
       base-compat-batteries     >=0.10.4   && <0.11
     , aeson                     >=1.3.1.1  && <1.5
+    , cookie                    >=0.4      && <0.5
     , generics-sop              >=0.3.2.0  && <0.5
     , hashable                  >=1.2.7.0  && <1.3
     , http-media                >=0.7.1.2  && <0.8