forked from loafle/openapi-generator-original
[haskell-http-client] fixes for GHC 9 (#10400)
- update stack/deps to LTS 18.10 for ghc-8.10.7 - fixes for GHC 9 - update samples
This commit is contained in:
parent
9479d35081
commit
df877a8cf9
@ -69,7 +69,7 @@ data MimeError =
|
||||
MimeError {
|
||||
mimeError :: String -- ^ unrender/parser error
|
||||
, mimeErrorResponse :: NH.Response BCL.ByteString -- ^ http response
|
||||
} deriving (Eq, Show)
|
||||
} deriving (Show)
|
||||
|
||||
-- | send a request returning the 'MimeResult'
|
||||
dispatchMime
|
||||
@ -198,11 +198,11 @@ modifyInitRequestM (InitRequest req) f = fmap InitRequest (f req)
|
||||
-- | Run a block using the configured logger instance
|
||||
runConfigLog
|
||||
:: P.MonadIO m
|
||||
=> {{configType}} -> LogExec m
|
||||
=> {{configType}} -> LogExec m a
|
||||
runConfigLog config = configLogExecWithContext config (configLogContext config)
|
||||
|
||||
-- | Run a block using the configured logger instance (logs exceptions)
|
||||
runConfigLogWithExceptions
|
||||
:: (E.MonadCatch m, P.MonadIO m)
|
||||
=> T.Text -> {{configType}} -> LogExec m
|
||||
=> T.Text -> {{configType}} -> LogExec m a
|
||||
runConfigLogWithExceptions src config = runConfigLog config . logExceptions src
|
||||
|
||||
@ -35,6 +35,7 @@ import qualified Data.CaseInsensitive as CI
|
||||
import qualified Data.Data as P (Data, Typeable, TypeRep, typeRep)
|
||||
import qualified Data.Foldable as P
|
||||
import qualified Data.Ix as P
|
||||
import qualified Data.Kind as K (Type)
|
||||
import qualified Data.Maybe as P
|
||||
import qualified Data.Proxy as P (Proxy(..))
|
||||
import qualified Data.Text as T
|
||||
@ -46,9 +47,9 @@ import qualified Lens.Micro as L
|
||||
import qualified Network.HTTP.Client.MultipartFormData as NH
|
||||
import qualified Network.HTTP.Types as NH
|
||||
import qualified Prelude as P
|
||||
import qualified Text.Printf as T
|
||||
import qualified Web.FormUrlEncoded as WH
|
||||
import qualified Web.HttpApiData as WH
|
||||
import qualified Text.Printf as T
|
||||
|
||||
import Control.Applicative ((<|>))
|
||||
import Control.Applicative (Alternative)
|
||||
@ -551,4 +552,4 @@ _showBinaryBase64 = T.decodeUtf8 . BL.toStrict . BL64.encode . unBinary
|
||||
-- * Lens Type Aliases
|
||||
|
||||
type Lens_' s a = Lens_ s s a a
|
||||
type Lens_ s t a b = forall (f :: * -> *). Functor f => (a -> f b) -> s -> f t
|
||||
type Lens_ s t a b = forall (f :: K.Type -> K.Type). Functor f => (a -> f b) -> s -> f t
|
||||
|
||||
@ -25,11 +25,11 @@ import qualified Katip as LG
|
||||
-- * Type Aliases (for compatibility)
|
||||
|
||||
-- | Runs a Katip logging block with the Log environment
|
||||
type LogExecWithContext = forall m. P.MonadIO m =>
|
||||
LogContext -> LogExec m
|
||||
type LogExecWithContext = forall m a. P.MonadIO m =>
|
||||
LogContext -> LogExec m a
|
||||
|
||||
-- | A Katip logging block
|
||||
type LogExec m = forall a. LG.KatipT m a -> m a
|
||||
type LogExec m a = LG.KatipT m a -> m a
|
||||
|
||||
-- | A Katip Log environment
|
||||
type LogContext = LG.LogEnv
|
||||
|
||||
@ -15,7 +15,6 @@ import qualified Control.Monad.IO.Class as P
|
||||
import qualified Data.Text as T
|
||||
import qualified Data.Time as TI
|
||||
|
||||
import Data.Monoid ((<>))
|
||||
import Data.Text (Text)
|
||||
|
||||
import qualified Control.Monad.Logger as LG
|
||||
@ -23,11 +22,11 @@ import qualified Control.Monad.Logger as LG
|
||||
-- * Type Aliases (for compatibility)
|
||||
|
||||
-- | Runs a monad-logger block with the filter predicate
|
||||
type LogExecWithContext = forall m. P.MonadIO m =>
|
||||
LogContext -> LogExec m
|
||||
type LogExecWithContext = forall m a. P.MonadIO m =>
|
||||
LogContext -> LogExec m a
|
||||
|
||||
-- | A monad-logger block
|
||||
type LogExec m = forall a. LG.LoggingT m a -> m a
|
||||
type LogExec m a = LG.LoggingT m a -> m a
|
||||
|
||||
-- | A monad-logger filter predicate
|
||||
type LogContext = LG.LogSource -> LG.LogLevel -> Bool
|
||||
|
||||
@ -42,18 +42,18 @@ library
|
||||
aeson >=1.0 && <2.0
|
||||
, base >=4.7 && <5.0
|
||||
, base64-bytestring >1.0 && <2.0
|
||||
, bytestring >=0.10.0 && <0.11
|
||||
, bytestring >=0.10.0
|
||||
, case-insensitive
|
||||
, containers >=0.5.0.0 && <0.8
|
||||
, deepseq >= 1.4 && <1.6
|
||||
, exceptions >= 0.4
|
||||
, http-api-data >= 0.3.4 && <0.5
|
||||
, http-client >=0.5 && <0.7
|
||||
, http-client >=0.5 && <0.8
|
||||
, http-client-tls
|
||||
, http-media >= 0.4 && < 0.9
|
||||
, http-types >=0.8 && <0.13
|
||||
, iso8601-time >=0.1.3 && <0.2.0
|
||||
, microlens >= 0.4.3 && <0.5
|
||||
, microlens >= 0.4.3
|
||||
, mtl >=2.2.1
|
||||
, network >=2.6.2 && <3.9
|
||||
, random >=1.1
|
||||
@ -99,7 +99,7 @@ test-suite tests
|
||||
, QuickCheck
|
||||
, aeson
|
||||
, base >=4.7 && <5.0
|
||||
, bytestring >=0.10.0 && <0.11
|
||||
, bytestring >=0.10.0
|
||||
, containers
|
||||
, hspec >=1.8
|
||||
, iso8601-time
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
resolver: lts-14.27
|
||||
resolver: lts-18.10
|
||||
build:
|
||||
haddock-arguments:
|
||||
haddock-args:
|
||||
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>OpenAPIPetstore.API</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="src/OpenAPIPetstore.API.html">Source</a></li><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="module-header"><table class="info"><tr><th>Safe Haskell</th><td>None</td></tr><tr><th>Language</th><td>Haskell2010</td></tr></table><p class="caption">OpenAPIPetstore.API</p></div><div id="description"><p class="caption">Description</p><div class="doc empty"> </div></div><div id="interface"><h1>Documentation</h1><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-AnotherFake.html">OpenAPIPetstore.API.AnotherFake</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-Fake.html">OpenAPIPetstore.API.Fake</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-FakeClassnameTags123.html">OpenAPIPetstore.API.FakeClassnameTags123</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-Pet.html">OpenAPIPetstore.API.Pet</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-Store.html">OpenAPIPetstore.API.Store</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-User.html">OpenAPIPetstore.API.User</a></p></div></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>OpenAPIPetstore.API</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="src/OpenAPIPetstore.API.html">Source</a></li><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="module-header"><table class="info"><tr><th>Safe Haskell</th><td>None</td></tr><tr><th>Language</th><td>Haskell2010</td></tr></table><p class="caption">OpenAPIPetstore.API</p></div><div id="description"><p class="caption">Description</p><div class="doc empty"> </div></div><div id="interface"><h1>Documentation</h1><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-AnotherFake.html">OpenAPIPetstore.API.AnotherFake</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-Fake.html">OpenAPIPetstore.API.Fake</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-FakeClassnameTags123.html">OpenAPIPetstore.API.FakeClassnameTags123</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-Pet.html">OpenAPIPetstore.API.Pet</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-Store.html">OpenAPIPetstore.API.Store</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-API-User.html">OpenAPIPetstore.API.User</a></p></div></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>OpenAPIPetstore</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="src/OpenAPIPetstore.html">Source</a></li><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="module-header"><table class="info"><tr><th>Safe Haskell</th><td>None</td></tr><tr><th>Language</th><td>Haskell2010</td></tr></table><p class="caption">OpenAPIPetstore</p></div><div id="description"><p class="caption">Description</p><div class="doc empty"> </div></div><div id="interface"><h1>Documentation</h1><div class="top"><p class="src">module <a href="OpenAPIPetstore-API.html">OpenAPIPetstore.API</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-Client.html">OpenAPIPetstore.Client</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-Core.html">OpenAPIPetstore.Core</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-Logging.html">OpenAPIPetstore.Logging</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-MimeTypes.html">OpenAPIPetstore.MimeTypes</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-Model.html">OpenAPIPetstore.Model</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-ModelLens.html">OpenAPIPetstore.ModelLens</a></p></div></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>OpenAPIPetstore</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="src/OpenAPIPetstore.html">Source</a></li><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="module-header"><table class="info"><tr><th>Safe Haskell</th><td>None</td></tr><tr><th>Language</th><td>Haskell2010</td></tr></table><p class="caption">OpenAPIPetstore</p></div><div id="description"><p class="caption">Description</p><div class="doc empty"> </div></div><div id="interface"><h1>Documentation</h1><div class="top"><p class="src">module <a href="OpenAPIPetstore-API.html">OpenAPIPetstore.API</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-Client.html">OpenAPIPetstore.Client</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-Core.html">OpenAPIPetstore.Core</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-Logging.html">OpenAPIPetstore.Logging</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-MimeTypes.html">OpenAPIPetstore.MimeTypes</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-Model.html">OpenAPIPetstore.Model</a></p></div><div class="top"><p class="src">module <a href="OpenAPIPetstore-ModelLens.html">OpenAPIPetstore.ModelLens</a></p></div></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - -)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - -</p><table><tr><td class="src">-&-</td><td class="module"><a href="OpenAPIPetstore-Core.html#v:-45--38--45-" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - -)</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - -</p><table><tr><td class="src">-&-</td><td class="module"><a href="OpenAPIPetstore-Core.html#v:-45--38--45-" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - G)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - G</p><table><tr><td class="src">GetInventory</td><td class="module"><a href="OpenAPIPetstore-API-Store.html#t:GetInventory" title="OpenAPIPetstore.API.Store">OpenAPIPetstore.API.Store</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">getInventory</td><td class="module"><a href="OpenAPIPetstore-API-Store.html#v:getInventory" title="OpenAPIPetstore.API.Store">OpenAPIPetstore.API.Store</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">GetOrderById</td><td class="module"><a href="OpenAPIPetstore-API-Store.html#t:GetOrderById" title="OpenAPIPetstore.API.Store">OpenAPIPetstore.API.Store</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">getOrderById</td><td class="module"><a href="OpenAPIPetstore-API-Store.html#v:getOrderById" title="OpenAPIPetstore.API.Store">OpenAPIPetstore.API.Store</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">GetPetById</td><td class="module"><a href="OpenAPIPetstore-API-Pet.html#t:GetPetById" title="OpenAPIPetstore.API.Pet">OpenAPIPetstore.API.Pet</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">getPetById</td><td class="module"><a href="OpenAPIPetstore-API-Pet.html#v:getPetById" title="OpenAPIPetstore.API.Pet">OpenAPIPetstore.API.Pet</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">GetUserByName</td><td class="module"><a href="OpenAPIPetstore-API-User.html#t:GetUserByName" title="OpenAPIPetstore.API.User">OpenAPIPetstore.API.User</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">getUserByName</td><td class="module"><a href="OpenAPIPetstore-API-User.html#v:getUserByName" title="OpenAPIPetstore.API.User">OpenAPIPetstore.API.User</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - G)</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - G</p><table><tr><td class="src">GetInventory</td><td class="module"><a href="OpenAPIPetstore-API-Store.html#t:GetInventory" title="OpenAPIPetstore.API.Store">OpenAPIPetstore.API.Store</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">getInventory</td><td class="module"><a href="OpenAPIPetstore-API-Store.html#v:getInventory" title="OpenAPIPetstore.API.Store">OpenAPIPetstore.API.Store</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">GetOrderById</td><td class="module"><a href="OpenAPIPetstore-API-Store.html#t:GetOrderById" title="OpenAPIPetstore.API.Store">OpenAPIPetstore.API.Store</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">getOrderById</td><td class="module"><a href="OpenAPIPetstore-API-Store.html#v:getOrderById" title="OpenAPIPetstore.API.Store">OpenAPIPetstore.API.Store</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">GetPetById</td><td class="module"><a href="OpenAPIPetstore-API-Pet.html#t:GetPetById" title="OpenAPIPetstore.API.Pet">OpenAPIPetstore.API.Pet</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">getPetById</td><td class="module"><a href="OpenAPIPetstore-API-Pet.html#v:getPetById" title="OpenAPIPetstore.API.Pet">OpenAPIPetstore.API.Pet</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">GetUserByName</td><td class="module"><a href="OpenAPIPetstore-API-User.html#t:GetUserByName" title="OpenAPIPetstore.API.User">OpenAPIPetstore.API.User</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr><tr><td class="src">getUserByName</td><td class="module"><a href="OpenAPIPetstore-API-User.html#v:getUserByName" title="OpenAPIPetstore.API.User">OpenAPIPetstore.API.User</a>, OpenAPIPetstore.API, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - H)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - H</p><table><tr><td class="src">HasBodyParam</td><td class="module"><a href="OpenAPIPetstore-Core.html#t:HasBodyParam" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr><tr><td class="src">HasOnlyReadOnly</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:HasOnlyReadOnly" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:HasOnlyReadOnly" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBar</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:hasOnlyReadOnlyBar" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBarL</td><td class="module"><a href="OpenAPIPetstore-ModelLens.html#v:hasOnlyReadOnlyBarL" title="OpenAPIPetstore.ModelLens">OpenAPIPetstore.ModelLens</a>, OpenAPIPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFoo</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:hasOnlyReadOnlyFoo" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFooL</td><td class="module"><a href="OpenAPIPetstore-ModelLens.html#v:hasOnlyReadOnlyFooL" title="OpenAPIPetstore.ModelLens">OpenAPIPetstore.ModelLens</a>, OpenAPIPetstore</td></tr><tr><td class="src">HasOptionalParam</td><td class="module"><a href="OpenAPIPetstore-Core.html#t:HasOptionalParam" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr><tr><td class="src">Http</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Http" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Http" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - H)</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - H</p><table><tr><td class="src">HasBodyParam</td><td class="module"><a href="OpenAPIPetstore-Core.html#t:HasBodyParam" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr><tr><td class="src">HasOnlyReadOnly</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:HasOnlyReadOnly" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:HasOnlyReadOnly" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBar</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:hasOnlyReadOnlyBar" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBarL</td><td class="module"><a href="OpenAPIPetstore-ModelLens.html#v:hasOnlyReadOnlyBarL" title="OpenAPIPetstore.ModelLens">OpenAPIPetstore.ModelLens</a>, OpenAPIPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFoo</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:hasOnlyReadOnlyFoo" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFooL</td><td class="module"><a href="OpenAPIPetstore-ModelLens.html#v:hasOnlyReadOnlyFooL" title="OpenAPIPetstore.ModelLens">OpenAPIPetstore.ModelLens</a>, OpenAPIPetstore</td></tr><tr><td class="src">HasOptionalParam</td><td class="module"><a href="OpenAPIPetstore-Core.html#t:HasOptionalParam" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr><tr><td class="src">Http</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Http" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Http" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - I)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - I</p><table><tr><td class="src">initLogContext</td><td class="module"><a href="OpenAPIPetstore-Logging.html#v:initLogContext" title="OpenAPIPetstore.Logging">OpenAPIPetstore.Logging</a>, OpenAPIPetstore</td></tr><tr><td class="src">InitRequest</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Client.html#t:InitRequest" title="OpenAPIPetstore.Client">OpenAPIPetstore.Client</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Client.html#v:InitRequest" title="OpenAPIPetstore.Client">OpenAPIPetstore.Client</a>, OpenAPIPetstore</td></tr><tr><td class="src">Int32</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Int32" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Int32" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">Int64</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Int64" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Int64" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">Int64Group</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Int64Group" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Int64Group" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">Ioutil</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Ioutil" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Ioutil" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - I)</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - I</p><table><tr><td class="src">initLogContext</td><td class="module"><a href="OpenAPIPetstore-Logging.html#v:initLogContext" title="OpenAPIPetstore.Logging">OpenAPIPetstore.Logging</a>, OpenAPIPetstore</td></tr><tr><td class="src">InitRequest</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Client.html#t:InitRequest" title="OpenAPIPetstore.Client">OpenAPIPetstore.Client</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Client.html#v:InitRequest" title="OpenAPIPetstore.Client">OpenAPIPetstore.Client</a>, OpenAPIPetstore</td></tr><tr><td class="src">Int32</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Int32" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Int32" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">Int64</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Int64" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Int64" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">Int64Group</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Int64Group" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Int64Group" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="src">Ioutil</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Ioutil" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Ioutil" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - Q)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - Q</p><table><tr><td class="src">Query</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Query" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Query" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - Q)</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - Q</p><table><tr><td class="src">Query</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="OpenAPIPetstore-Model.html#t:Query" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="OpenAPIPetstore-Model.html#v:Query" title="OpenAPIPetstore.Model">OpenAPIPetstore.Model</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - W)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - W</p><table><tr><td class="src">withNoLogging</td><td class="module"><a href="OpenAPIPetstore-Core.html#v:withNoLogging" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr><tr><td class="src">withStderrLogging</td><td class="module"><a href="OpenAPIPetstore-Core.html#v:withStderrLogging" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr><tr><td class="src">withStdoutLogging</td><td class="module"><a href="OpenAPIPetstore-Core.html#v:withStdoutLogging" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index - W)</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - W</p><table><tr><td class="src">withNoLogging</td><td class="module"><a href="OpenAPIPetstore-Core.html#v:withNoLogging" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr><tr><td class="src">withStderrLogging</td><td class="module"><a href="OpenAPIPetstore-Core.html#v:withStderrLogging" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr><tr><td class="src">withStdoutLogging</td><td class="module"><a href="OpenAPIPetstore-Core.html#v:withStdoutLogging" title="OpenAPIPetstore.Core">OpenAPIPetstore.Core</a>, OpenAPIPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client (Index)</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="alphabet"><ul><li><a href="doc-index-A.html">A</a></li><li><a href="doc-index-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-X.html">X</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
@ -1 +1 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul><p class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</p></div><div id="content"><div id="description"><h1>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</h1><div class="doc"><p>Client library for calling the OpenAPI Petstore API based on http-client.</p><p>host: petstore.swagger.io</p><p>base path: <a href="http://petstore.swagger.io:80/v2">http://petstore.swagger.io:80/v2</a></p><p>OpenAPI Petstore API version: 1.0.0</p><p>OpenAPI version: 3.0.1</p></div></div><div id="module-list"><p class="caption">Signatures</p></div><div id="module-list"><p class="caption">Modules</p><ul><li><span class="module"><span class="details-toggle-control details-toggle" data-details-id="n.1"> </span><a href="OpenAPIPetstore.html">OpenAPIPetstore</a></span><details id="n.1" open="open"><summary class="hide-when-js-enabled">Submodules</summary><ul><li><span class="module"><span class="details-toggle-control details-toggle" data-details-id="n.1.1"> </span><a href="OpenAPIPetstore-API.html">OpenAPIPetstore.API</a></span><details id="n.1.1" open="open"><summary class="hide-when-js-enabled">Submodules</summary><ul><li><span class="module"><a href="OpenAPIPetstore-API-AnotherFake.html">OpenAPIPetstore.API.AnotherFake</a></span></li><li><span class="module"><a href="OpenAPIPetstore-API-Fake.html">OpenAPIPetstore.API.Fake</a></span></li><li><span class="module"><a href="OpenAPIPetstore-API-FakeClassnameTags123.html">OpenAPIPetstore.API.FakeClassnameTags123</a></span></li><li><span class="module"><a href="OpenAPIPetstore-API-Pet.html">OpenAPIPetstore.API.Pet</a></span></li><li><span class="module"><a href="OpenAPIPetstore-API-Store.html">OpenAPIPetstore.API.Store</a></span></li><li><span class="module"><a href="OpenAPIPetstore-API-User.html">OpenAPIPetstore.API.User</a></span></li></ul></details></li><li><span class="module"><a href="OpenAPIPetstore-Client.html">OpenAPIPetstore.Client</a></span></li><li><span class="module"><a href="OpenAPIPetstore-Core.html">OpenAPIPetstore.Core</a></span></li><li><span class="module"><a href="OpenAPIPetstore-Logging.html">OpenAPIPetstore.Logging</a></span></li><li><span class="module"><a href="OpenAPIPetstore-MimeTypes.html">OpenAPIPetstore.MimeTypes</a></span></li><li><span class="module"><a href="OpenAPIPetstore-Model.html">OpenAPIPetstore.Model</a></span></li><li><span class="module"><a href="OpenAPIPetstore-ModelLens.html">OpenAPIPetstore.ModelLens</a></span></li></ul></details></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.22.0</p></div></body></html>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /><meta name="viewport" content="width=device-width, initial-scale=1" /><title>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</title><link href="linuwial.css" rel="stylesheet" type="text/css" title="Linuwial" /><link rel="stylesheet" type="text/css" href="quick-jump.css" /><link rel="stylesheet" type="text/css" href="https://fonts.googleapis.com/css?family=PT+Sans:400,400i,700" /><script src="haddock-bundle.min.js" async="async" type="text/javascript"></script><script type="text/x-mathjax-config">MathJax.Hub.Config({ tex2jax: { processClass: "mathjax", ignoreClass: ".*" } });</script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.5/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script></head><body><div id="package-header"><span class="caption">openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</span><ul class="links" id="page-menu"><li><a href="index.html">Contents</a></li><li><a href="doc-index.html">Index</a></li></ul></div><div id="content"><div id="description"><h1>openapi-petstore-0.1.0.0: Auto-generated openapi-petstore API Client</h1><div class="doc"><p>Client library for calling the OpenAPI Petstore API based on http-client.</p><p>host: petstore.swagger.io</p><p>base path: <a href="http://petstore.swagger.io:80/v2">http://petstore.swagger.io:80/v2</a></p><p>OpenAPI Petstore API version: 1.0.0</p><p>OpenAPI version: 3.0.1</p></div></div><div id="module-list"><p class="caption">Modules</p><ul><li><span class="module"><span class="details-toggle-control details-toggle" data-details-id="n.1"> </span><a href="OpenAPIPetstore.html">OpenAPIPetstore</a></span><details id="n.1" open="open"><summary class="hide-when-js-enabled">Submodules</summary><ul><li><span class="module"><span class="details-toggle-control details-toggle" data-details-id="n.1.1"> </span><a href="OpenAPIPetstore-API.html">OpenAPIPetstore.API</a></span><details id="n.1.1" open="open"><summary class="hide-when-js-enabled">Submodules</summary><ul><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-API-AnotherFake.html">OpenAPIPetstore.API.AnotherFake</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-API-Fake.html">OpenAPIPetstore.API.Fake</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-API-FakeClassnameTags123.html">OpenAPIPetstore.API.FakeClassnameTags123</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-API-Pet.html">OpenAPIPetstore.API.Pet</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-API-Store.html">OpenAPIPetstore.API.Store</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-API-User.html">OpenAPIPetstore.API.User</a></span></li></ul></details></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-Client.html">OpenAPIPetstore.Client</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-Core.html">OpenAPIPetstore.Core</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-Logging.html">OpenAPIPetstore.Logging</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-MimeTypes.html">OpenAPIPetstore.MimeTypes</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-Model.html">OpenAPIPetstore.Model</a></span></li><li><span class="module"><span class="noexpander"> </span><a href="OpenAPIPetstore-ModelLens.html">OpenAPIPetstore.ModelLens</a></span></li></ul></details></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.24.2</p></div></body></html>
|
||||
@ -22,10 +22,10 @@
|
||||
module OpenAPIPetstore.Logging
|
||||
|
||||
-- | Runs a Katip logging block with the Log environment
|
||||
type LogExecWithContext = forall m. MonadIO m => LogContext -> LogExec m
|
||||
type LogExecWithContext = forall m a. MonadIO m => LogContext -> LogExec m a
|
||||
|
||||
-- | A Katip logging block
|
||||
type LogExec m = forall a. KatipT m a -> m a
|
||||
type LogExec m a = KatipT m a -> m a
|
||||
|
||||
-- | A Katip Log environment
|
||||
type LogContext = LogEnv
|
||||
@ -403,29 +403,29 @@ Binary :: ByteString -> Binary
|
||||
_readBinaryBase64 :: MonadFail m => Text -> m Binary
|
||||
_showBinaryBase64 :: Binary -> Text
|
||||
type Lens_' s a = Lens_ s s a a
|
||||
type Lens_ s t a b = forall (f :: * -> *). Functor f => (a -> f b) -> s -> f t
|
||||
instance Control.DeepSeq.NFData OpenAPIPetstore.Core.Binary
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Core.Binary
|
||||
instance Data.Data.Data OpenAPIPetstore.Core.Binary
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Core.Binary
|
||||
instance Control.DeepSeq.NFData OpenAPIPetstore.Core.ByteArray
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Core.ByteArray
|
||||
instance Data.Data.Data OpenAPIPetstore.Core.ByteArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Core.ByteArray
|
||||
instance Control.DeepSeq.NFData OpenAPIPetstore.Core.Date
|
||||
instance GHC.Arr.Ix OpenAPIPetstore.Core.Date
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Core.Date
|
||||
instance Data.Data.Data OpenAPIPetstore.Core.Date
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Core.Date
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Core.Date
|
||||
type Lens_ s t a b = forall (f :: Type -> Type). Functor f => (a -> f b) -> s -> f t
|
||||
instance GHC.Show.Show OpenAPIPetstore.Core.ParamBody
|
||||
instance GHC.Show.Show OpenAPIPetstore.Core.Params
|
||||
instance GHC.Show.Show (OpenAPIPetstore.Core.OpenAPIPetstoreRequest req contentType res accept)
|
||||
instance GHC.Show.Show OpenAPIPetstore.Core.AuthMethodException
|
||||
instance Control.DeepSeq.NFData OpenAPIPetstore.Core.DateTime
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Core.DateTime
|
||||
instance Data.Data.Data OpenAPIPetstore.Core.DateTime
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Core.DateTime
|
||||
instance GHC.Show.Show OpenAPIPetstore.Core.AuthMethodException
|
||||
instance GHC.Show.Show (OpenAPIPetstore.Core.OpenAPIPetstoreRequest req contentType res accept)
|
||||
instance GHC.Show.Show OpenAPIPetstore.Core.Params
|
||||
instance GHC.Show.Show OpenAPIPetstore.Core.ParamBody
|
||||
instance Control.DeepSeq.NFData OpenAPIPetstore.Core.Date
|
||||
instance GHC.Ix.Ix OpenAPIPetstore.Core.Date
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Core.Date
|
||||
instance Data.Data.Data OpenAPIPetstore.Core.Date
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Core.Date
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Core.Date
|
||||
instance Control.DeepSeq.NFData OpenAPIPetstore.Core.ByteArray
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Core.ByteArray
|
||||
instance Data.Data.Data OpenAPIPetstore.Core.ByteArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Core.ByteArray
|
||||
instance Control.DeepSeq.NFData OpenAPIPetstore.Core.Binary
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Core.Binary
|
||||
instance Data.Data.Data OpenAPIPetstore.Core.Binary
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Core.Binary
|
||||
instance Data.Aeson.Types.FromJSON.FromJSON OpenAPIPetstore.Core.Binary
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Core.Binary
|
||||
instance Web.Internal.HttpApiData.FromHttpApiData OpenAPIPetstore.Core.Binary
|
||||
@ -511,17 +511,16 @@ modifyInitRequest :: InitRequest req contentType res accept -> (Request -> Reque
|
||||
modifyInitRequestM :: Monad m => InitRequest req contentType res accept -> (Request -> m Request) -> m (InitRequest req contentType res accept)
|
||||
|
||||
-- | Run a block using the configured logger instance
|
||||
runConfigLog :: MonadIO m => OpenAPIPetstoreConfig -> LogExec m
|
||||
runConfigLog :: MonadIO m => OpenAPIPetstoreConfig -> LogExec m a
|
||||
|
||||
-- | Run a block using the configured logger instance (logs exceptions)
|
||||
runConfigLogWithExceptions :: (MonadCatch m, MonadIO m) => Text -> OpenAPIPetstoreConfig -> LogExec m
|
||||
instance GHC.Show.Show (OpenAPIPetstore.Client.InitRequest req contentType res accept)
|
||||
runConfigLogWithExceptions :: (MonadCatch m, MonadIO m) => Text -> OpenAPIPetstoreConfig -> LogExec m a
|
||||
instance GHC.Show.Show OpenAPIPetstore.Client.MimeError
|
||||
instance Data.Traversable.Traversable OpenAPIPetstore.Client.MimeResult
|
||||
instance Data.Foldable.Foldable OpenAPIPetstore.Client.MimeResult
|
||||
instance GHC.Base.Functor OpenAPIPetstore.Client.MimeResult
|
||||
instance GHC.Show.Show res => GHC.Show.Show (OpenAPIPetstore.Client.MimeResult res)
|
||||
instance GHC.Show.Show OpenAPIPetstore.Client.MimeError
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Client.MimeError
|
||||
instance GHC.Show.Show (OpenAPIPetstore.Client.InitRequest req contentType res accept)
|
||||
|
||||
|
||||
module OpenAPIPetstore.Model
|
||||
@ -1858,287 +1857,287 @@ data AuthOAuthPetstoreAuth
|
||||
|
||||
-- | secret
|
||||
AuthOAuthPetstoreAuth :: Text -> AuthOAuthPetstoreAuth
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AuthOAuthPetstoreAuth
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AuthOAuthPetstoreAuth
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AuthBasicHttpBasicTest
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AuthBasicHttpBasicTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AuthApiKeyApiKeyQuery
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AuthApiKeyApiKeyQuery
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AuthApiKeyApiKey
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AuthApiKeyApiKey
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumTest
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Status
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Status
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Pet
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Pet
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Order
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Order
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BigCat
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BigCat
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BigCatAllOf
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BigCatAllOf
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumArrays
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumArrays
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.MapTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.MapTest
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumQueryInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumQueryInteger
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumQueryDouble
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumQueryDouble
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumFormStringArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumFormStringArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumHeaderStringArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumHeaderStringArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumQueryStringArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumQueryStringArray
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumFormString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumFormString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumHeaderString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumHeaderString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumQueryString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumQueryString
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalMetadata
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalMetadata
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ApiKey
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ApiKey
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.BodyBool
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BodyBool
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BodyBool
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.BodyDouble
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BodyDouble
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BodyDouble
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.BodyText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BodyText
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BodyText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BooleanGroup
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BooleanGroup
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Byte
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Byte
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Callback
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Callback
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Context
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Context
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.File2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.File2
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Http
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Http
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Int32
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Int32
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Int64
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Int64
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Int64Group
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Int64Group
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Ioutil
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Ioutil
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Name2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Name2
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Number
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Number
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.OrderId
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.OrderId
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.OrderIdText
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.OrderIdText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Param
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Param
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Param2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Param2
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamBinary
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamBinary
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamDate
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamDate
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamDateTime
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamDateTime
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamDouble
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamDouble
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamFloat
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamFloat
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamInteger
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.ParamMapMapStringText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamMapMapStringText
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamMapMapStringText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Password
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Password
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.PatternWithoutDelimiter
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.PatternWithoutDelimiter
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.PetId
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.PetId
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Pipe
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Pipe
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Query
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Query
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.RequiredBooleanGroup
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.RequiredBooleanGroup
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.RequiredFile
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.RequiredFile
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.RequiredInt64Group
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.RequiredInt64Group
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.RequiredStringGroup
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.RequiredStringGroup
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.StatusText
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.StatusText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.StringGroup
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.StringGroup
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Tags
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Tags
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Url
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Url
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Username
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Username
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesAnyType
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesAnyType
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesBoolean
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesBoolean
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesClass
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesNumber
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesNumber
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesObject
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesObject
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Animal
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Animal
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ApiResponse
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ApiResponse
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ArrayOfArrayOfNumberOnly
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ArrayOfArrayOfNumberOnly
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ArrayOfNumberOnly
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ArrayOfNumberOnly
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Capitalization
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Capitalization
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Cat
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Cat
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.CatAllOf
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.CatAllOf
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Category
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Category
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ClassModel
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ClassModel
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Client
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Client
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Dog
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Dog
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.DogAllOf
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.DogAllOf
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.File
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.File
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.FileSchemaTestClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.FileSchemaTestClass
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.FormatTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.FormatTest
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.HasOnlyReadOnly
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.HasOnlyReadOnly
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.MixedPropertiesAndAdditionalPropertiesClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.MixedPropertiesAndAdditionalPropertiesClass
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Model200Response
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Model200Response
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ModelList
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ModelList
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ModelReturn
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ModelReturn
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Name
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Name
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.NumberOnly
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.NumberOnly
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.OuterComposite
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.OuterComposite
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ReadOnlyFirst
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ReadOnlyFirst
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ArrayTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ArrayTest
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.SpecialModelName
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.SpecialModelName
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Tag
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Tag
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.TypeHolderDefault
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.TypeHolderDefault
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.TypeHolderExample
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.TypeHolderExample
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.User
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.User
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.Body
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Body
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Body
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.XmlItem
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.XmlItem
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'ArrayEnum
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'ArrayEnum
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'ArrayEnum
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'ArrayEnum
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'ArrayEnum
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.XmlItem
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.XmlItem
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.Body
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Body
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Body
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.User
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.User
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.TypeHolderExample
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.TypeHolderExample
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.TypeHolderDefault
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.TypeHolderDefault
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Tag
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Tag
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.SpecialModelName
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.SpecialModelName
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ArrayTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ArrayTest
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ReadOnlyFirst
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ReadOnlyFirst
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.OuterComposite
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.OuterComposite
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.NumberOnly
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.NumberOnly
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Name
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Name
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ModelReturn
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ModelReturn
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ModelList
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ModelList
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Model200Response
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Model200Response
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.MixedPropertiesAndAdditionalPropertiesClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.MixedPropertiesAndAdditionalPropertiesClass
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.HasOnlyReadOnly
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.HasOnlyReadOnly
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.FormatTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.FormatTest
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.FileSchemaTestClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.FileSchemaTestClass
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.File
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.File
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.DogAllOf
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.DogAllOf
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Dog
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Dog
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Client
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Client
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ClassModel
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ClassModel
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Category
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Category
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.CatAllOf
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.CatAllOf
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Cat
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Cat
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Capitalization
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Capitalization
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ArrayOfNumberOnly
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ArrayOfNumberOnly
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ArrayOfArrayOfNumberOnly
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ArrayOfArrayOfNumberOnly
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ApiResponse
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ApiResponse
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Animal
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Animal
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesObject
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesObject
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesNumber
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesNumber
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesClass
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesBoolean
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesBoolean
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalPropertiesAnyType
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalPropertiesAnyType
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Username
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Username
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Url
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Url
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Tags
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Tags
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.StringGroup
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.StringGroup
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.StatusText
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.StatusText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.RequiredStringGroup
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.RequiredStringGroup
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.RequiredInt64Group
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.RequiredInt64Group
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.RequiredFile
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.RequiredFile
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.RequiredBooleanGroup
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.RequiredBooleanGroup
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Query
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Query
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Pipe
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Pipe
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.PetId
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.PetId
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.PatternWithoutDelimiter
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.PatternWithoutDelimiter
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Password
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Password
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamString
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.ParamMapMapStringText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamMapMapStringText
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamMapMapStringText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamFloat
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamFloat
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamDouble
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamDouble
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamDateTime
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamDateTime
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamDate
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamDate
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ParamBinary
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ParamBinary
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Param2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Param2
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Param
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Param
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.OrderIdText
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.OrderIdText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.OrderId
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.OrderId
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Number
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Number
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Name2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Name2
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Ioutil
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Ioutil
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Int64Group
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Int64Group
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Int64
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Int64
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Int32
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Int32
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Http
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Http
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.File2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.File2
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Context
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Context
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Callback
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Callback
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Byte
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Byte
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BooleanGroup
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BooleanGroup
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.BodyText
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BodyText
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BodyText
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.BodyDouble
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BodyDouble
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BodyDouble
|
||||
instance Data.Aeson.Types.ToJSON.ToJSON OpenAPIPetstore.Model.BodyBool
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BodyBool
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BodyBool
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.ApiKey
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.ApiKey
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AdditionalMetadata
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AdditionalMetadata
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumFormString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumQueryString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumQueryString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumHeaderString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumHeaderString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumFormString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumFormString
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumFormStringArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumQueryStringArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumQueryStringArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumHeaderStringArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumHeaderStringArray
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumFormStringArray
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumFormStringArray
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumInteger
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumNumber
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumQueryDouble
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumQueryDouble
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumQueryInteger
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumQueryInteger
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumQueryInteger
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'EnumString
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'Inner
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.MapTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.MapTest
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'JustSymbol
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumArrays
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumArrays
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'Kind
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BigCatAllOf
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BigCatAllOf
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.BigCat
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.BigCat
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'Status
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Order
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Order
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.E'Status2
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Pet
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Pet
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.Status
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.Status
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumClass
|
||||
instance GHC.Enum.Enum OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Enum.Bounded OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Classes.Ord OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.OuterEnum
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.EnumTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.EnumTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AuthApiKeyApiKey
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AuthApiKeyApiKey
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AuthApiKeyApiKeyQuery
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AuthApiKeyApiKeyQuery
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AuthBasicHttpBasicTest
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AuthBasicHttpBasicTest
|
||||
instance GHC.Show.Show OpenAPIPetstore.Model.AuthOAuthPetstoreAuth
|
||||
instance GHC.Classes.Eq OpenAPIPetstore.Model.AuthOAuthPetstoreAuth
|
||||
instance OpenAPIPetstore.Core.AuthMethod OpenAPIPetstore.Model.AuthOAuthPetstoreAuth
|
||||
instance OpenAPIPetstore.Core.AuthMethod OpenAPIPetstore.Model.AuthBasicHttpBasicTest
|
||||
instance OpenAPIPetstore.Core.AuthMethod OpenAPIPetstore.Model.AuthApiKeyApiKeyQuery
|
||||
|
||||
File diff suppressed because one or more lines are too long
@ -7,81 +7,106 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.API.AnotherFake
|
||||
-}</span><span>
|
||||
</span><a name="line-14"></a><span>
|
||||
</span><a name="line-15"></a><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><a name="line-16"></a><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-pragma">{-# LANGUAGE MonoLocalBinds #-}</span><span>
|
||||
</span><a name="line-18"></a><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><a name="line-19"></a><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><a name="line-20"></a><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><a name="line-21"></a><span>
|
||||
</span><a name="line-22"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API.AnotherFake</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-23"></a><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">M</span><span>
|
||||
</span><a name="line-27"></a><span>
|
||||
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">B</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BL</span><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">TypeRep</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">typeOf</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">typeRep</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Foldable</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-33"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Map</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Map</span><span>
|
||||
</span><a name="line-34"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Maybe</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-35"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Proxy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Proxy</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-36"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Set</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Set</span><span>
|
||||
</span><a name="line-37"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.String</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-38"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-39"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-40"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TL</span><span>
|
||||
</span><a name="line-41"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Lazy.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TL</span><span>
|
||||
</span><a name="line-42"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Time</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TI</span><span>
|
||||
</span><a name="line-43"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">NH</span><span>
|
||||
</span><a name="line-44"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Media</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">ME</span><span>
|
||||
</span><a name="line-45"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Types</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">NH</span><span>
|
||||
</span><a name="line-46"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.FormUrlEncoded</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.HttpApiData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-50"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">GHC.Base</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var"><|></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-51"></a><span>
|
||||
</span><a name="line-52"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">==</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">/=</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><$></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><*></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">>>=</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">,</span><span class="hs-identifier hs-var">maybe</span><span class="hs-special">,</span><span class="hs-identifier hs-var">pure</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Monad</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Applicative</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-53"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-54"></a><span>
|
||||
</span><a name="line-55"></a><span class="hs-comment">-- * Operations</span><span>
|
||||
</span><a name="line-56"></a><span>
|
||||
</span><a name="line-57"></a><span>
|
||||
</span><a name="line-58"></a><span class="hs-comment">-- ** AnotherFake</span><span>
|
||||
</span><a name="line-59"></a><span>
|
||||
</span><a name="line-60"></a><span class="hs-comment">-- *** op123testSpecialTags</span><span>
|
||||
</span><a name="line-61"></a><span>
|
||||
</span><a name="line-62"></a><span class="hs-comment">-- | @PATCH \/another-fake\/dummy@</span><span>
|
||||
</span><a name="line-63"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-64"></a><span class="hs-comment">-- To test special tags</span><span>
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- To test special tags and operation ID starting with number</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-68"></a><span class="hs-identifier">op123testSpecialTags</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-72"></a><a name="op123testSpecialTags"><a href="OpenAPIPetstore.API.AnotherFake.html#op123testSpecialTags"><span class="hs-identifier">op123testSpecialTags</span></a></a><span> </span><a name="local-6989586621679189127"><a href="#local-6989586621679189127"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-73"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/another-fake/dummy"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-74"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679189127"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-75"></a><span>
|
||||
</span><a name="line-76"></a><span class="hs-keyword">data</span><span> </span><a name="Op123testSpecialTags"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier">Op123testSpecialTags</span></a></a><span>
|
||||
</span><a name="line-77"></a><span>
|
||||
</span><a name="line-78"></a><span class="hs-comment">-- | /Body Param/ "body" - client model</span><span>
|
||||
</span><a name="line-79"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span>
|
||||
</span><a name="line-80"></a><span>
|
||||
</span><a name="line-81"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-82"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-83"></a><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-85"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-86"></a><span>
|
||||
</span><a name="line-87"></a></pre></body></html>
|
||||
</span><span id="line-14"></span><span>
|
||||
</span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE MonoLocalBinds #-}</span><span>
|
||||
</span><span id="line-18"></span><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><span id="line-19"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><span id="line-20"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><span id="line-21"></span><span>
|
||||
</span><span id="line-22"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API.AnotherFake</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-23"></span><span>
|
||||
</span><span id="line-24"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a></span><span>
|
||||
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a></span><span>
|
||||
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">M</span></span><span>
|
||||
</span><span id="line-27"></span><span>
|
||||
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Aeson</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">A</span></span><span>
|
||||
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">B</span></span><span>
|
||||
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BL</span></span><span>
|
||||
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Data</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Typeable</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">TypeRep</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeOf</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeRep</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Foldable</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-33"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Map</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Map</span></span><span>
|
||||
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Maybe</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-35"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Proxy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Proxy</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-36"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Set</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Set</span></span><span>
|
||||
</span><span id="line-37"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.String</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-38"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-39"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-40"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TL</span></span><span>
|
||||
</span><span id="line-41"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Lazy.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TL</span></span><span>
|
||||
</span><span id="line-42"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Time</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TI</span></span><span>
|
||||
</span><span id="line-43"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
|
||||
</span><span id="line-44"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Media</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">ME</span></span><span>
|
||||
</span><span id="line-45"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Types</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
|
||||
</span><span id="line-46"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.FormUrlEncoded</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-47"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.HttpApiData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-48"></span><span>
|
||||
</span><span id="line-49"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Text</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-50"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">GHC.Base</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(<|>)</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-51"></span><span>
|
||||
</span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<$>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<*>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(>>=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-54"></span><span>
|
||||
</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
|
||||
</span><span id="line-56"></span><span>
|
||||
</span><span id="line-57"></span><span>
|
||||
</span><span id="line-58"></span><span class="hs-comment">-- ** AnotherFake</span><span>
|
||||
</span><span id="line-59"></span><span>
|
||||
</span><span id="line-60"></span><span class="hs-comment">-- *** op123testSpecialTags</span><span>
|
||||
</span><span id="line-61"></span><span>
|
||||
</span><span id="line-62"></span><span class="hs-comment">-- | @PATCH \/another-fake\/dummy@</span><span>
|
||||
</span><span id="line-63"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-64"></span><span class="hs-comment">-- To test special tags</span><span>
|
||||
</span><span id="line-65"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-66"></span><span class="hs-comment">-- To test special tags and operation ID starting with number</span><span>
|
||||
</span><span id="line-67"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-68"></span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#op123testSpecialTags"><span class="hs-identifier hs-type">op123testSpecialTags</span></a></span><span>
|
||||
</span><span id="line-69"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-70"></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><span id="line-71"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-72"></span><span id="op123testSpecialTags"><span class="annot"><span class="annottext">op123testSpecialTags :: Client
|
||||
-> OpenAPIPetstoreRequest
|
||||
Op123testSpecialTags MimeJSON Client MimeJSON
|
||||
</span><a href="OpenAPIPetstore.API.AnotherFake.html#op123testSpecialTags"><span class="hs-identifier hs-var hs-var">op123testSpecialTags</span></a></span></span><span> </span><span id="local-6989586621679152751"><span class="annot"><span class="annottext">Client
|
||||
</span><a href="#local-6989586621679152751"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-73"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
Op123testSpecialTags MimeJSON Client MimeJSON
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"PATCH"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/another-fake/dummy"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-74"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
|
||||
Op123testSpecialTags MimeJSON Client MimeJSON
|
||||
-> Client
|
||||
-> OpenAPIPetstoreRequest
|
||||
Op123testSpecialTags MimeJSON Client MimeJSON
|
||||
forall req param contentType res accept.
|
||||
(HasBodyParam req param, Consumes req contentType,
|
||||
MimeRender contentType param) =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> param -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Client
|
||||
</span><a href="#local-6989586621679152751"><span class="hs-identifier hs-var">body</span></a></span><span>
|
||||
</span><span id="line-75"></span><span>
|
||||
</span><span id="line-76"></span><span class="hs-keyword">data</span><span> </span><span id="Op123testSpecialTags"><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-var">Op123testSpecialTags</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-77"></span><span>
|
||||
</span><span id="line-78"></span><span class="hs-comment">-- | /Body Param/ "body" - client model</span><span>
|
||||
</span><span id="line-79"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152747"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-80"></span><span>
|
||||
</span><span id="line-81"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-82"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-83"></span><span>
|
||||
</span><span id="line-84"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-85"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-86"></span><span>
|
||||
</span><span id="line-87"></span></pre></body></html>
|
||||
File diff suppressed because it is too large
Load Diff
@ -7,84 +7,115 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.API.FakeClassnameTags123
|
||||
-}</span><span>
|
||||
</span><a name="line-14"></a><span>
|
||||
</span><a name="line-15"></a><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><a name="line-16"></a><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-pragma">{-# LANGUAGE MonoLocalBinds #-}</span><span>
|
||||
</span><a name="line-18"></a><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><a name="line-19"></a><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><a name="line-20"></a><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><a name="line-21"></a><span>
|
||||
</span><a name="line-22"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API.FakeClassnameTags123</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-23"></a><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">M</span><span>
|
||||
</span><a name="line-27"></a><span>
|
||||
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">B</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BL</span><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">TypeRep</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">typeOf</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">typeRep</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Foldable</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-33"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Map</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Map</span><span>
|
||||
</span><a name="line-34"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Maybe</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-35"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Proxy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Proxy</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-36"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Set</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Set</span><span>
|
||||
</span><a name="line-37"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.String</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-38"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-39"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-40"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TL</span><span>
|
||||
</span><a name="line-41"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Lazy.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TL</span><span>
|
||||
</span><a name="line-42"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Time</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TI</span><span>
|
||||
</span><a name="line-43"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">NH</span><span>
|
||||
</span><a name="line-44"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Media</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">ME</span><span>
|
||||
</span><a name="line-45"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Types</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">NH</span><span>
|
||||
</span><a name="line-46"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.FormUrlEncoded</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.HttpApiData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-50"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">GHC.Base</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var"><|></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-51"></a><span>
|
||||
</span><a name="line-52"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">==</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">/=</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><$></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><*></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">>>=</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">,</span><span class="hs-identifier hs-var">maybe</span><span class="hs-special">,</span><span class="hs-identifier hs-var">pure</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Monad</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Applicative</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-53"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-54"></a><span>
|
||||
</span><a name="line-55"></a><span class="hs-comment">-- * Operations</span><span>
|
||||
</span><a name="line-56"></a><span>
|
||||
</span><a name="line-57"></a><span>
|
||||
</span><a name="line-58"></a><span class="hs-comment">-- ** FakeClassnameTags123</span><span>
|
||||
</span><a name="line-59"></a><span>
|
||||
</span><a name="line-60"></a><span class="hs-comment">-- *** testClassname</span><span>
|
||||
</span><a name="line-61"></a><span>
|
||||
</span><a name="line-62"></a><span class="hs-comment">-- | @PATCH \/fake_classname_test@</span><span>
|
||||
</span><a name="line-63"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-64"></a><span class="hs-comment">-- To test class name in snake case</span><span>
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- To test class name in snake case</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-68"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKeyQuery'</span><span>
|
||||
</span><a name="line-69"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-70"></a><span class="hs-identifier">testClassname</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><a name="line-73"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-74"></a><a name="testClassname"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier">testClassname</span></a></a><span> </span><a name="local-6989586621679186693"><a href="#local-6989586621679186693"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-75"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake_classname_test"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthApiKeyApiKeyQuery"><span class="hs-identifier hs-type">AuthApiKeyApiKeyQuery</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-77"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679186693"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span class="hs-keyword">data</span><span> </span><a name="TestClassname"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier">TestClassname</span></a></a><span>
|
||||
</span><a name="line-80"></a><span>
|
||||
</span><a name="line-81"></a><span class="hs-comment">-- | /Body Param/ "body" - client model</span><span>
|
||||
</span><a name="line-82"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span>
|
||||
</span><a name="line-83"></a><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-85"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-86"></a><span>
|
||||
</span><a name="line-87"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-88"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-89"></a><span>
|
||||
</span><a name="line-90"></a></pre></body></html>
|
||||
</span><span id="line-14"></span><span>
|
||||
</span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE MonoLocalBinds #-}</span><span>
|
||||
</span><span id="line-18"></span><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><span id="line-19"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><span id="line-20"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><span id="line-21"></span><span>
|
||||
</span><span id="line-22"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API.FakeClassnameTags123</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-23"></span><span>
|
||||
</span><span id="line-24"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a></span><span>
|
||||
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a></span><span>
|
||||
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">M</span></span><span>
|
||||
</span><span id="line-27"></span><span>
|
||||
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Aeson</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">A</span></span><span>
|
||||
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">B</span></span><span>
|
||||
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BL</span></span><span>
|
||||
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Data</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Typeable</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">TypeRep</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeOf</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeRep</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Foldable</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-33"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Map</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Map</span></span><span>
|
||||
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Maybe</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-35"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Proxy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Proxy</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-36"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Set</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Set</span></span><span>
|
||||
</span><span id="line-37"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.String</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-38"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-39"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-40"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TL</span></span><span>
|
||||
</span><span id="line-41"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Lazy.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TL</span></span><span>
|
||||
</span><span id="line-42"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Time</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TI</span></span><span>
|
||||
</span><span id="line-43"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
|
||||
</span><span id="line-44"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Media</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">ME</span></span><span>
|
||||
</span><span id="line-45"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Types</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
|
||||
</span><span id="line-46"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.FormUrlEncoded</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-47"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.HttpApiData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-48"></span><span>
|
||||
</span><span id="line-49"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Text</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-50"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">GHC.Base</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(<|>)</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-51"></span><span>
|
||||
</span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<$>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<*>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(>>=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-54"></span><span>
|
||||
</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
|
||||
</span><span id="line-56"></span><span>
|
||||
</span><span id="line-57"></span><span>
|
||||
</span><span id="line-58"></span><span class="hs-comment">-- ** FakeClassnameTags123</span><span>
|
||||
</span><span id="line-59"></span><span>
|
||||
</span><span id="line-60"></span><span class="hs-comment">-- *** testClassname</span><span>
|
||||
</span><span id="line-61"></span><span>
|
||||
</span><span id="line-62"></span><span class="hs-comment">-- | @PATCH \/fake_classname_test@</span><span>
|
||||
</span><span id="line-63"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-64"></span><span class="hs-comment">-- To test class name in snake case</span><span>
|
||||
</span><span id="line-65"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-66"></span><span class="hs-comment">-- To test class name in snake case</span><span>
|
||||
</span><span id="line-67"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-68"></span><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKeyQuery'</span><span>
|
||||
</span><span id="line-69"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-70"></span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier hs-type">testClassname</span></a></span><span>
|
||||
</span><span id="line-71"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-72"></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><span id="line-73"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-74"></span><span id="testClassname"><span class="annot"><span class="annottext">testClassname :: Client
|
||||
-> OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
|
||||
</span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier hs-var hs-var">testClassname</span></a></span></span><span> </span><span id="local-6989586621679152079"><span class="annot"><span class="annottext">Client
|
||||
</span><a href="#local-6989586621679152079"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-75"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"PATCH"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/fake_classname_test"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-76"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
|
||||
-> Proxy AuthApiKeyApiKeyQuery
|
||||
-> OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
|
||||
forall authMethod req contentType res accept.
|
||||
AuthMethod authMethod =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> Proxy authMethod
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthApiKeyApiKeyQuery
|
||||
forall k (t :: k). Proxy t
|
||||
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#AuthApiKeyApiKeyQuery"><span class="hs-identifier hs-type">AuthApiKeyApiKeyQuery</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-77"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
|
||||
-> Client
|
||||
-> OpenAPIPetstoreRequest TestClassname MimeJSON Client MimeJSON
|
||||
forall req param contentType res accept.
|
||||
(HasBodyParam req param, Consumes req contentType,
|
||||
MimeRender contentType param) =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> param -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Client
|
||||
</span><a href="#local-6989586621679152079"><span class="hs-identifier hs-var">body</span></a></span><span>
|
||||
</span><span id="line-78"></span><span>
|
||||
</span><span id="line-79"></span><span class="hs-keyword">data</span><span> </span><span id="TestClassname"><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-var">TestClassname</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-80"></span><span>
|
||||
</span><span id="line-81"></span><span class="hs-comment">-- | /Body Param/ "body" - client model</span><span>
|
||||
</span><span id="line-82"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679152073"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-83"></span><span>
|
||||
</span><span id="line-84"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-85"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-86"></span><span>
|
||||
</span><span id="line-87"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-88"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-89"></span><span>
|
||||
</span><span id="line-90"></span></pre></body></html>
|
||||
File diff suppressed because it is too large
Load Diff
@ -7,144 +7,227 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.API.Store
|
||||
-}</span><span>
|
||||
</span><a name="line-14"></a><span>
|
||||
</span><a name="line-15"></a><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><a name="line-16"></a><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-pragma">{-# LANGUAGE MonoLocalBinds #-}</span><span>
|
||||
</span><a name="line-18"></a><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><a name="line-19"></a><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><a name="line-20"></a><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><a name="line-21"></a><span>
|
||||
</span><a name="line-22"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API.Store</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-23"></a><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">M</span><span>
|
||||
</span><a name="line-27"></a><span>
|
||||
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">B</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BL</span><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">TypeRep</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">typeOf</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">typeRep</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Foldable</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-33"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Map</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Map</span><span>
|
||||
</span><a name="line-34"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Maybe</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-35"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Proxy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Proxy</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-36"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Set</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Set</span><span>
|
||||
</span><a name="line-37"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.String</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-38"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-39"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-40"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TL</span><span>
|
||||
</span><a name="line-41"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Lazy.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TL</span><span>
|
||||
</span><a name="line-42"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Time</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TI</span><span>
|
||||
</span><a name="line-43"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">NH</span><span>
|
||||
</span><a name="line-44"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Media</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">ME</span><span>
|
||||
</span><a name="line-45"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Types</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">NH</span><span>
|
||||
</span><a name="line-46"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.FormUrlEncoded</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.HttpApiData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-50"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">GHC.Base</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var"><|></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-51"></a><span>
|
||||
</span><a name="line-52"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">==</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">/=</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><$></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><*></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">>>=</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">,</span><span class="hs-identifier hs-var">maybe</span><span class="hs-special">,</span><span class="hs-identifier hs-var">pure</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Monad</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Applicative</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-53"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-54"></a><span>
|
||||
</span><a name="line-55"></a><span class="hs-comment">-- * Operations</span><span>
|
||||
</span><a name="line-56"></a><span>
|
||||
</span><a name="line-57"></a><span>
|
||||
</span><a name="line-58"></a><span class="hs-comment">-- ** Store</span><span>
|
||||
</span><a name="line-59"></a><span>
|
||||
</span><a name="line-60"></a><span class="hs-comment">-- *** deleteOrder</span><span>
|
||||
</span><a name="line-61"></a><span>
|
||||
</span><a name="line-62"></a><span class="hs-comment">-- | @DELETE \/store\/order\/{order_id}@</span><span>
|
||||
</span><a name="line-63"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-64"></a><span class="hs-comment">-- Delete purchase order by ID</span><span>
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- For valid response try integer IDs with value < 1000. Anything above 1000 or nonintegers will generate API errors</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-68"></a><span class="hs-identifier">deleteOrder</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a><span> </span><span class="hs-comment">-- ^ "orderId" - ID of the order that needs to be deleted</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-71"></a><a name="deleteOrder"><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier">deleteOrder</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-var">OrderIdText</span></a><span> </span><a name="local-6989586621679185324"><a href="#local-6989586621679185324"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679185324"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-73"></a><span>
|
||||
</span><a name="line-74"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteOrder"><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier">DeleteOrder</span></a></a><span>
|
||||
</span><a name="line-75"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span>
|
||||
</span><a name="line-78"></a><span class="hs-comment">-- *** getInventory</span><span>
|
||||
</span><a name="line-79"></a><span>
|
||||
</span><a name="line-80"></a><span class="hs-comment">-- | @GET \/store\/inventory@</span><span>
|
||||
</span><a name="line-81"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- Returns pet inventories by status</span><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- Returns a map of status codes to quantities</span><span>
|
||||
</span><a name="line-85"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-86"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKey'</span><span>
|
||||
</span><a name="line-87"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-88"></a><span class="hs-identifier">getInventory</span><span>
|
||||
</span><a name="line-89"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#GetInventory"><span class="hs-identifier hs-type">GetInventory</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-type">Map.Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-90"></a><a name="getInventory"><a href="OpenAPIPetstore.API.Store.html#getInventory"><span class="hs-identifier">getInventory</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-91"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/inventory"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-92"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-93"></a><span>
|
||||
</span><a name="line-94"></a><span class="hs-keyword">data</span><span> </span><a name="GetInventory"><a href="OpenAPIPetstore.API.Store.html#GetInventory"><span class="hs-identifier">GetInventory</span></a></a><span>
|
||||
</span><a name="line-95"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-96"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#GetInventory"><span class="hs-identifier hs-type">GetInventory</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-97"></a><span>
|
||||
</span><a name="line-98"></a><span>
|
||||
</span><a name="line-99"></a><span class="hs-comment">-- *** getOrderById</span><span>
|
||||
</span><a name="line-100"></a><span>
|
||||
</span><a name="line-101"></a><span class="hs-comment">-- | @GET \/store\/order\/{order_id}@</span><span>
|
||||
</span><a name="line-102"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-103"></a><span class="hs-comment">-- Find purchase order by ID</span><span>
|
||||
</span><a name="line-104"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-105"></a><span class="hs-comment">-- For valid response try integer IDs with value <= 5 or > 10. Other values will generated exceptions</span><span>
|
||||
</span><a name="line-106"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-107"></a><span class="hs-identifier">getOrderById</span><span>
|
||||
</span><a name="line-108"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679185323"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-109"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a><span> </span><span class="hs-comment">-- ^ "orderId" - ID of pet that needs to be fetched</span><span>
|
||||
</span><a name="line-110"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><a href="#local-6989586621679185323"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-111"></a><a name="getOrderById"><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier">getOrderById</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-var">OrderId</span></a><span> </span><a name="local-6989586621679185325"><a href="#local-6989586621679185325"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-112"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679185325"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-113"></a><span>
|
||||
</span><a name="line-114"></a><span class="hs-keyword">data</span><span> </span><a name="GetOrderById"><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier">GetOrderById</span></a></a><span>
|
||||
</span><a name="line-115"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-116"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-117"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-118"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-119"></a><span>
|
||||
</span><a name="line-120"></a><span>
|
||||
</span><a name="line-121"></a><span class="hs-comment">-- *** placeOrder</span><span>
|
||||
</span><a name="line-122"></a><span>
|
||||
</span><a name="line-123"></a><span class="hs-comment">-- | @POST \/store\/order@</span><span>
|
||||
</span><a name="line-124"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-125"></a><span class="hs-comment">-- Place an order for a pet</span><span>
|
||||
</span><a name="line-126"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-127"></a><span class="hs-identifier">placeOrder</span><span>
|
||||
</span><a name="line-128"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679185321"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679185321"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-129"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679185321"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-130"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679185322"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-131"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-comment">-- ^ "body" - order placed for purchasing the pet</span><span>
|
||||
</span><a name="line-132"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679185321"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><a href="#local-6989586621679185322"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-133"></a><a name="placeOrder"><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier">placeOrder</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679185326"><a href="#local-6989586621679185326"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-134"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-135"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679185326"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-136"></a><span>
|
||||
</span><a name="line-137"></a><span class="hs-keyword">data</span><span> </span><a name="PlaceOrder"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier">PlaceOrder</span></a></a><span>
|
||||
</span><a name="line-138"></a><span>
|
||||
</span><a name="line-139"></a><span class="hs-comment">-- | /Body Param/ "body" - order placed for purchasing the pet</span><span>
|
||||
</span><a name="line-140"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span>
|
||||
</span><a name="line-141"></a><span>
|
||||
</span><a name="line-142"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-143"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679185320"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679185320"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-144"></a><span>
|
||||
</span><a name="line-145"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-146"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-147"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-148"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-149"></a><span>
|
||||
</span><a name="line-150"></a></pre></body></html>
|
||||
</span><span id="line-14"></span><span>
|
||||
</span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE MonoLocalBinds #-}</span><span>
|
||||
</span><span id="line-18"></span><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><span id="line-19"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><span id="line-20"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><span id="line-21"></span><span>
|
||||
</span><span id="line-22"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API.Store</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-23"></span><span>
|
||||
</span><span id="line-24"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a></span><span>
|
||||
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a></span><span>
|
||||
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">M</span></span><span>
|
||||
</span><span id="line-27"></span><span>
|
||||
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Aeson</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">A</span></span><span>
|
||||
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">B</span></span><span>
|
||||
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BL</span></span><span>
|
||||
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Data</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Typeable</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">TypeRep</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeOf</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeRep</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Foldable</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-33"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Map</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Map</span></span><span>
|
||||
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Maybe</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-35"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Proxy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Proxy</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-36"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Set</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Set</span></span><span>
|
||||
</span><span id="line-37"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.String</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-38"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-39"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-40"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TL</span></span><span>
|
||||
</span><span id="line-41"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Lazy.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TL</span></span><span>
|
||||
</span><span id="line-42"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Time</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TI</span></span><span>
|
||||
</span><span id="line-43"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
|
||||
</span><span id="line-44"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Media</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">ME</span></span><span>
|
||||
</span><span id="line-45"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Types</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
|
||||
</span><span id="line-46"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.FormUrlEncoded</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-47"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.HttpApiData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-48"></span><span>
|
||||
</span><span id="line-49"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Text</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-50"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">GHC.Base</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(<|>)</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-51"></span><span>
|
||||
</span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<$>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<*>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(>>=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-54"></span><span>
|
||||
</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
|
||||
</span><span id="line-56"></span><span>
|
||||
</span><span id="line-57"></span><span>
|
||||
</span><span id="line-58"></span><span class="hs-comment">-- ** Store</span><span>
|
||||
</span><span id="line-59"></span><span>
|
||||
</span><span id="line-60"></span><span class="hs-comment">-- *** deleteOrder</span><span>
|
||||
</span><span id="line-61"></span><span>
|
||||
</span><span id="line-62"></span><span class="hs-comment">-- | @DELETE \/store\/order\/{order_id}@</span><span>
|
||||
</span><span id="line-63"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-64"></span><span class="hs-comment">-- Delete purchase order by ID</span><span>
|
||||
</span><span id="line-65"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-66"></span><span class="hs-comment">-- For valid response try integer IDs with value < 1000. Anything above 1000 or nonintegers will generate API errors</span><span>
|
||||
</span><span id="line-67"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-68"></span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier hs-type">deleteOrder</span></a></span><span>
|
||||
</span><span id="line-69"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a></span><span> </span><span class="hs-comment">-- ^ "orderId" - ID of the order that needs to be deleted</span><span>
|
||||
</span><span id="line-70"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-71"></span><span id="deleteOrder"><span class="annot"><span class="annottext">deleteOrder :: OrderIdText
|
||||
-> OpenAPIPetstoreRequest
|
||||
DeleteOrder MimeNoContent NoContent MimeNoContent
|
||||
</span><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier hs-var hs-var">deleteOrder</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a></span><span> </span><span id="local-6989586621679151727"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151727"><span class="hs-identifier hs-var">orderId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-72"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
DeleteOrder MimeNoContent NoContent MimeNoContent
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"DELETE"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/store/order/"</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151727"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-73"></span><span>
|
||||
</span><span id="line-74"></span><span class="hs-keyword">data</span><span> </span><span id="DeleteOrder"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-var">DeleteOrder</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-75"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-76"></span><span>
|
||||
</span><span id="line-77"></span><span>
|
||||
</span><span id="line-78"></span><span class="hs-comment">-- *** getInventory</span><span>
|
||||
</span><span id="line-79"></span><span>
|
||||
</span><span id="line-80"></span><span class="hs-comment">-- | @GET \/store\/inventory@</span><span>
|
||||
</span><span id="line-81"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-82"></span><span class="hs-comment">-- Returns pet inventories by status</span><span>
|
||||
</span><span id="line-83"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-84"></span><span class="hs-comment">-- Returns a map of status codes to quantities</span><span>
|
||||
</span><span id="line-85"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-86"></span><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKey'</span><span>
|
||||
</span><span id="line-87"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-88"></span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#getInventory"><span class="hs-identifier hs-type">getInventory</span></a></span><span>
|
||||
</span><span id="line-89"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetInventory"><span class="hs-identifier hs-type">GetInventory</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Map.Map</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Int</span></span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-90"></span><span id="getInventory"><span class="annot"><span class="annottext">getInventory :: OpenAPIPetstoreRequest
|
||||
GetInventory MimeNoContent (Map String Int) MimeJSON
|
||||
</span><a href="OpenAPIPetstore.API.Store.html#getInventory"><span class="hs-identifier hs-var hs-var">getInventory</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-91"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
GetInventory MimeNoContent (Map String Int) MimeJSON
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"GET"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/store/inventory"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-92"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
|
||||
GetInventory MimeNoContent (Map String Int) MimeJSON
|
||||
-> Proxy AuthApiKeyApiKey
|
||||
-> OpenAPIPetstoreRequest
|
||||
GetInventory MimeNoContent (Map String Int) MimeJSON
|
||||
forall authMethod req contentType res accept.
|
||||
AuthMethod authMethod =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> Proxy authMethod
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-operator hs-var">`_hasAuthType`</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy AuthApiKeyApiKey
|
||||
forall k (t :: k). Proxy t
|
||||
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-93"></span><span>
|
||||
</span><span id="line-94"></span><span class="hs-keyword">data</span><span> </span><span id="GetInventory"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetInventory"><span class="hs-identifier hs-var">GetInventory</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-95"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-96"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetInventory"><span class="hs-identifier hs-type">GetInventory</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-97"></span><span>
|
||||
</span><span id="line-98"></span><span>
|
||||
</span><span id="line-99"></span><span class="hs-comment">-- *** getOrderById</span><span>
|
||||
</span><span id="line-100"></span><span>
|
||||
</span><span id="line-101"></span><span class="hs-comment">-- | @GET \/store\/order\/{order_id}@</span><span>
|
||||
</span><span id="line-102"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-103"></span><span class="hs-comment">-- Find purchase order by ID</span><span>
|
||||
</span><span id="line-104"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-105"></span><span class="hs-comment">-- For valid response try integer IDs with value <= 5 or > 10. Other values will generated exceptions</span><span>
|
||||
</span><span id="line-106"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-107"></span><span id="local-6989586621679151718"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier hs-type">getOrderById</span></a></span><span>
|
||||
</span><span id="line-108"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151718"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><span id="line-109"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a></span><span> </span><span class="hs-comment">-- ^ "orderId" - ID of pet that needs to be fetched</span><span>
|
||||
</span><span id="line-110"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151718"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
|
||||
</span><span id="line-111"></span><span id="getOrderById"><span class="annot"><span class="annottext">getOrderById :: Accept accept
|
||||
-> OrderId
|
||||
-> OpenAPIPetstoreRequest GetOrderById MimeNoContent Order accept
|
||||
</span><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier hs-var hs-var">getOrderById</span></a></span></span><span> </span><span class="annot"><span class="annottext">Accept accept
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a></span><span> </span><span id="local-6989586621679151715"><span class="annot"><span class="annottext">Integer
|
||||
</span><a href="#local-6989586621679151715"><span class="hs-identifier hs-var">orderId</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-112"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest GetOrderById MimeNoContent Order accept
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"GET"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/store/order/"</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Integer -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Integer
|
||||
</span><a href="#local-6989586621679151715"><span class="hs-identifier hs-var">orderId</span></a></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-113"></span><span>
|
||||
</span><span id="line-114"></span><span class="hs-keyword">data</span><span> </span><span id="GetOrderById"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-var">GetOrderById</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-115"></span><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><span id="line-116"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>
|
||||
</span><span id="line-117"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-118"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-119"></span><span>
|
||||
</span><span id="line-120"></span><span>
|
||||
</span><span id="line-121"></span><span class="hs-comment">-- *** placeOrder</span><span>
|
||||
</span><span id="line-122"></span><span>
|
||||
</span><span id="line-123"></span><span class="hs-comment">-- | @POST \/store\/order@</span><span>
|
||||
</span><span id="line-124"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-125"></span><span class="hs-comment">-- Place an order for a pet</span><span>
|
||||
</span><span id="line-126"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-127"></span><span id="local-6989586621679151711"><span id="local-6989586621679151712"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier hs-type">placeOrder</span></a></span><span>
|
||||
</span><span id="line-128"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151712"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151712"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-129"></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151712"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><span id="line-130"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151711"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><span id="line-131"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="hs-comment">-- ^ "body" - order placed for purchasing the pet</span><span>
|
||||
</span><span id="line-132"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151712"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151711"><span class="hs-identifier hs-type">accept</span></a></span></span></span><span>
|
||||
</span><span id="line-133"></span><span id="placeOrder"><span class="annot"><span class="annottext">placeOrder :: ContentType contentType
|
||||
-> Accept accept
|
||||
-> Order
|
||||
-> OpenAPIPetstoreRequest PlaceOrder contentType Order accept
|
||||
</span><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier hs-var hs-var">placeOrder</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="annot"><span class="annottext">Accept accept
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151709"><span class="annot"><span class="annottext">Order
|
||||
</span><a href="#local-6989586621679151709"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-134"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest PlaceOrder contentType Order accept
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"POST"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/store/order"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-135"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest PlaceOrder contentType Order accept
|
||||
-> Order
|
||||
-> OpenAPIPetstoreRequest PlaceOrder contentType Order accept
|
||||
forall req param contentType res accept.
|
||||
(HasBodyParam req param, Consumes req contentType,
|
||||
MimeRender contentType param) =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> param -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Order
|
||||
</span><a href="#local-6989586621679151709"><span class="hs-identifier hs-var">body</span></a></span><span>
|
||||
</span><span id="line-136"></span><span>
|
||||
</span><span id="line-137"></span><span class="hs-keyword">data</span><span> </span><span id="PlaceOrder"><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-var">PlaceOrder</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-138"></span><span>
|
||||
</span><span id="line-139"></span><span class="hs-comment">-- | /Body Param/ "body" - order placed for purchasing the pet</span><span>
|
||||
</span><span id="line-140"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151706"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-141"></span><span>
|
||||
</span><span id="line-142"></span><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><span id="line-143"></span><span id="local-6989586621679151704"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151704"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151704"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
|
||||
</span><span id="line-144"></span><span>
|
||||
</span><span id="line-145"></span><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>
|
||||
</span><span id="line-147"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-148"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-149"></span><span>
|
||||
</span><span id="line-150"></span></pre></body></html>
|
||||
@ -7,238 +7,437 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.API.User
|
||||
-}</span><span>
|
||||
</span><a name="line-14"></a><span>
|
||||
</span><a name="line-15"></a><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><a name="line-16"></a><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-pragma">{-# LANGUAGE MonoLocalBinds #-}</span><span>
|
||||
</span><a name="line-18"></a><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><a name="line-19"></a><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><a name="line-20"></a><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><a name="line-21"></a><span>
|
||||
</span><a name="line-22"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API.User</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-23"></a><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">M</span><span>
|
||||
</span><a name="line-27"></a><span>
|
||||
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">B</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BL</span><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">TypeRep</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">typeOf</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">typeRep</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Foldable</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-33"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Map</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Map</span><span>
|
||||
</span><a name="line-34"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Maybe</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-35"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Proxy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Proxy</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-36"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Set</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Set</span><span>
|
||||
</span><a name="line-37"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.String</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-38"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-39"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-40"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TL</span><span>
|
||||
</span><a name="line-41"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Lazy.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TL</span><span>
|
||||
</span><a name="line-42"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Time</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TI</span><span>
|
||||
</span><a name="line-43"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">NH</span><span>
|
||||
</span><a name="line-44"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Media</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">ME</span><span>
|
||||
</span><a name="line-45"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Types</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">NH</span><span>
|
||||
</span><a name="line-46"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.FormUrlEncoded</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.HttpApiData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-50"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">GHC.Base</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var"><|></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-51"></a><span>
|
||||
</span><a name="line-52"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">==</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">/=</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><$></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><*></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var">>>=</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">,</span><span class="hs-identifier hs-var">maybe</span><span class="hs-special">,</span><span class="hs-identifier hs-var">pure</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Monad</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Applicative</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-53"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-54"></a><span>
|
||||
</span><a name="line-55"></a><span class="hs-comment">-- * Operations</span><span>
|
||||
</span><a name="line-56"></a><span>
|
||||
</span><a name="line-57"></a><span>
|
||||
</span><a name="line-58"></a><span class="hs-comment">-- ** User</span><span>
|
||||
</span><a name="line-59"></a><span>
|
||||
</span><a name="line-60"></a><span class="hs-comment">-- *** createUser</span><span>
|
||||
</span><a name="line-61"></a><span>
|
||||
</span><a name="line-62"></a><span class="hs-comment">-- | @POST \/user@</span><span>
|
||||
</span><a name="line-63"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-64"></a><span class="hs-comment">-- Create user</span><span>
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-68"></a><span class="hs-identifier">createUser</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679184620"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679184620"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679184620"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-comment">-- ^ "body" - Created user object</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679184620"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-73"></a><a name="createUser"><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier">createUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679184621"><a href="#local-6989586621679184621"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-74"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679184621"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUser"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier">CreateUser</span></a></a><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span class="hs-comment">-- | /Body Param/ "body" - Created user object</span><span>
|
||||
</span><a name="line-80"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-83"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679184614"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679184614"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-84"></a><span>
|
||||
</span><a name="line-85"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-86"></a><span>
|
||||
</span><a name="line-87"></a><span>
|
||||
</span><a name="line-88"></a><span class="hs-comment">-- *** createUsersWithArrayInput</span><span>
|
||||
</span><a name="line-89"></a><span>
|
||||
</span><a name="line-90"></a><span class="hs-comment">-- | @POST \/user\/createWithArray@</span><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-92"></a><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><a name="line-93"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-94"></a><span class="hs-identifier">createUsersWithArrayInput</span><span>
|
||||
</span><a name="line-95"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679184619"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679184619"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-96"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679184619"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-97"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||
</span><a name="line-98"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679184619"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-99"></a><a name="createUsersWithArrayInput"><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier">createUsersWithArrayInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679184622"><a href="#local-6989586621679184622"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-100"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/createWithArray"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-101"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679184622"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-102"></a><span>
|
||||
</span><a name="line-103"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithArrayInput"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier">CreateUsersWithArrayInput</span></a></a><span>
|
||||
</span><a name="line-104"></a><span>
|
||||
</span><a name="line-105"></a><span class="hs-comment">-- | /Body Param/ "body" - List of user object</span><span>
|
||||
</span><a name="line-106"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span>
|
||||
</span><a name="line-107"></a><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-109"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679184613"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679184613"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-110"></a><span>
|
||||
</span><a name="line-111"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-112"></a><span>
|
||||
</span><a name="line-113"></a><span>
|
||||
</span><a name="line-114"></a><span class="hs-comment">-- *** createUsersWithListInput</span><span>
|
||||
</span><a name="line-115"></a><span>
|
||||
</span><a name="line-116"></a><span class="hs-comment">-- | @POST \/user\/createWithList@</span><span>
|
||||
</span><a name="line-117"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-118"></a><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><a name="line-119"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-120"></a><span class="hs-identifier">createUsersWithListInput</span><span>
|
||||
</span><a name="line-121"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679184618"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679184618"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-122"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679184618"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-123"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||
</span><a name="line-124"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679184618"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-125"></a><a name="createUsersWithListInput"><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier">createUsersWithListInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679184623"><a href="#local-6989586621679184623"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-126"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/createWithList"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-127"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679184623"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-128"></a><span>
|
||||
</span><a name="line-129"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithListInput"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier">CreateUsersWithListInput</span></a></a><span>
|
||||
</span><a name="line-130"></a><span>
|
||||
</span><a name="line-131"></a><span class="hs-comment">-- | /Body Param/ "body" - List of user object</span><span>
|
||||
</span><a name="line-132"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span>
|
||||
</span><a name="line-133"></a><span>
|
||||
</span><a name="line-134"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-135"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679184612"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679184612"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-136"></a><span>
|
||||
</span><a name="line-137"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-138"></a><span>
|
||||
</span><a name="line-139"></a><span>
|
||||
</span><a name="line-140"></a><span class="hs-comment">-- *** deleteUser</span><span>
|
||||
</span><a name="line-141"></a><span>
|
||||
</span><a name="line-142"></a><span class="hs-comment">-- | @DELETE \/user\/{username}@</span><span>
|
||||
</span><a name="line-143"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-144"></a><span class="hs-comment">-- Delete user</span><span>
|
||||
</span><a name="line-145"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-146"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-147"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-148"></a><span class="hs-identifier">deleteUser</span><span>
|
||||
</span><a name="line-149"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be deleted</span><span>
|
||||
</span><a name="line-150"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-151"></a><a name="deleteUser"><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier">deleteUser</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679184624"><a href="#local-6989586621679184624"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-152"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679184624"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-153"></a><span>
|
||||
</span><a name="line-154"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteUser"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier">DeleteUser</span></a></a><span>
|
||||
</span><a name="line-155"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-156"></a><span>
|
||||
</span><a name="line-157"></a><span>
|
||||
</span><a name="line-158"></a><span class="hs-comment">-- *** getUserByName</span><span>
|
||||
</span><a name="line-159"></a><span>
|
||||
</span><a name="line-160"></a><span class="hs-comment">-- | @GET \/user\/{username}@</span><span>
|
||||
</span><a name="line-161"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-162"></a><span class="hs-comment">-- Get user by user name</span><span>
|
||||
</span><a name="line-163"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-164"></a><span class="hs-identifier">getUserByName</span><span>
|
||||
</span><a name="line-165"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679184617"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-166"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be fetched. Use user1 for testing.</span><span>
|
||||
</span><a name="line-167"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><a href="#local-6989586621679184617"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-168"></a><a name="getUserByName"><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier">getUserByName</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679184625"><a href="#local-6989586621679184625"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-169"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679184625"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-170"></a><span>
|
||||
</span><a name="line-171"></a><span class="hs-keyword">data</span><span> </span><a name="GetUserByName"><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier">GetUserByName</span></a></a><span>
|
||||
</span><a name="line-172"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-173"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-174"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-175"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-176"></a><span>
|
||||
</span><a name="line-177"></a><span>
|
||||
</span><a name="line-178"></a><span class="hs-comment">-- *** loginUser</span><span>
|
||||
</span><a name="line-179"></a><span>
|
||||
</span><a name="line-180"></a><span class="hs-comment">-- | @GET \/user\/login@</span><span>
|
||||
</span><a name="line-181"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-182"></a><span class="hs-comment">-- Logs user into the system</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-184"></a><span class="hs-identifier">loginUser</span><span>
|
||||
</span><a name="line-185"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679184616"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The user name for login</span><span>
|
||||
</span><a name="line-187"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a><span> </span><span class="hs-comment">-- ^ "password" - The password for login in clear text</span><span>
|
||||
</span><a name="line-188"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><a href="#local-6989586621679184616"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-189"></a><a name="loginUser"><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier">loginUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679184626"><a href="#local-6989586621679184626"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679184627"><a href="#local-6989586621679184627"><span class="hs-identifier">password</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-190"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/login"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-191"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addQuery"><span class="hs-identifier hs-var">addQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"username"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679184626"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-192"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addQuery"><span class="hs-identifier hs-var">addQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"password"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679184627"><span class="hs-identifier hs-var">password</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-193"></a><span>
|
||||
</span><a name="line-194"></a><span class="hs-keyword">data</span><span> </span><a name="LoginUser"><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier">LoginUser</span></a></a><span>
|
||||
</span><a name="line-195"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-196"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-197"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-198"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-199"></a><span>
|
||||
</span><a name="line-200"></a><span>
|
||||
</span><a name="line-201"></a><span class="hs-comment">-- *** logoutUser</span><span>
|
||||
</span><a name="line-202"></a><span>
|
||||
</span><a name="line-203"></a><span class="hs-comment">-- | @GET \/user\/logout@</span><span>
|
||||
</span><a name="line-204"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-205"></a><span class="hs-comment">-- Logs out current logged in user session</span><span>
|
||||
</span><a name="line-206"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-207"></a><span class="hs-identifier">logoutUser</span><span>
|
||||
</span><a name="line-208"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-209"></a><a name="logoutUser"><a href="OpenAPIPetstore.API.User.html#logoutUser"><span class="hs-identifier">logoutUser</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-210"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/logout"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-211"></a><span>
|
||||
</span><a name="line-212"></a><span class="hs-keyword">data</span><span> </span><a name="LogoutUser"><a href="OpenAPIPetstore.API.User.html#LogoutUser"><span class="hs-identifier">LogoutUser</span></a></a><span>
|
||||
</span><a name="line-213"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-214"></a><span>
|
||||
</span><a name="line-215"></a><span>
|
||||
</span><a name="line-216"></a><span class="hs-comment">-- *** updateUser</span><span>
|
||||
</span><a name="line-217"></a><span>
|
||||
</span><a name="line-218"></a><span class="hs-comment">-- | @PUT \/user\/{username}@</span><span>
|
||||
</span><a name="line-219"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-220"></a><span class="hs-comment">-- Updated user</span><span>
|
||||
</span><a name="line-221"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-222"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-223"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-224"></a><span class="hs-identifier">updateUser</span><span>
|
||||
</span><a name="line-225"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679184615"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679184615"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-226"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679184615"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-227"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-comment">-- ^ "body" - Updated user object</span><span>
|
||||
</span><a name="line-228"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - name that need to be deleted</span><span>
|
||||
</span><a name="line-229"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679184615"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-230"></a><a name="updateUser"><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier">updateUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679184628"><a href="#local-6989586621679184628"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679184629"><a href="#local-6989586621679184629"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-231"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679184629"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-232"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679184628"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-233"></a><span>
|
||||
</span><a name="line-234"></a><span class="hs-keyword">data</span><span> </span><a name="UpdateUser"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier">UpdateUser</span></a></a><span>
|
||||
</span><a name="line-235"></a><span>
|
||||
</span><a name="line-236"></a><span class="hs-comment">-- | /Body Param/ "body" - Updated user object</span><span>
|
||||
</span><a name="line-237"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span>
|
||||
</span><a name="line-238"></a><span>
|
||||
</span><a name="line-239"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-240"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679184611"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679184611"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-241"></a><span>
|
||||
</span><a name="line-242"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-243"></a><span>
|
||||
</span><a name="line-244"></a></pre></body></html>
|
||||
</span><span id="line-14"></span><span>
|
||||
</span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE MonoLocalBinds #-}</span><span>
|
||||
</span><span id="line-18"></span><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><span id="line-19"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><span id="line-20"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><span id="line-21"></span><span>
|
||||
</span><span id="line-22"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API.User</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-23"></span><span>
|
||||
</span><span id="line-24"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a></span><span>
|
||||
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a></span><span>
|
||||
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">M</span></span><span>
|
||||
</span><span id="line-27"></span><span>
|
||||
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Aeson</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">A</span></span><span>
|
||||
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">B</span></span><span>
|
||||
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BL</span></span><span>
|
||||
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Data</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Typeable</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">TypeRep</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeOf</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier">typeRep</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Foldable</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-33"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Map</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Map</span></span><span>
|
||||
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Maybe</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-35"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Proxy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Proxy</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-36"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Set</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Set</span></span><span>
|
||||
</span><span id="line-37"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.String</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-38"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-39"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-40"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TL</span></span><span>
|
||||
</span><span id="line-41"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Lazy.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TL</span></span><span>
|
||||
</span><span id="line-42"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Time</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">TI</span></span><span>
|
||||
</span><span id="line-43"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Client.MultipartFormData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
|
||||
</span><span id="line-44"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Media</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">ME</span></span><span>
|
||||
</span><span id="line-45"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Types</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">NH</span></span><span>
|
||||
</span><span id="line-46"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.FormUrlEncoded</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-47"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.HttpApiData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-48"></span><span>
|
||||
</span><span id="line-49"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Text</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-50"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">GHC.Base</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(<|>)</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-51"></span><span>
|
||||
</span><span id="line-52"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">(==)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(/=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<$>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<*>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(>>=)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">maybe</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">pure</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Monad</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Applicative</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Functor</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-53"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-54"></span><span>
|
||||
</span><span id="line-55"></span><span class="hs-comment">-- * Operations</span><span>
|
||||
</span><span id="line-56"></span><span>
|
||||
</span><span id="line-57"></span><span>
|
||||
</span><span id="line-58"></span><span class="hs-comment">-- ** User</span><span>
|
||||
</span><span id="line-59"></span><span>
|
||||
</span><span id="line-60"></span><span class="hs-comment">-- *** createUser</span><span>
|
||||
</span><span id="line-61"></span><span>
|
||||
</span><span id="line-62"></span><span class="hs-comment">-- | @POST \/user@</span><span>
|
||||
</span><span id="line-63"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-64"></span><span class="hs-comment">-- Create user</span><span>
|
||||
</span><span id="line-65"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-66"></span><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><span id="line-67"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-68"></span><span id="local-6989586621679151616"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier hs-type">createUser</span></a></span><span>
|
||||
</span><span id="line-69"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151616"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151616"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-70"></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151616"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><span id="line-71"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span> </span><span class="hs-comment">-- ^ "body" - Created user object</span><span>
|
||||
</span><span id="line-72"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151616"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
|
||||
</span><span id="line-73"></span><span id="createUser"><span class="annot"><span class="annottext">createUser :: ContentType contentType
|
||||
-> User
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUser contentType NoContent MimeNoContent
|
||||
</span><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier hs-var hs-var">createUser</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151614"><span class="annot"><span class="annottext">User
|
||||
</span><a href="#local-6989586621679151614"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-74"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUser contentType NoContent MimeNoContent
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"POST"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/user"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-75"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
|
||||
CreateUser contentType NoContent MimeNoContent
|
||||
-> User
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUser contentType NoContent MimeNoContent
|
||||
forall req param contentType res accept.
|
||||
(HasBodyParam req param, Consumes req contentType,
|
||||
MimeRender contentType param) =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> param -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">User
|
||||
</span><a href="#local-6989586621679151614"><span class="hs-identifier hs-var">body</span></a></span><span>
|
||||
</span><span id="line-76"></span><span>
|
||||
</span><span id="line-77"></span><span class="hs-keyword">data</span><span> </span><span id="CreateUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-var">CreateUser</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-78"></span><span>
|
||||
</span><span id="line-79"></span><span class="hs-comment">-- | /Body Param/ "body" - Created user object</span><span>
|
||||
</span><span id="line-80"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151610"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-81"></span><span>
|
||||
</span><span id="line-82"></span><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><span id="line-83"></span><span id="local-6989586621679151608"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151608"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151608"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
|
||||
</span><span id="line-84"></span><span>
|
||||
</span><span id="line-85"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-86"></span><span>
|
||||
</span><span id="line-87"></span><span>
|
||||
</span><span id="line-88"></span><span class="hs-comment">-- *** createUsersWithArrayInput</span><span>
|
||||
</span><span id="line-89"></span><span>
|
||||
</span><span id="line-90"></span><span class="hs-comment">-- | @POST \/user\/createWithArray@</span><span>
|
||||
</span><span id="line-91"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-92"></span><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><span id="line-93"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-94"></span><span id="local-6989586621679151603"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier hs-type">createUsersWithArrayInput</span></a></span><span>
|
||||
</span><span id="line-95"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151603"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151603"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-96"></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151603"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><span id="line-97"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||
</span><span id="line-98"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151603"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
|
||||
</span><span id="line-99"></span><span id="createUsersWithArrayInput"><span class="annot"><span class="annottext">createUsersWithArrayInput :: ContentType contentType
|
||||
-> Body
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUsersWithArrayInput contentType NoContent MimeNoContent
|
||||
</span><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier hs-var hs-var">createUsersWithArrayInput</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151601"><span class="annot"><span class="annottext">Body
|
||||
</span><a href="#local-6989586621679151601"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-100"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUsersWithArrayInput contentType NoContent MimeNoContent
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"POST"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/user/createWithArray"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-101"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
|
||||
CreateUsersWithArrayInput contentType NoContent MimeNoContent
|
||||
-> Body
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUsersWithArrayInput contentType NoContent MimeNoContent
|
||||
forall req param contentType res accept.
|
||||
(HasBodyParam req param, Consumes req contentType,
|
||||
MimeRender contentType param) =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> param -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Body
|
||||
</span><a href="#local-6989586621679151601"><span class="hs-identifier hs-var">body</span></a></span><span>
|
||||
</span><span id="line-102"></span><span>
|
||||
</span><span id="line-103"></span><span class="hs-keyword">data</span><span> </span><span id="CreateUsersWithArrayInput"><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-var">CreateUsersWithArrayInput</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-104"></span><span>
|
||||
</span><span id="line-105"></span><span class="hs-comment">-- | /Body Param/ "body" - List of user object</span><span>
|
||||
</span><span id="line-106"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151599"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-107"></span><span>
|
||||
</span><span id="line-108"></span><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><span id="line-109"></span><span id="local-6989586621679151598"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151598"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151598"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
|
||||
</span><span id="line-110"></span><span>
|
||||
</span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-112"></span><span>
|
||||
</span><span id="line-113"></span><span>
|
||||
</span><span id="line-114"></span><span class="hs-comment">-- *** createUsersWithListInput</span><span>
|
||||
</span><span id="line-115"></span><span>
|
||||
</span><span id="line-116"></span><span class="hs-comment">-- | @POST \/user\/createWithList@</span><span>
|
||||
</span><span id="line-117"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-118"></span><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><span id="line-119"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-120"></span><span id="local-6989586621679151595"><span class="annot"><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier hs-type">createUsersWithListInput</span></a></span><span>
|
||||
</span><span id="line-121"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151595"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151595"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-122"></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151595"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><span id="line-123"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||
</span><span id="line-124"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151595"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
|
||||
</span><span id="line-125"></span><span id="createUsersWithListInput"><span class="annot"><span class="annottext">createUsersWithListInput :: ContentType contentType
|
||||
-> Body
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUsersWithListInput contentType NoContent MimeNoContent
|
||||
</span><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier hs-var hs-var">createUsersWithListInput</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151593"><span class="annot"><span class="annottext">Body
|
||||
</span><a href="#local-6989586621679151593"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-126"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUsersWithListInput contentType NoContent MimeNoContent
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"POST"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/user/createWithList"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-127"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
|
||||
CreateUsersWithListInput contentType NoContent MimeNoContent
|
||||
-> Body
|
||||
-> OpenAPIPetstoreRequest
|
||||
CreateUsersWithListInput contentType NoContent MimeNoContent
|
||||
forall req param contentType res accept.
|
||||
(HasBodyParam req param, Consumes req contentType,
|
||||
MimeRender contentType param) =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> param -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">Body
|
||||
</span><a href="#local-6989586621679151593"><span class="hs-identifier hs-var">body</span></a></span><span>
|
||||
</span><span id="line-128"></span><span>
|
||||
</span><span id="line-129"></span><span class="hs-keyword">data</span><span> </span><span id="CreateUsersWithListInput"><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-var">CreateUsersWithListInput</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-130"></span><span>
|
||||
</span><span id="line-131"></span><span class="hs-comment">-- | /Body Param/ "body" - List of user object</span><span>
|
||||
</span><span id="line-132"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151591"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-133"></span><span>
|
||||
</span><span id="line-134"></span><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><span id="line-135"></span><span id="local-6989586621679151590"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151590"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151590"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
|
||||
</span><span id="line-136"></span><span>
|
||||
</span><span id="line-137"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-138"></span><span>
|
||||
</span><span id="line-139"></span><span>
|
||||
</span><span id="line-140"></span><span class="hs-comment">-- *** deleteUser</span><span>
|
||||
</span><span id="line-141"></span><span>
|
||||
</span><span id="line-142"></span><span class="hs-comment">-- | @DELETE \/user\/{username}@</span><span>
|
||||
</span><span id="line-143"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-144"></span><span class="hs-comment">-- Delete user</span><span>
|
||||
</span><span id="line-145"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-146"></span><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><span id="line-147"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-148"></span><span class="annot"><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier hs-type">deleteUser</span></a></span><span>
|
||||
</span><span id="line-149"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be deleted</span><span>
|
||||
</span><span id="line-150"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-151"></span><span id="deleteUser"><span class="annot"><span class="annottext">deleteUser :: Username
|
||||
-> OpenAPIPetstoreRequest
|
||||
DeleteUser MimeNoContent NoContent MimeNoContent
|
||||
</span><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier hs-var hs-var">deleteUser</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151585"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151585"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-152"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
DeleteUser MimeNoContent NoContent MimeNoContent
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"DELETE"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/user/"</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151585"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-153"></span><span>
|
||||
</span><span id="line-154"></span><span class="hs-keyword">data</span><span> </span><span id="DeleteUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-var">DeleteUser</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-156"></span><span>
|
||||
</span><span id="line-157"></span><span>
|
||||
</span><span id="line-158"></span><span class="hs-comment">-- *** getUserByName</span><span>
|
||||
</span><span id="line-159"></span><span>
|
||||
</span><span id="line-160"></span><span class="hs-comment">-- | @GET \/user\/{username}@</span><span>
|
||||
</span><span id="line-161"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-162"></span><span class="hs-comment">-- Get user by user name</span><span>
|
||||
</span><span id="line-163"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-164"></span><span id="local-6989586621679151582"><span class="annot"><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier hs-type">getUserByName</span></a></span><span>
|
||||
</span><span id="line-165"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151582"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><span id="line-166"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be fetched. Use user1 for testing.</span><span>
|
||||
</span><span id="line-167"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151582"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
|
||||
</span><span id="line-168"></span><span id="getUserByName"><span class="annot"><span class="annottext">getUserByName :: Accept accept
|
||||
-> Username
|
||||
-> OpenAPIPetstoreRequest GetUserByName MimeNoContent User accept
|
||||
</span><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier hs-var hs-var">getUserByName</span></a></span></span><span> </span><span class="annot"><span class="annottext">Accept accept
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151580"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151580"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-169"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest GetUserByName MimeNoContent User accept
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"GET"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/user/"</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151580"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-170"></span><span>
|
||||
</span><span id="line-171"></span><span class="hs-keyword">data</span><span> </span><span id="GetUserByName"><span class="annot"><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-var">GetUserByName</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-172"></span><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><span id="line-173"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>
|
||||
</span><span id="line-174"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-175"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-176"></span><span>
|
||||
</span><span id="line-177"></span><span>
|
||||
</span><span id="line-178"></span><span class="hs-comment">-- *** loginUser</span><span>
|
||||
</span><span id="line-179"></span><span>
|
||||
</span><span id="line-180"></span><span class="hs-comment">-- | @GET \/user\/login@</span><span>
|
||||
</span><span id="line-181"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-182"></span><span class="hs-comment">-- Logs user into the system</span><span>
|
||||
</span><span id="line-183"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-184"></span><span id="local-6989586621679151577"><span class="annot"><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier hs-type">loginUser</span></a></span><span>
|
||||
</span><span id="line-185"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151577"><span class="hs-identifier hs-type">accept</span></a></span><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><span id="line-186"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span class="hs-comment">-- ^ "username" - The user name for login</span><span>
|
||||
</span><span id="line-187"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a></span><span> </span><span class="hs-comment">-- ^ "password" - The password for login in clear text</span><span>
|
||||
</span><span id="line-188"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="annot"><a href="#local-6989586621679151577"><span class="hs-identifier hs-type">accept</span></a></span></span><span>
|
||||
</span><span id="line-189"></span><span id="loginUser"><span class="annot"><span class="annottext">loginUser :: Accept accept
|
||||
-> Username
|
||||
-> Password
|
||||
-> OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
|
||||
</span><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier hs-var hs-var">loginUser</span></a></span></span><span> </span><span class="annot"><span class="annottext">Accept accept
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151575"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151575"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a></span><span> </span><span id="local-6989586621679151573"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151573"><span class="hs-identifier hs-var">password</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-190"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"GET"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/user/login"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-191"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
|
||||
-> [QueryItem]
|
||||
-> OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
|
||||
forall req contentType res accept.
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> [QueryItem] -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#addQuery"><span class="hs-operator hs-var">`addQuery`</span></a></span><span> </span><span class="annot"><span class="annottext">(Method, Maybe Text) -> [QueryItem]
|
||||
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
|
||||
</span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"username"</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text -> Maybe Text
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151575"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-192"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
|
||||
-> [QueryItem]
|
||||
-> OpenAPIPetstoreRequest LoginUser MimeNoContent Text accept
|
||||
forall req contentType res accept.
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> [QueryItem] -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#addQuery"><span class="hs-operator hs-var">`addQuery`</span></a></span><span> </span><span class="annot"><span class="annottext">(Method, Maybe Text) -> [QueryItem]
|
||||
forall a. ToHttpApiData a => (Method, Maybe a) -> [QueryItem]
|
||||
</span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"password"</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="annottext">Text -> Maybe Text
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151573"><span class="hs-identifier hs-var">password</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-193"></span><span>
|
||||
</span><span id="line-194"></span><span class="hs-keyword">data</span><span> </span><span id="LoginUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-var">LoginUser</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-195"></span><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><span id="line-196"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span><span>
|
||||
</span><span id="line-197"></span><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><span id="line-198"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span>
|
||||
</span><span id="line-199"></span><span>
|
||||
</span><span id="line-200"></span><span>
|
||||
</span><span id="line-201"></span><span class="hs-comment">-- *** logoutUser</span><span>
|
||||
</span><span id="line-202"></span><span>
|
||||
</span><span id="line-203"></span><span class="hs-comment">-- | @GET \/user\/logout@</span><span>
|
||||
</span><span id="line-204"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-205"></span><span class="hs-comment">-- Logs out current logged in user session</span><span>
|
||||
</span><span id="line-206"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-207"></span><span class="annot"><a href="OpenAPIPetstore.API.User.html#logoutUser"><span class="hs-identifier hs-type">logoutUser</span></a></span><span>
|
||||
</span><span id="line-208"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-209"></span><span id="logoutUser"><span class="annot"><span class="annottext">logoutUser :: OpenAPIPetstoreRequest
|
||||
LogoutUser MimeNoContent NoContent MimeNoContent
|
||||
</span><a href="OpenAPIPetstore.API.User.html#logoutUser"><span class="hs-identifier hs-var hs-var">logoutUser</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-210"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
LogoutUser MimeNoContent NoContent MimeNoContent
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"GET"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/user/logout"</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-211"></span><span>
|
||||
</span><span id="line-212"></span><span class="hs-keyword">data</span><span> </span><span id="LogoutUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#LogoutUser"><span class="hs-identifier hs-var">LogoutUser</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-213"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-214"></span><span>
|
||||
</span><span id="line-215"></span><span>
|
||||
</span><span id="line-216"></span><span class="hs-comment">-- *** updateUser</span><span>
|
||||
</span><span id="line-217"></span><span>
|
||||
</span><span id="line-218"></span><span class="hs-comment">-- | @PUT \/user\/{username}@</span><span>
|
||||
</span><span id="line-219"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-220"></span><span class="hs-comment">-- Updated user</span><span>
|
||||
</span><span id="line-221"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-222"></span><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><span id="line-223"></span><span class="hs-comment">-- </span><span>
|
||||
</span><span id="line-224"></span><span id="local-6989586621679151566"><span class="annot"><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier hs-type">updateUser</span></a></span><span>
|
||||
</span><span id="line-225"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151566"><span class="hs-identifier hs-type">contentType</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151566"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-226"></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151566"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><span id="line-227"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span><span> </span><span class="hs-comment">-- ^ "body" - Updated user object</span><span>
|
||||
</span><span id="line-228"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span class="hs-comment">-- ^ "username" - name that need to be deleted</span><span>
|
||||
</span><span id="line-229"></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151566"><span class="hs-identifier hs-type">contentType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span><span>
|
||||
</span><span id="line-230"></span><span id="updateUser"><span class="annot"><span class="annottext">updateUser :: ContentType contentType
|
||||
-> User
|
||||
-> Username
|
||||
-> OpenAPIPetstoreRequest
|
||||
UpdateUser contentType NoContent MimeNoContent
|
||||
</span><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier hs-var hs-var">updateUser</span></a></span></span><span> </span><span class="annot"><span class="annottext">ContentType contentType
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679151564"><span class="annot"><span class="annottext">User
|
||||
</span><a href="#local-6989586621679151564"><span class="hs-identifier hs-var">body</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a></span><span> </span><span id="local-6989586621679151563"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151563"><span class="hs-identifier hs-var">username</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-231"></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest
|
||||
UpdateUser contentType NoContent MimeNoContent
|
||||
forall req contentType res accept.
|
||||
Method
|
||||
-> [ByteString]
|
||||
-> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a></span><span> </span><span class="annot"><span class="annottext">Method
|
||||
</span><span class="hs-string">"PUT"</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-string">"/user/"</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Text -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679151563"><span class="hs-identifier hs-var">username</span></a></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-232"></span><span> </span><span class="annot"><span class="annottext">OpenAPIPetstoreRequest
|
||||
UpdateUser contentType NoContent MimeNoContent
|
||||
-> User
|
||||
-> OpenAPIPetstoreRequest
|
||||
UpdateUser contentType NoContent MimeNoContent
|
||||
forall req param contentType res accept.
|
||||
(HasBodyParam req param, Consumes req contentType,
|
||||
MimeRender contentType param) =>
|
||||
OpenAPIPetstoreRequest req contentType res accept
|
||||
-> param -> OpenAPIPetstoreRequest req contentType res accept
|
||||
</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-operator hs-var">`setBodyParam`</span></a></span><span> </span><span class="annot"><span class="annottext">User
|
||||
</span><a href="#local-6989586621679151564"><span class="hs-identifier hs-var">body</span></a></span><span>
|
||||
</span><span id="line-233"></span><span>
|
||||
</span><span id="line-234"></span><span class="hs-keyword">data</span><span> </span><span id="UpdateUser"><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-var">UpdateUser</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-235"></span><span>
|
||||
</span><span id="line-236"></span><span class="hs-comment">-- | /Body Param/ "body" - Updated user object</span><span>
|
||||
</span><span id="line-237"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679151561"><span class="annot"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a></span></span><span> </span><span>
|
||||
</span><span id="line-238"></span><span>
|
||||
</span><span id="line-239"></span><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><span id="line-240"></span><span id="local-6989586621679151560"><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151560"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679151560"><span class="hs-identifier hs-type">mtype</span></a></span></span><span>
|
||||
</span><span id="line-241"></span><span>
|
||||
</span><span id="line-242"></span><span class="hs-keyword">instance</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span>
|
||||
</span><span id="line-243"></span><span>
|
||||
</span><span id="line-244"></span></pre></body></html>
|
||||
@ -7,23 +7,23 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.API
|
||||
-}</span><span>
|
||||
</span><a name="line-14"></a><span>
|
||||
</span><a name="line-15"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API</span><span>
|
||||
</span><a name="line-16"></a><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html"><span class="hs-identifier">OpenAPIPetstore.API.AnotherFake</span></a><span>
|
||||
</span><a name="line-17"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.API.Fake.html"><span class="hs-identifier">OpenAPIPetstore.API.Fake</span></a><span>
|
||||
</span><a name="line-18"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html"><span class="hs-identifier">OpenAPIPetstore.API.FakeClassnameTags123</span></a><span>
|
||||
</span><a name="line-19"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.API.Pet.html"><span class="hs-identifier">OpenAPIPetstore.API.Pet</span></a><span>
|
||||
</span><a name="line-20"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.API.Store.html"><span class="hs-identifier">OpenAPIPetstore.API.Store</span></a><span>
|
||||
</span><a name="line-21"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.API.User.html"><span class="hs-identifier">OpenAPIPetstore.API.User</span></a><span>
|
||||
</span><a name="line-22"></a><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-23"></a><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html"><span class="hs-identifier">OpenAPIPetstore.API.AnotherFake</span></a><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.API.Fake.html"><span class="hs-identifier">OpenAPIPetstore.API.Fake</span></a><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html"><span class="hs-identifier">OpenAPIPetstore.API.FakeClassnameTags123</span></a><span>
|
||||
</span><a name="line-27"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.API.Pet.html"><span class="hs-identifier">OpenAPIPetstore.API.Pet</span></a><span>
|
||||
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.API.Store.html"><span class="hs-identifier">OpenAPIPetstore.API.Store</span></a><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.API.User.html"><span class="hs-identifier">OpenAPIPetstore.API.User</span></a></pre></body></html>
|
||||
</span><span id="line-14"></span><span>
|
||||
</span><span id="line-15"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.API</span><span>
|
||||
</span><span id="line-16"></span><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html"><span class="hs-identifier">OpenAPIPetstore.API.AnotherFake</span></a></span><span>
|
||||
</span><span id="line-17"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Fake.html"><span class="hs-identifier">OpenAPIPetstore.API.Fake</span></a></span><span>
|
||||
</span><span id="line-18"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html"><span class="hs-identifier">OpenAPIPetstore.API.FakeClassnameTags123</span></a></span><span>
|
||||
</span><span id="line-19"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html"><span class="hs-identifier">OpenAPIPetstore.API.Pet</span></a></span><span>
|
||||
</span><span id="line-20"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html"><span class="hs-identifier">OpenAPIPetstore.API.Store</span></a></span><span>
|
||||
</span><span id="line-21"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html"><span class="hs-identifier">OpenAPIPetstore.API.User</span></a></span><span>
|
||||
</span><span id="line-22"></span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-23"></span><span>
|
||||
</span><span id="line-24"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.AnotherFake.html"><span class="hs-identifier">OpenAPIPetstore.API.AnotherFake</span></a></span><span>
|
||||
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Fake.html"><span class="hs-identifier">OpenAPIPetstore.API.Fake</span></a></span><span>
|
||||
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html"><span class="hs-identifier">OpenAPIPetstore.API.FakeClassnameTags123</span></a></span><span>
|
||||
</span><span id="line-27"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Pet.html"><span class="hs-identifier">OpenAPIPetstore.API.Pet</span></a></span><span>
|
||||
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.Store.html"><span class="hs-identifier">OpenAPIPetstore.API.Store</span></a></span><span>
|
||||
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.User.html"><span class="hs-identifier">OpenAPIPetstore.API.User</span></a></span></pre></body></html>
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -7,28 +7,28 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.Logging
|
||||
Logging functions
|
||||
-}</span><span>
|
||||
</span><a name="line-15"></a><span class="hs-pragma">{-# LANGUAGE CPP #-}</span><span>
|
||||
</span><a name="line-16"></a><span>
|
||||
</span><a name="line-17"></a><span class="hs-cpp">#ifdef USE_KATIP
|
||||
</span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE CPP #-}</span><span class="hs-cpp">
|
||||
|
||||
#ifdef USE_KATIP
|
||||
</span><span>
|
||||
</span><a name="line-19"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.Logging</span><span>
|
||||
</span><a name="line-20"></a><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html"><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span></a><span>
|
||||
</span><a name="line-21"></a><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-22"></a><span>
|
||||
</span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html"><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span></a><span>
|
||||
</span><a name="line-24"></a><span>
|
||||
</span><a name="line-25"></a><span class="hs-cpp">#else
|
||||
</span><span id="line-19"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.Logging</span><span>
|
||||
</span><span id="line-20"></span><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html"><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span></a></span><span>
|
||||
</span><span id="line-21"></span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-22"></span><span>
|
||||
</span><span id="line-23"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html"><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span></a></span><span class="hs-cpp">
|
||||
|
||||
#else
|
||||
</span><span>
|
||||
</span><a name="line-27"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.Logging</span><span>
|
||||
</span><a name="line-28"></a><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span><span>
|
||||
</span><a name="line-29"></a><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-30"></a><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span><span>
|
||||
</span><a name="line-32"></a><span>
|
||||
</span><a name="line-33"></a><span class="hs-cpp">#endif
|
||||
</span><span id="line-27"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.Logging</span><span>
|
||||
</span><span id="line-28"></span><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span><span>
|
||||
</span><span id="line-29"></span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-30"></span><span>
|
||||
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span><span class="hs-cpp">
|
||||
|
||||
#endif
|
||||
</span></pre></body></html>
|
||||
@ -7,113 +7,224 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.LoggingKatip
|
||||
Katip Logging functions
|
||||
-}</span><span>
|
||||
</span><a name="line-15"></a><span>
|
||||
</span><a name="line-16"></a><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-pragma">{-# LANGUAGE RankNTypes #-}</span><span>
|
||||
</span><a name="line-18"></a><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables #-}</span><span>
|
||||
</span><a name="line-19"></a><span>
|
||||
</span><a name="line-20"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-21"></a><span>
|
||||
</span><a name="line-22"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Exception.Safe</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">E</span><span>
|
||||
</span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Monad.IO.Class</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Monad.Trans.Reader</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Lens.Micro</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">L</span><span>
|
||||
</span><a name="line-27"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">System.IO</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">IO</span><span>
|
||||
</span><a name="line-28"></a><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">GHC.Exts</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">IsString</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-31"></a><span>
|
||||
</span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Katip</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">LG</span><span>
|
||||
</span><a name="line-33"></a><span>
|
||||
</span><a name="line-34"></a><span class="hs-comment">-- * Type Aliases (for compatibility)</span><span>
|
||||
</span><a name="line-35"></a><span>
|
||||
</span><a name="line-36"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><a name="line-37"></a><span class="hs-keyword">type</span><span> </span><a name="LogExecWithContext"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier">LogExecWithContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679044534"><a href="#local-6989586621679044534"><span class="hs-identifier">m</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679044534"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span>
|
||||
</span><a name="line-38"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679044534"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-39"></a><span>
|
||||
</span><a name="line-40"></a><span class="hs-comment">-- | A Katip logging block</span><span>
|
||||
</span><a name="line-41"></a><span class="hs-keyword">type</span><span> </span><a name="LogExec"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier">LogExec</span></a></a><span> </span><a name="local-6989586621679044532"><a href="#local-6989586621679044532"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679044533"><a href="#local-6989586621679044533"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">LG.KatipT</span><span> </span><a href="#local-6989586621679044532"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679044533"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679044532"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679044533"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-42"></a><span>
|
||||
</span><a name="line-43"></a><span class="hs-comment">-- | A Katip Log environment</span><span>
|
||||
</span><a name="line-44"></a><span class="hs-keyword">type</span><span> </span><a name="LogContext"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier">LogContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-type">LG.LogEnv</span><span>
|
||||
</span><a name="line-45"></a><span>
|
||||
</span><a name="line-46"></a><span class="hs-comment">-- | A Katip Log severity</span><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">type</span><span> </span><a name="LogLevel"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier">LogLevel</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-type">LG.Severity</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-comment">-- * default logger</span><span>
|
||||
</span><a name="line-50"></a><span>
|
||||
</span><a name="line-51"></a><span class="hs-comment">-- | the default log environment</span><span>
|
||||
</span><a name="line-52"></a><span class="hs-identifier">initLogContext</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-53"></a><a name="initLogContext"><a href="OpenAPIPetstore.LoggingKatip.html#initLogContext"><span class="hs-identifier">initLogContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.initLogEnv</span><span> </span><span class="hs-string">"OpenAPIPetstore"</span><span> </span><span class="hs-string">"dev"</span><span>
|
||||
</span><a name="line-54"></a><span>
|
||||
</span><a name="line-55"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><a name="line-56"></a><span class="hs-identifier">runDefaultLogExecWithContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-57"></a><a name="runDefaultLogExecWithContext"><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier">runDefaultLogExecWithContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.runKatipT</span><span>
|
||||
</span><a name="line-58"></a><span>
|
||||
</span><a name="line-59"></a><span class="hs-comment">-- * stdout logger</span><span>
|
||||
</span><a name="line-60"></a><span>
|
||||
</span><a name="line-61"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><a name="line-62"></a><span class="hs-identifier">stdoutLoggingExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-63"></a><a name="stdoutLoggingExec"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingExec"><span class="hs-identifier">stdoutLoggingExec</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span>
|
||||
</span><a name="line-64"></a><span>
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- | A Katip Log environment which targets stdout</span><span>
|
||||
</span><a name="line-66"></a><span class="hs-identifier">stdoutLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-67"></a><a name="stdoutLoggingContext"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier">stdoutLoggingContext</span></a></a><span> </span><a name="local-6989586621679046972"><a href="#local-6989586621679046972"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-68"></a><span> </span><a name="local-6989586621679047207"><a href="#local-6989586621679047207"><span class="hs-identifier">handleScribe</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">LG.mkHandleScribe</span><span> </span><span class="hs-identifier hs-var">LG.ColorIfTerminal</span><span> </span><span class="hs-identifier hs-var">IO.stdout</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG.permitItem</span><span> </span><span class="hs-identifier hs-var">LG.InfoS</span><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-var">LG.V2</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-identifier hs-var">LG.registerScribe</span><span> </span><span class="hs-string">"stdout"</span><span> </span><a href="#local-6989586621679047207"><span class="hs-identifier hs-var">handleScribe</span></a><span> </span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span><span> </span><a href="#local-6989586621679046972"><span class="hs-identifier hs-var">cxt</span></a><span>
|
||||
</span><a name="line-70"></a><span>
|
||||
</span><a name="line-71"></a><span class="hs-comment">-- * stderr logger</span><span>
|
||||
</span><a name="line-72"></a><span>
|
||||
</span><a name="line-73"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><a name="line-74"></a><span class="hs-identifier">stderrLoggingExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-75"></a><a name="stderrLoggingExec"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingExec"><span class="hs-identifier">stderrLoggingExec</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-comment">-- | A Katip Log environment which targets stderr</span><span>
|
||||
</span><a name="line-78"></a><span class="hs-identifier">stderrLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-79"></a><a name="stderrLoggingContext"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier">stderrLoggingContext</span></a></a><span> </span><a name="local-6989586621679047208"><a href="#local-6989586621679047208"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-80"></a><span> </span><a name="local-6989586621679047209"><a href="#local-6989586621679047209"><span class="hs-identifier">handleScribe</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">LG.mkHandleScribe</span><span> </span><span class="hs-identifier hs-var">LG.ColorIfTerminal</span><span> </span><span class="hs-identifier hs-var">IO.stderr</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG.permitItem</span><span> </span><span class="hs-identifier hs-var">LG.InfoS</span><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-var">LG.V2</span><span>
|
||||
</span><a name="line-81"></a><span> </span><span class="hs-identifier hs-var">LG.registerScribe</span><span> </span><span class="hs-string">"stderr"</span><span> </span><a href="#local-6989586621679047209"><span class="hs-identifier hs-var">handleScribe</span></a><span> </span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span><span> </span><a href="#local-6989586621679047208"><span class="hs-identifier hs-var">cxt</span></a><span>
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- * Null logger</span><span>
|
||||
</span><a name="line-84"></a><span>
|
||||
</span><a name="line-85"></a><span class="hs-comment">-- | Disables Katip logging</span><span>
|
||||
</span><a name="line-86"></a><span class="hs-identifier">runNullLogExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-87"></a><a name="runNullLogExec"><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier">runNullLogExec</span></a></a><span> </span><a name="local-6989586621679047210"><a href="#local-6989586621679047210"><span class="hs-identifier">le</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG.KatipT</span><span> </span><a name="local-6989586621679047211"><a href="#local-6989586621679047211"><span class="hs-identifier">f</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">P.runReaderT</span><span> </span><a href="#local-6989586621679047211"><span class="hs-identifier hs-var">f</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">L.set</span><span> </span><span class="hs-identifier hs-var">LG.logEnvScribes</span><span> </span><span class="hs-identifier hs-var">mempty</span><span> </span><a href="#local-6989586621679047210"><span class="hs-identifier hs-var">le</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-88"></a><span>
|
||||
</span><a name="line-89"></a><span class="hs-comment">-- * Log Msg</span><span>
|
||||
</span><a name="line-90"></a><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">-- | Log a katip message</span><span>
|
||||
</span><a name="line-92"></a><span class="hs-identifier">_log</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679045131"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">LG.Katip</span><span> </span><a href="#local-6989586621679045131"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679045131"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-93"></a><a name="_log"><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier">_log</span></a></a><span> </span><a name="local-6989586621679047212"><a href="#local-6989586621679047212"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679047213"><a href="#local-6989586621679047213"><span class="hs-identifier">level</span></a></a><span> </span><a name="local-6989586621679047214"><a href="#local-6989586621679047214"><span class="hs-identifier">msg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-94"></a><span> </span><span class="hs-identifier hs-var">LG.logMsg</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><a href="#local-6989586621679047212"><span class="hs-identifier hs-var">src</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679047213"><span class="hs-identifier hs-var">level</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG.logStr</span><span> </span><a href="#local-6989586621679047214"><span class="hs-identifier hs-var">msg</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-95"></a><span>
|
||||
</span><a name="line-96"></a><span class="hs-comment">-- * Log Exceptions</span><span>
|
||||
</span><a name="line-97"></a><span>
|
||||
</span><a name="line-98"></a><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
|
||||
</span><a name="line-99"></a><span class="hs-identifier">logExceptions</span><span>
|
||||
</span><a name="line-100"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">LG.Katip</span><span> </span><a href="#local-6989586621679044535"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">E.MonadCatch</span><span> </span><a href="#local-6989586621679044535"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679044535"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-101"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679044535"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679044536"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679044535"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679044536"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-102"></a><a name="logExceptions"><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier">logExceptions</span></a></a><span> </span><a name="local-6989586621679047252"><a href="#local-6989586621679047252"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-103"></a><span> </span><span class="hs-identifier hs-var">E.handle</span><span>
|
||||
</span><a name="line-104"></a><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679047440"><a href="#local-6989586621679047440"><span class="hs-identifier">e</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">E.SomeException</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-105"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679047252"><span class="hs-identifier hs-var">src</span></a><span> </span><span class="hs-identifier hs-var">LG.ErrorS</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679047440"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-106"></a><span> </span><span class="hs-identifier hs-var">E.throw</span><span> </span><a href="#local-6989586621679047440"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-107"></a><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- * Log Level</span><span>
|
||||
</span><a name="line-109"></a><span>
|
||||
</span><a name="line-110"></a><span class="hs-identifier">levelInfo</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-111"></a><a name="levelInfo"><a href="OpenAPIPetstore.LoggingKatip.html#levelInfo"><span class="hs-identifier">levelInfo</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.InfoS</span><span>
|
||||
</span><a name="line-112"></a><span>
|
||||
</span><a name="line-113"></a><span class="hs-identifier">levelError</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-114"></a><a name="levelError"><a href="OpenAPIPetstore.LoggingKatip.html#levelError"><span class="hs-identifier">levelError</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.ErrorS</span><span>
|
||||
</span><a name="line-115"></a><span>
|
||||
</span><a name="line-116"></a><span class="hs-identifier">levelDebug</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-117"></a><a name="levelDebug"><a href="OpenAPIPetstore.LoggingKatip.html#levelDebug"><span class="hs-identifier">levelDebug</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.DebugS</span><span>
|
||||
</span><a name="line-118"></a><span>
|
||||
</span><a name="line-119"></a></pre></body></html>
|
||||
</span><span id="line-15"></span><span>
|
||||
</span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE RankNTypes #-}</span><span>
|
||||
</span><span id="line-18"></span><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables #-}</span><span>
|
||||
</span><span id="line-19"></span><span>
|
||||
</span><span id="line-20"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-21"></span><span>
|
||||
</span><span id="line-22"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.Exception.Safe</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">E</span></span><span>
|
||||
</span><span id="line-23"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.Monad.IO.Class</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-24"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.Monad.Trans.Reader</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Lens.Micro</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">L</span></span><span>
|
||||
</span><span id="line-27"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">System.IO</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">IO</span></span><span>
|
||||
</span><span id="line-28"></span><span>
|
||||
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Text</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">GHC.Exts</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">IsString</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-31"></span><span>
|
||||
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Katip</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">LG</span></span><span>
|
||||
</span><span id="line-33"></span><span>
|
||||
</span><span id="line-34"></span><span class="hs-comment">-- * Type Aliases (for compatibility)</span><span>
|
||||
</span><span id="line-35"></span><span>
|
||||
</span><span id="line-36"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><span id="line-37"></span><span class="hs-keyword">type</span><span> </span><span id="LogExecWithContext"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-var">LogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span id="local-6989586621679145572"><span class="annot"><a href="#local-6989586621679145572"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679145571"><span class="annot"><a href="#local-6989586621679145571"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-operator">.</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.MonadIO</span></span><span> </span><span class="annot"><a href="#local-6989586621679145572"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-glyph">=></span><span>
|
||||
</span><span id="line-38"></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145572"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145571"><span class="hs-identifier hs-type">a</span></a></span><span>
|
||||
</span><span id="line-39"></span><span>
|
||||
</span><span id="line-40"></span><span class="hs-comment">-- | A Katip logging block</span><span>
|
||||
</span><span id="line-41"></span><span class="hs-keyword">type</span><span> </span><span id="LogExec"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-var">LogExec</span></a></span></span><span> </span><span id="local-6989586621679145569"><span class="annot"><a href="#local-6989586621679145569"><span class="hs-identifier hs-type">m</span></a></span></span><span> </span><span id="local-6989586621679145568"><span class="annot"><a href="#local-6989586621679145568"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.KatipT</span></span><span> </span><span class="annot"><a href="#local-6989586621679145569"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145568"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="#local-6989586621679145569"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145568"><span class="hs-identifier hs-type">a</span></a></span><span>
|
||||
</span><span id="line-42"></span><span>
|
||||
</span><span id="line-43"></span><span class="hs-comment">-- | A Katip Log environment</span><span>
|
||||
</span><span id="line-44"></span><span class="hs-keyword">type</span><span> </span><span id="LogContext"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-var">LogContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.LogEnv</span></span><span>
|
||||
</span><span id="line-45"></span><span>
|
||||
</span><span id="line-46"></span><span class="hs-comment">-- | A Katip Log severity</span><span>
|
||||
</span><span id="line-47"></span><span class="hs-keyword">type</span><span> </span><span id="LogLevel"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-var">LogLevel</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.Severity</span></span><span>
|
||||
</span><span id="line-48"></span><span>
|
||||
</span><span id="line-49"></span><span class="hs-comment">-- * default logger</span><span>
|
||||
</span><span id="line-50"></span><span>
|
||||
</span><span id="line-51"></span><span class="hs-comment">-- | the default log environment</span><span>
|
||||
</span><span id="line-52"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#initLogContext"><span class="hs-identifier hs-type">initLogContext</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span>
|
||||
</span><span id="line-53"></span><span id="initLogContext"><span class="annot"><span class="annottext">initLogContext :: IO LogContext
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#initLogContext"><span class="hs-identifier hs-var hs-var">initLogContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Namespace -> Environment -> IO LogContext
|
||||
</span><span class="hs-identifier hs-var">LG.initLogEnv</span></span><span> </span><span class="annot"><span class="annottext">Namespace
|
||||
</span><span class="hs-string">"OpenAPIPetstore"</span></span><span> </span><span class="annot"><span class="annottext">Environment
|
||||
</span><span class="hs-string">"dev"</span></span><span>
|
||||
</span><span id="line-54"></span><span>
|
||||
</span><span id="line-55"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><span id="line-56"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-type">runDefaultLogExecWithContext</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a></span><span>
|
||||
</span><span id="line-57"></span><span id="runDefaultLogExecWithContext"><span class="annot"><span class="annottext">runDefaultLogExecWithContext :: LogContext -> LogExec m a
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var hs-var">runDefaultLogExecWithContext</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext -> LogExec m a
|
||||
forall (m :: * -> *) a. LogContext -> KatipT m a -> m a
|
||||
</span><span class="hs-identifier hs-var">LG.runKatipT</span></span><span>
|
||||
</span><span id="line-58"></span><span>
|
||||
</span><span id="line-59"></span><span class="hs-comment">-- * stdout logger</span><span>
|
||||
</span><span id="line-60"></span><span>
|
||||
</span><span id="line-61"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><span id="line-62"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingExec"><span class="hs-identifier hs-type">stdoutLoggingExec</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a></span><span>
|
||||
</span><span id="line-63"></span><span id="stdoutLoggingExec"><span class="annot"><span class="annottext">stdoutLoggingExec :: LogContext -> LogExec m a
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingExec"><span class="hs-identifier hs-var hs-var">stdoutLoggingExec</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext -> LogExec m a
|
||||
LogExecWithContext
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a></span><span>
|
||||
</span><span id="line-64"></span><span>
|
||||
</span><span id="line-65"></span><span class="hs-comment">-- | A Katip Log environment which targets stdout</span><span>
|
||||
</span><span id="line-66"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-type">stdoutLoggingContext</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span>
|
||||
</span><span id="line-67"></span><span id="stdoutLoggingContext"><span class="annot"><span class="annottext">stdoutLoggingContext :: LogContext -> IO LogContext
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier hs-var hs-var">stdoutLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679145559"><span class="annot"><span class="annottext">LogContext
|
||||
</span><a href="#local-6989586621679145559"><span class="hs-identifier hs-var">cxt</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><span id="line-68"></span><span> </span><span id="local-6989586621679145558"><span class="annot"><span class="annottext">Scribe
|
||||
</span><a href="#local-6989586621679145558"><span class="hs-identifier hs-var">handleScribe</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">ColorStrategy -> Handle -> PermitFunc -> Verbosity -> IO Scribe
|
||||
</span><span class="hs-identifier hs-var">LG.mkHandleScribe</span></span><span> </span><span class="annot"><span class="annottext">ColorStrategy
|
||||
</span><span class="hs-identifier hs-var">LG.ColorIfTerminal</span></span><span> </span><span class="annot"><span class="annottext">Handle
|
||||
</span><span class="hs-identifier hs-var">IO.stdout</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Severity -> Item a -> IO Bool
|
||||
forall (m :: * -> *) a. Monad m => Severity -> Item a -> m Bool
|
||||
</span><span class="hs-identifier hs-var">LG.permitItem</span></span><span> </span><span class="annot"><span class="annottext">Severity
|
||||
</span><span class="hs-identifier hs-var">LG.InfoS</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Verbosity
|
||||
</span><span class="hs-identifier hs-var">LG.V2</span></span><span>
|
||||
</span><span id="line-69"></span><span> </span><span class="annot"><span class="annottext">Text -> Scribe -> ScribeSettings -> LogContext -> IO LogContext
|
||||
</span><span class="hs-identifier hs-var">LG.registerScribe</span></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><span class="hs-string">"stdout"</span></span><span> </span><span class="annot"><span class="annottext">Scribe
|
||||
</span><a href="#local-6989586621679145558"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
|
||||
</span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span></span><span> </span><span class="annot"><span class="annottext">LogContext
|
||||
</span><a href="#local-6989586621679145559"><span class="hs-identifier hs-var">cxt</span></a></span><span>
|
||||
</span><span id="line-70"></span><span>
|
||||
</span><span id="line-71"></span><span class="hs-comment">-- * stderr logger</span><span>
|
||||
</span><span id="line-72"></span><span>
|
||||
</span><span id="line-73"></span><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><span id="line-74"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingExec"><span class="hs-identifier hs-type">stderrLoggingExec</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a></span><span>
|
||||
</span><span id="line-75"></span><span id="stderrLoggingExec"><span class="annot"><span class="annottext">stderrLoggingExec :: LogContext -> LogExec m a
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingExec"><span class="hs-identifier hs-var hs-var">stderrLoggingExec</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">LogContext -> LogExec m a
|
||||
LogExecWithContext
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a></span><span>
|
||||
</span><span id="line-76"></span><span>
|
||||
</span><span id="line-77"></span><span class="hs-comment">-- | A Katip Log environment which targets stderr</span><span>
|
||||
</span><span id="line-78"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-type">stderrLoggingContext</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a></span><span>
|
||||
</span><span id="line-79"></span><span id="stderrLoggingContext"><span class="annot"><span class="annottext">stderrLoggingContext :: LogContext -> IO LogContext
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier hs-var hs-var">stderrLoggingContext</span></a></span></span><span> </span><span id="local-6989586621679145547"><span class="annot"><span class="annottext">LogContext
|
||||
</span><a href="#local-6989586621679145547"><span class="hs-identifier hs-var">cxt</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><span id="line-80"></span><span> </span><span id="local-6989586621679145546"><span class="annot"><span class="annottext">Scribe
|
||||
</span><a href="#local-6989586621679145546"><span class="hs-identifier hs-var">handleScribe</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">ColorStrategy -> Handle -> PermitFunc -> Verbosity -> IO Scribe
|
||||
</span><span class="hs-identifier hs-var">LG.mkHandleScribe</span></span><span> </span><span class="annot"><span class="annottext">ColorStrategy
|
||||
</span><span class="hs-identifier hs-var">LG.ColorIfTerminal</span></span><span> </span><span class="annot"><span class="annottext">Handle
|
||||
</span><span class="hs-identifier hs-var">IO.stderr</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Severity -> Item a -> IO Bool
|
||||
forall (m :: * -> *) a. Monad m => Severity -> Item a -> m Bool
|
||||
</span><span class="hs-identifier hs-var">LG.permitItem</span></span><span> </span><span class="annot"><span class="annottext">Severity
|
||||
</span><span class="hs-identifier hs-var">LG.InfoS</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Verbosity
|
||||
</span><span class="hs-identifier hs-var">LG.V2</span></span><span>
|
||||
</span><span id="line-81"></span><span> </span><span class="annot"><span class="annottext">Text -> Scribe -> ScribeSettings -> LogContext -> IO LogContext
|
||||
</span><span class="hs-identifier hs-var">LG.registerScribe</span></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><span class="hs-string">"stderr"</span></span><span> </span><span class="annot"><span class="annottext">Scribe
|
||||
</span><a href="#local-6989586621679145546"><span class="hs-identifier hs-var">handleScribe</span></a></span><span> </span><span class="annot"><span class="annottext">ScribeSettings
|
||||
</span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span></span><span> </span><span class="annot"><span class="annottext">LogContext
|
||||
</span><a href="#local-6989586621679145547"><span class="hs-identifier hs-var">cxt</span></a></span><span>
|
||||
</span><span id="line-82"></span><span>
|
||||
</span><span id="line-83"></span><span class="hs-comment">-- * Null logger</span><span>
|
||||
</span><span id="line-84"></span><span>
|
||||
</span><span id="line-85"></span><span class="hs-comment">-- | Disables Katip logging</span><span>
|
||||
</span><span id="line-86"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-type">runNullLogExec</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a></span><span>
|
||||
</span><span id="line-87"></span><span id="runNullLogExec"><span class="annot"><span class="annottext">runNullLogExec :: LogContext -> LogExec m a
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-var hs-var">runNullLogExec</span></a></span></span><span> </span><span id="local-6989586621679145543"><span class="annot"><span class="annottext">LogContext
|
||||
</span><a href="#local-6989586621679145543"><span class="hs-identifier hs-var">le</span></a></span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">LG.KatipT</span></span><span> </span><span id="local-6989586621679145541"><span class="annot"><span class="annottext">ReaderT LogContext m a
|
||||
</span><a href="#local-6989586621679145541"><span class="hs-identifier hs-var">f</span></a></span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ReaderT LogContext m a -> LogContext -> m a
|
||||
forall r (m :: * -> *) a. ReaderT r m a -> r -> m a
|
||||
</span><span class="hs-identifier hs-var hs-var">P.runReaderT</span></span><span> </span><span class="annot"><span class="annottext">ReaderT LogContext m a
|
||||
</span><a href="#local-6989586621679145541"><span class="hs-identifier hs-var">f</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">ASetter
|
||||
LogContext
|
||||
LogContext
|
||||
(Map Text ScribeHandle)
|
||||
(Map Text ScribeHandle)
|
||||
-> Map Text ScribeHandle -> LogContext -> LogContext
|
||||
forall s t a b. ASetter s t a b -> b -> s -> t
|
||||
</span><span class="hs-identifier hs-var">L.set</span></span><span> </span><span class="annot"><span class="annottext">ASetter
|
||||
LogContext
|
||||
LogContext
|
||||
(Map Text ScribeHandle)
|
||||
(Map Text ScribeHandle)
|
||||
Lens' LogContext (Map Text ScribeHandle)
|
||||
</span><span class="hs-identifier hs-var">LG.logEnvScribes</span></span><span> </span><span class="annot"><span class="annottext">Map Text ScribeHandle
|
||||
forall a. Monoid a => a
|
||||
</span><span class="hs-identifier hs-var">mempty</span></span><span> </span><span class="annot"><span class="annottext">LogContext
|
||||
</span><a href="#local-6989586621679145543"><span class="hs-identifier hs-var">le</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-88"></span><span>
|
||||
</span><span id="line-89"></span><span class="hs-comment">-- * Log Msg</span><span>
|
||||
</span><span id="line-90"></span><span>
|
||||
</span><span id="line-91"></span><span class="hs-comment">-- | Log a katip message</span><span>
|
||||
</span><span id="line-92"></span><span id="local-6989586621679145581"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-type">_log</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Applicative</span></span><span> </span><span class="annot"><a href="#local-6989586621679145581"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">LG.Katip</span></span><span> </span><span class="annot"><a href="#local-6989586621679145581"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="#local-6989586621679145581"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="hs-special">(</span><span class="hs-special">)</span></span><span>
|
||||
</span><span id="line-93"></span><span id="_log"><span class="annot"><span class="annottext">_log :: Text -> Severity -> Text -> m ()
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var hs-var">_log</span></a></span></span><span> </span><span id="local-6989586621679145536"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679145536"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span id="local-6989586621679145535"><span class="annot"><span class="annottext">Severity
|
||||
</span><a href="#local-6989586621679145535"><span class="hs-identifier hs-var">level</span></a></span></span><span> </span><span id="local-6989586621679145534"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679145534"><span class="hs-identifier hs-var">msg</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><span id="line-94"></span><span> </span><span class="annot"><span class="annottext">Namespace -> Severity -> LogStr -> m ()
|
||||
forall (m :: * -> *).
|
||||
(Applicative m, Katip m) =>
|
||||
Namespace -> Severity -> LogStr -> m ()
|
||||
</span><span class="hs-identifier hs-var">LG.logMsg</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> Namespace
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">fromString</span></span><span> </span><span class="annot"><span class="annottext">(String -> Namespace) -> String -> Namespace
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">Text -> String
|
||||
</span><span class="hs-identifier hs-var">T.unpack</span></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679145536"><span class="hs-identifier hs-var">src</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">Severity
|
||||
</span><a href="#local-6989586621679145535"><span class="hs-identifier hs-var">level</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Text -> LogStr
|
||||
forall a. StringConv a Text => a -> LogStr
|
||||
</span><span class="hs-identifier hs-var">LG.logStr</span></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679145534"><span class="hs-identifier hs-var">msg</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-95"></span><span>
|
||||
</span><span id="line-96"></span><span class="hs-comment">-- * Log Exceptions</span><span>
|
||||
</span><span id="line-97"></span><span>
|
||||
</span><span id="line-98"></span><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
|
||||
</span><span id="line-99"></span><span id="local-6989586621679145529"><span id="local-6989586621679145530"><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-type">logExceptions</span></a></span><span>
|
||||
</span><span id="line-100"></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">LG.Katip</span></span><span> </span><span class="annot"><a href="#local-6989586621679145530"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">E.MonadCatch</span></span><span> </span><span class="annot"><a href="#local-6989586621679145530"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Applicative</span></span><span> </span><span class="annot"><a href="#local-6989586621679145530"><span class="hs-identifier hs-type">m</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-101"></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Text</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="#local-6989586621679145530"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145529"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="#local-6989586621679145530"><span class="hs-identifier hs-type">m</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145529"><span class="hs-identifier hs-type">a</span></a></span></span></span><span>
|
||||
</span><span id="line-102"></span><span id="logExceptions"><span class="annot"><span class="annottext">logExceptions :: Text -> m a -> m a
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-var hs-var">logExceptions</span></a></span></span><span> </span><span id="local-6989586621679145527"><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679145527"><span class="hs-identifier hs-var">src</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-103"></span><span> </span><span class="annot"><span class="annottext">(SomeException -> m a) -> m a -> m a
|
||||
forall (m :: * -> *) e a.
|
||||
(MonadCatch m, Exception e) =>
|
||||
(e -> m a) -> m a -> m a
|
||||
</span><span class="hs-identifier hs-var">E.handle</span></span><span>
|
||||
</span><span id="line-104"></span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><span id="local-6989586621679145525"><span class="annot"><span class="annottext">SomeException
|
||||
</span><a href="#local-6989586621679145525"><span class="hs-identifier hs-var">e</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">E.SomeException</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><span id="line-105"></span><span> </span><span class="annot"><span class="annottext">Text -> Severity -> Text -> m ()
|
||||
forall (m :: * -> *).
|
||||
(Applicative m, Katip m) =>
|
||||
Text -> Severity -> Text -> m ()
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a></span><span> </span><span class="annot"><span class="annottext">Text
|
||||
</span><a href="#local-6989586621679145527"><span class="hs-identifier hs-var">src</span></a></span><span> </span><span class="annot"><span class="annottext">Severity
|
||||
</span><span class="hs-identifier hs-var">LG.ErrorS</span></span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> Text
|
||||
</span><span class="hs-identifier hs-var">T.pack</span></span><span> </span><span class="annot"><span class="annottext">(String -> Text)
|
||||
-> (SomeException -> String) -> SomeException -> Text
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">SomeException -> String
|
||||
forall a. Show a => a -> String
|
||||
</span><span class="hs-identifier hs-var">show</span></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">SomeException
|
||||
</span><a href="#local-6989586621679145525"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-106"></span><span> </span><span class="annot"><span class="annottext">SomeException -> m a
|
||||
forall (m :: * -> *) e a. (MonadThrow m, Exception e) => e -> m a
|
||||
</span><span class="hs-identifier hs-var">E.throw</span></span><span> </span><span class="annot"><span class="annottext">SomeException
|
||||
</span><a href="#local-6989586621679145525"><span class="hs-identifier hs-var">e</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-107"></span><span>
|
||||
</span><span id="line-108"></span><span class="hs-comment">-- * Log Level</span><span>
|
||||
</span><span id="line-109"></span><span>
|
||||
</span><span id="line-110"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#levelInfo"><span class="hs-identifier hs-type">levelInfo</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a></span><span>
|
||||
</span><span id="line-111"></span><span id="levelInfo"><span class="annot"><span class="annottext">levelInfo :: Severity
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#levelInfo"><span class="hs-identifier hs-var hs-var">levelInfo</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Severity
|
||||
</span><span class="hs-identifier hs-var">LG.InfoS</span></span><span>
|
||||
</span><span id="line-112"></span><span>
|
||||
</span><span id="line-113"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#levelError"><span class="hs-identifier hs-type">levelError</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a></span><span>
|
||||
</span><span id="line-114"></span><span id="levelError"><span class="annot"><span class="annottext">levelError :: Severity
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#levelError"><span class="hs-identifier hs-var hs-var">levelError</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Severity
|
||||
</span><span class="hs-identifier hs-var">LG.ErrorS</span></span><span>
|
||||
</span><span id="line-115"></span><span>
|
||||
</span><span id="line-116"></span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#levelDebug"><span class="hs-identifier hs-type">levelDebug</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a></span><span>
|
||||
</span><span id="line-117"></span><span id="levelDebug"><span class="annot"><span class="annottext">levelDebug :: Severity
|
||||
</span><a href="OpenAPIPetstore.LoggingKatip.html#levelDebug"><span class="hs-identifier hs-var hs-var">levelDebug</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Severity
|
||||
</span><span class="hs-identifier hs-var">LG.DebugS</span></span><span>
|
||||
</span><span id="line-118"></span></pre></body></html>
|
||||
@ -7,250 +7,627 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.MimeTypes
|
||||
-}</span><span>
|
||||
</span><a name="line-14"></a><span>
|
||||
</span><a name="line-15"></a><span class="hs-pragma">{-# LANGUAGE ConstraintKinds #-}</span><span>
|
||||
</span><a name="line-16"></a><span class="hs-pragma">{-# LANGUAGE ExistentialQuantification #-}</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><a name="line-18"></a><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><a name="line-19"></a><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><a name="line-20"></a><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><a name="line-21"></a><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables #-}</span><span>
|
||||
</span><a name="line-22"></a><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><a name="line-23"></a><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-25"></a><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Arrow</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">left</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-27"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Aeson</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">A</span><span>
|
||||
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">B</span><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString.Builder</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BB</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString.Char8</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BC</span><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString.Lazy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BL</span><span>
|
||||
</span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.ByteString.Lazy.Char8</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">BCL</span><span>
|
||||
</span><a name="line-33"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Data</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-34"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Proxy</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Proxy</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-35"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.String</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-36"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-37"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text.Encoding</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-38"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Network.HTTP.Media</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">ME</span><span>
|
||||
</span><a name="line-39"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.FormUrlEncoded</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-40"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Web.HttpApiData</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">WH</span><span>
|
||||
</span><a name="line-41"></a><span>
|
||||
</span><a name="line-42"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var">$</span><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><span class="hs-operator hs-var">.</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><$></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-special">(</span><span class="hs-operator hs-var"><*></span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Maybe</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Char</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Double</span><span class="hs-special">,</span><span class="hs-identifier hs-type">FilePath</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Float</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Int</span><span class="hs-special">,</span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">,</span><span class="hs-identifier hs-type">String</span><span class="hs-special">,</span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">,</span><span class="hs-identifier hs-var">undefined</span><span class="hs-special">,</span><span class="hs-identifier hs-var">mempty</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-43"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Prelude</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-44"></a><span>
|
||||
</span><a name="line-45"></a><span class="hs-comment">-- * ContentType MimeType</span><span>
|
||||
</span><a name="line-46"></a><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">data</span><span> </span><a name="ContentType"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><a name="local-6989586621679089319"><a href="#local-6989586621679089319"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679089319"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="ContentType"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unContentType"><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier">unContentType</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679089319"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-comment">-- * Accept MimeType</span><span>
|
||||
</span><a name="line-50"></a><span>
|
||||
</span><a name="line-51"></a><span class="hs-keyword">data</span><span> </span><a name="Accept"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><a name="local-6989586621679089318"><a href="#local-6989586621679089318"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679089318"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Accept"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unAccept"><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier">unAccept</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679089318"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-52"></a><span>
|
||||
</span><a name="line-53"></a><span class="hs-comment">-- * Consumes Class</span><span>
|
||||
</span><a name="line-54"></a><span>
|
||||
</span><a name="line-55"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679089317"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Consumes"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier">Consumes</span></a></a><span> </span><a name="local-6989586621679089316"><a href="#local-6989586621679089316"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679089317"><a href="#local-6989586621679089317"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-56"></a><span>
|
||||
</span><a name="line-57"></a><span class="hs-comment">-- * Produces Class</span><span>
|
||||
</span><a name="line-58"></a><span>
|
||||
</span><a name="line-59"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679089315"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Produces"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier">Produces</span></a></a><span> </span><a name="local-6989586621679089314"><a href="#local-6989586621679089314"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679089315"><a href="#local-6989586621679089315"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-60"></a><span>
|
||||
</span><a name="line-61"></a><span class="hs-comment">-- * Default Mime Types</span><span>
|
||||
</span><a name="line-62"></a><span>
|
||||
</span><a name="line-63"></a><span class="hs-keyword">data</span><span> </span><a name="MimeJSON"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier">MimeJSON</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeJSON"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier">MimeJSON</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-64"></a><span class="hs-keyword">data</span><span> </span><a name="MimeXML"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier">MimeXML</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeXML"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier">MimeXML</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-65"></a><span class="hs-keyword">data</span><span> </span><a name="MimePlainText"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier">MimePlainText</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimePlainText"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier">MimePlainText</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-66"></a><span class="hs-keyword">data</span><span> </span><a name="MimeFormUrlEncoded"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier">MimeFormUrlEncoded</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeFormUrlEncoded"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier">MimeFormUrlEncoded</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-keyword">data</span><span> </span><a name="MimeMultipartFormData"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier">MimeMultipartFormData</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeMultipartFormData"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier">MimeMultipartFormData</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-68"></a><span class="hs-keyword">data</span><span> </span><a name="MimeOctetStream"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier">MimeOctetStream</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeOctetStream"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier">MimeOctetStream</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-69"></a><span class="hs-keyword">data</span><span> </span><a name="MimeNoContent"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier">MimeNoContent</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeNoContent"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier">MimeNoContent</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span class="hs-keyword">data</span><span> </span><a name="MimeAny"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier">MimeAny</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeAny"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier">MimeAny</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-71"></a><span>
|
||||
</span><a name="line-72"></a><span class="hs-comment">-- | A type for responses without content-body.</span><span>
|
||||
</span><a name="line-73"></a><span class="hs-keyword">data</span><span> </span><a name="NoContent"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier">NoContent</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="NoContent"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier">NoContent</span></a></a><span>
|
||||
</span><a name="line-74"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Show</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Eq</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-75"></a><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-comment">-- * MimeType Class</span><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P.Typeable</span><span> </span><a href="#local-6989586621679089177"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeType"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier">MimeType</span></a></a><span> </span><a name="local-6989586621679089177"><a href="#local-6989586621679089177"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-80"></a><span> </span><span class="hs-pragma">{-# MINIMAL</span><span> </span><span class="hs-pragma">mimeType</span><span> </span><span class="hs-pragma">|</span><span> </span><span class="hs-pragma">mimeTypes</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span> </span><a name="mimeTypes"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679089177"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME.MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-83"></a><span> </span><a name="local-8214565720323863383"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><a name="local-6989586621679089310"><a href="#local-6989586621679089310"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-84"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><a href="#local-6989586621679089310"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-85"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679089311"><a href="#local-6989586621679089311"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679089311"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-86"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-87"></a><span>
|
||||
</span><a name="line-88"></a><span> </span><a name="mimeType"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679089177"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME.MediaType</span><span>
|
||||
</span><a name="line-89"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><a name="local-6989586621679089312"><a href="#local-6989586621679089312"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-90"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><a href="#local-6989586621679089312"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-91"></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-92"></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679089313"><a href="#local-6989586621679089313"><span class="hs-identifier">x</span></a></a><span class="hs-glyph">:</span><span class="hs-identifier">_</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679089313"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-93"></a><span>
|
||||
</span><a name="line-94"></a><span> </span><a name="mimeType%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679089177"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME.MediaType</span><span>
|
||||
</span><a name="line-95"></a><span> </span><a name="local-8214565720323863385"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679089177"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-96"></a><span> </span><a name="mimeTypes%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679089177"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME.MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-97"></a><span> </span><a name="local-8214565720323863386"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679089177"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-98"></a><span>
|
||||
</span><a name="line-99"></a><span class="hs-comment">-- Default MimeType Instances</span><span>
|
||||
</span><a name="line-100"></a><span>
|
||||
</span><a name="line-101"></a><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
|
||||
</span><a name="line-102"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-103"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/json"</span><span>
|
||||
</span><a name="line-104"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-105"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-106"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml"</span><span>
|
||||
</span><a name="line-107"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-108"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-109"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/x-www-form-urlencoded"</span><span>
|
||||
</span><a name="line-110"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
||||
</span><a name="line-111"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-112"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"multipart/form-data"</span><span>
|
||||
</span><a name="line-113"></a><span class="hs-comment">-- | @text/plain; charset=utf-8@</span><span>
|
||||
</span><a name="line-114"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-115"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/plain"</span><span>
|
||||
</span><a name="line-116"></a><span class="hs-comment">-- | @application/octet-stream@</span><span>
|
||||
</span><a name="line-117"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-118"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/octet-stream"</span><span>
|
||||
</span><a name="line-119"></a><span class="hs-comment">-- | @"*/*"@</span><span>
|
||||
</span><a name="line-120"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-121"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"*/*"</span><span>
|
||||
</span><a name="line-122"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-123"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-124"></a><span>
|
||||
</span><a name="line-125"></a><span class="hs-comment">-- * MimeRender Class</span><span>
|
||||
</span><a name="line-126"></a><span>
|
||||
</span><a name="line-127"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679089174"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeRender"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier">MimeRender</span></a></a><span> </span><a name="local-6989586621679089174"><a href="#local-6989586621679089174"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679089175"><a href="#local-6989586621679089175"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-128"></a><span> </span><a name="mimeRender"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679089174"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679089175"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-129"></a><span> </span><a name="mimeRender%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679089174"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679089175"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-130"></a><span> </span><a name="local-8214565720323863381"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679089176"><a href="#local-6989586621679089176"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679089174"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679089176"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-131"></a><span>
|
||||
</span><a name="line-132"></a><span>
|
||||
</span><a name="line-133"></a><span class="hs-identifier">mimeRenderDefaultMultipartFormData</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679095142"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679095142"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-134"></a><a name="mimeRenderDefaultMultipartFormData"><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier">mimeRenderDefaultMultipartFormData</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH.toQueryParam</span><span>
|
||||
</span><a name="line-135"></a><span>
|
||||
</span><a name="line-136"></a><span class="hs-comment">-- Default MimeRender Instances</span><span>
|
||||
</span><a name="line-137"></a><span>
|
||||
</span><a name="line-138"></a><span class="hs-comment">-- | `A.encode`</span><span>
|
||||
</span><a name="line-139"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.ToJSON</span><span> </span><a href="#local-6989586621679091980"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679091980"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.encode</span><span>
|
||||
</span><a name="line-140"></a><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span><span>
|
||||
</span><a name="line-141"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.ToForm</span><span> </span><a href="#local-6989586621679091979"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679091979"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH.urlEncodeAsForm</span><span>
|
||||
</span><a name="line-142"></a><span>
|
||||
</span><a name="line-143"></a><span class="hs-comment">-- | @P.id@</span><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-145"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
|
||||
</span><a name="line-146"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span>
|
||||
</span><a name="line-147"></a><span class="hs-comment">-- | @BCL.pack@</span><span>
|
||||
</span><a name="line-148"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL.pack</span><span>
|
||||
</span><a name="line-149"></a><span>
|
||||
</span><a name="line-150"></a><span class="hs-comment">-- | @P.id@</span><span>
|
||||
</span><a name="line-151"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-152"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
|
||||
</span><a name="line-153"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span>
|
||||
</span><a name="line-154"></a><span class="hs-comment">-- | @BCL.pack@</span><span>
|
||||
</span><a name="line-155"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL.pack</span><span>
|
||||
</span><a name="line-156"></a><span>
|
||||
</span><a name="line-157"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-158"></a><span>
|
||||
</span><a name="line-159"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-160"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Char</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Double</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-162"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Float</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-163"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-165"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-166"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-167"></a><span>
|
||||
</span><a name="line-168"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
|
||||
</span><a name="line-169"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863380"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.const</span><span> </span><span class="hs-identifier hs-var">BCL.empty</span><span>
|
||||
</span><a name="line-170"></a><span>
|
||||
</span><a name="line-171"></a><span>
|
||||
</span><a name="line-172"></a><span class="hs-comment">-- * MimeUnrender Class</span><span>
|
||||
</span><a name="line-173"></a><span>
|
||||
</span><a name="line-174"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679088954"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeUnrender"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier">MimeUnrender</span></a></a><span> </span><a name="local-6989586621679088954"><a href="#local-6989586621679088954"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679088955"><a href="#local-6989586621679088955"><span class="hs-identifier">o</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-175"></a><span> </span><a name="mimeUnrender"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679088954"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">P.Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679088955"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-176"></a><span> </span><a name="mimeUnrender%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679088954"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">P.Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679088955"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-8214565720323863378"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679089173"><a href="#local-6989586621679089173"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679088954"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679089173"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-178"></a><span>
|
||||
</span><a name="line-179"></a><span class="hs-comment">-- Default MimeUnrender Instances</span><span>
|
||||
</span><a name="line-180"></a><span>
|
||||
</span><a name="line-181"></a><span class="hs-comment">-- | @A.eitherDecode@</span><span>
|
||||
</span><a name="line-182"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.FromJSON</span><span> </span><a href="#local-6989586621679089321"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679089321"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.eitherDecode</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span><span>
|
||||
</span><a name="line-184"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.FromForm</span><span> </span><a href="#local-6989586621679089320"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679089320"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH.urlDecodeAsForm</span><span>
|
||||
</span><a name="line-185"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span>
|
||||
</span><a name="line-186"></a><span>
|
||||
</span><a name="line-187"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-188"></a><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span><span>
|
||||
</span><a name="line-189"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL.toStrict</span><span>
|
||||
</span><a name="line-190"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
|
||||
</span><a name="line-191"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL.unpack</span><span>
|
||||
</span><a name="line-192"></a><span>
|
||||
</span><a name="line-193"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span>
|
||||
</span><a name="line-194"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-195"></a><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span><span>
|
||||
</span><a name="line-196"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL.toStrict</span><span>
|
||||
</span><a name="line-197"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
|
||||
</span><a name="line-198"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL.unpack</span><span>
|
||||
</span><a name="line-199"></a><span>
|
||||
</span><a name="line-200"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
|
||||
</span><a name="line-201"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323863377"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.const</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a><span>
|
||||
</span><a name="line-202"></a><span>
|
||||
</span><a name="line-203"></a><span>
|
||||
</span><a name="line-204"></a><span class="hs-comment">-- * Custom Mime Types</span><span>
|
||||
</span><a name="line-205"></a><span>
|
||||
</span><a name="line-206"></a><span class="hs-comment">-- ** MimeXmlCharsetutf16</span><span>
|
||||
</span><a name="line-207"></a><span>
|
||||
</span><a name="line-208"></a><span class="hs-keyword">data</span><span> </span><a name="MimeXmlCharsetutf16"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier">MimeXmlCharsetutf16</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeXmlCharsetutf16"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier">MimeXmlCharsetutf16</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-209"></a><span>
|
||||
</span><a name="line-210"></a><span class="hs-comment">-- | @application/xml; charset=utf-16@</span><span>
|
||||
</span><a name="line-211"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-type">MimeXmlCharsetutf16</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-212"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml; charset=utf-16"</span><span>
|
||||
</span><a name="line-213"></a><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-214"></a><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-215"></a><span>
|
||||
</span><a name="line-216"></a><span class="hs-comment">-- ** MimeXmlCharsetutf8</span><span>
|
||||
</span><a name="line-217"></a><span>
|
||||
</span><a name="line-218"></a><span class="hs-keyword">data</span><span> </span><a name="MimeXmlCharsetutf8"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier">MimeXmlCharsetutf8</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeXmlCharsetutf8"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier">MimeXmlCharsetutf8</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-219"></a><span>
|
||||
</span><a name="line-220"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-221"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-222"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml; charset=utf-8"</span><span>
|
||||
</span><a name="line-223"></a><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-224"></a><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-225"></a><span>
|
||||
</span><a name="line-226"></a><span class="hs-comment">-- ** MimeTextXml</span><span>
|
||||
</span><a name="line-227"></a><span>
|
||||
</span><a name="line-228"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextXml"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier">MimeTextXml</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextXml"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier">MimeTextXml</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-229"></a><span>
|
||||
</span><a name="line-230"></a><span class="hs-comment">-- | @text/xml@</span><span>
|
||||
</span><a name="line-231"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-type">MimeTextXml</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-232"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml"</span><span>
|
||||
</span><a name="line-233"></a><span class="hs-comment">-- instance MimeRender MimeTextXml T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-234"></a><span class="hs-comment">-- instance MimeUnrender MimeTextXml T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-235"></a><span>
|
||||
</span><a name="line-236"></a><span class="hs-comment">-- ** MimeTextXmlCharsetutf16</span><span>
|
||||
</span><a name="line-237"></a><span>
|
||||
</span><a name="line-238"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextXmlCharsetutf16"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier">MimeTextXmlCharsetutf16</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextXmlCharsetutf16"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier">MimeTextXmlCharsetutf16</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-239"></a><span>
|
||||
</span><a name="line-240"></a><span class="hs-comment">-- | @text/xml; charset=utf-16@</span><span>
|
||||
</span><a name="line-241"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf16</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-242"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml; charset=utf-16"</span><span>
|
||||
</span><a name="line-243"></a><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-244"></a><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-245"></a><span>
|
||||
</span><a name="line-246"></a><span class="hs-comment">-- ** MimeTextXmlCharsetutf8</span><span>
|
||||
</span><a name="line-247"></a><span>
|
||||
</span><a name="line-248"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextXmlCharsetutf8"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier">MimeTextXmlCharsetutf8</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextXmlCharsetutf8"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier">MimeTextXmlCharsetutf8</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-249"></a><span>
|
||||
</span><a name="line-250"></a><span class="hs-comment">-- | @text/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-251"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-252"></a><span> </span><a name="local-8214565720323863384"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml; charset=utf-8"</span><span>
|
||||
</span><a name="line-253"></a><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-254"></a><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-255"></a><span>
|
||||
</span><a name="line-256"></a></pre></body></html>
|
||||
</span><span id="line-14"></span><span>
|
||||
</span><span id="line-15"></span><span class="hs-pragma">{-# LANGUAGE ConstraintKinds #-}</span><span>
|
||||
</span><span id="line-16"></span><span class="hs-pragma">{-# LANGUAGE ExistentialQuantification #-}</span><span>
|
||||
</span><span id="line-17"></span><span class="hs-pragma">{-# LANGUAGE FlexibleContexts #-}</span><span>
|
||||
</span><span id="line-18"></span><span class="hs-pragma">{-# LANGUAGE FlexibleInstances #-}</span><span>
|
||||
</span><span id="line-19"></span><span class="hs-pragma">{-# LANGUAGE MultiParamTypeClasses #-}</span><span>
|
||||
</span><span id="line-20"></span><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><span id="line-21"></span><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables #-}</span><span>
|
||||
</span><span id="line-22"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-unused-binds -fno-warn-unused-imports #-}</span><span>
|
||||
</span><span id="line-23"></span><span>
|
||||
</span><span id="line-24"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-25"></span><span>
|
||||
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.Arrow</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">left</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-27"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Aeson</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">A</span></span><span>
|
||||
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">B</span></span><span>
|
||||
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Builder</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BB</span></span><span>
|
||||
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Char8</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BC</span></span><span>
|
||||
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BL</span></span><span>
|
||||
</span><span id="line-32"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.ByteString.Lazy.Char8</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">BCL</span></span><span>
|
||||
</span><span id="line-33"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Data</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-34"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Proxy</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Proxy</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-35"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.String</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-36"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-37"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Data.Text.Encoding</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">T</span></span><span>
|
||||
</span><span id="line-38"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Network.HTTP.Media</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">ME</span></span><span>
|
||||
</span><span id="line-39"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.FormUrlEncoded</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-40"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Web.HttpApiData</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">WH</span></span><span>
|
||||
</span><span id="line-41"></span><span>
|
||||
</span><span id="line-42"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-operator">($)</span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-operator">(.)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<$>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-operator">(<*>)</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Maybe</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Bool</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Char</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Double</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">FilePath</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Float</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Int</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">Integer</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">String</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">fmap</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">undefined</span></span><span class="hs-special">,</span><span class="annot"><span class="hs-identifier">mempty</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-43"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">P</span></span><span>
|
||||
</span><span id="line-44"></span><span>
|
||||
</span><span id="line-45"></span><span class="hs-comment">-- * ContentType MimeType</span><span>
|
||||
</span><span id="line-46"></span><span>
|
||||
</span><span id="line-47"></span><span class="hs-keyword">data</span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span id="local-6989586621679145977"><span class="annot"><a href="#local-6989586621679145977"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145977"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span id="ContentType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-var">ContentType</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unContentType"><span class="annot"><span class="annottext">ContentType a -> a
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier hs-var hs-var">unContentType</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679145977"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
|
||||
</span><span id="line-48"></span><span>
|
||||
</span><span id="line-49"></span><span class="hs-comment">-- * Accept MimeType</span><span>
|
||||
</span><span id="line-50"></span><span>
|
||||
</span><span id="line-51"></span><span class="hs-keyword">data</span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span id="local-6989586621679145974"><span class="annot"><a href="#local-6989586621679145974"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145974"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span id="Accept"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-var">Accept</span></a></span></span><span> </span><span class="hs-special">{</span><span> </span><span id="unAccept"><span class="annot"><span class="annottext">Accept a -> a
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier hs-var hs-var">unAccept</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679145974"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-special">}</span><span>
|
||||
</span><span id="line-52"></span><span>
|
||||
</span><span id="line-53"></span><span class="hs-comment">-- * Consumes Class</span><span>
|
||||
</span><span id="line-54"></span><span>
|
||||
</span><span id="line-55"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145971"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span id="Consumes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-var">Consumes</span></a></span></span><span> </span><span id="local-6989586621679145969"><span class="annot"><a href="#local-6989586621679145969"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679145971"><span class="annot"><a href="#local-6989586621679145971"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-56"></span><span>
|
||||
</span><span id="line-57"></span><span class="hs-comment">-- * Produces Class</span><span>
|
||||
</span><span id="line-58"></span><span>
|
||||
</span><span id="line-59"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145968"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span id="Produces"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-var">Produces</span></a></span></span><span> </span><span id="local-6989586621679145966"><span class="annot"><a href="#local-6989586621679145966"><span class="hs-identifier hs-type">req</span></a></span></span><span> </span><span id="local-6989586621679145968"><span class="annot"><a href="#local-6989586621679145968"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-60"></span><span>
|
||||
</span><span id="line-61"></span><span class="hs-comment">-- * Default Mime Types</span><span>
|
||||
</span><span id="line-62"></span><span>
|
||||
</span><span id="line-63"></span><span class="hs-keyword">data</span><span> </span><span id="MimeJSON"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-var">MimeJSON</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeJSON"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-var">MimeJSON</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-64"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXML"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-var">MimeXML</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXML"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-var">MimeXML</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-65"></span><span class="hs-keyword">data</span><span> </span><span id="MimePlainText"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-var">MimePlainText</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimePlainText"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-var">MimePlainText</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-66"></span><span class="hs-keyword">data</span><span> </span><span id="MimeFormUrlEncoded"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-var">MimeFormUrlEncoded</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeFormUrlEncoded"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-var">MimeFormUrlEncoded</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-67"></span><span class="hs-keyword">data</span><span> </span><span id="MimeMultipartFormData"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeMultipartFormData"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-68"></span><span class="hs-keyword">data</span><span> </span><span id="MimeOctetStream"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-var">MimeOctetStream</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeOctetStream"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-var">MimeOctetStream</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-69"></span><span class="hs-keyword">data</span><span> </span><span id="MimeNoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-var">MimeNoContent</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeNoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-var">MimeNoContent</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-70"></span><span class="hs-keyword">data</span><span> </span><span id="MimeAny"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-var">MimeAny</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeAny"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-var">MimeAny</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-71"></span><span>
|
||||
</span><span id="line-72"></span><span class="hs-comment">-- | A type for responses without content-body.</span><span>
|
||||
</span><span id="line-73"></span><span class="hs-keyword">data</span><span> </span><span id="NoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="NoContent"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span></span><span>
|
||||
</span><span id="line-74"></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span id="local-6989586621679145951"><span id="local-6989586621679145953"><span id="local-6989586621679145955"><span class="annot"><span class="annottext">Int -> NoContent -> ShowS
|
||||
[NoContent] -> ShowS
|
||||
NoContent -> String
|
||||
(Int -> NoContent -> ShowS)
|
||||
-> (NoContent -> String)
|
||||
-> ([NoContent] -> ShowS)
|
||||
-> Show NoContent
|
||||
forall a.
|
||||
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
|
||||
showList :: [NoContent] -> ShowS
|
||||
$cshowList :: [NoContent] -> ShowS
|
||||
show :: NoContent -> String
|
||||
$cshow :: NoContent -> String
|
||||
showsPrec :: Int -> NoContent -> ShowS
|
||||
$cshowsPrec :: Int -> NoContent -> ShowS
|
||||
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var hs-var hs-var">P.Show</span></span></span></span></span><span class="hs-special">,</span><span> </span><span id="local-6989586621679145946"><span id="local-6989586621679145948"><span class="annot"><span class="annottext">NoContent -> NoContent -> Bool
|
||||
(NoContent -> NoContent -> Bool)
|
||||
-> (NoContent -> NoContent -> Bool) -> Eq NoContent
|
||||
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
|
||||
/= :: NoContent -> NoContent -> Bool
|
||||
$c/= :: NoContent -> NoContent -> Bool
|
||||
== :: NoContent -> NoContent -> Bool
|
||||
$c== :: NoContent -> NoContent -> Bool
|
||||
</span><span class="hs-identifier hs-var hs-var hs-var hs-var hs-var hs-var">P.Eq</span></span></span></span><span class="hs-special">,</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-75"></span><span>
|
||||
</span><span id="line-76"></span><span>
|
||||
</span><span id="line-77"></span><span class="hs-comment">-- * MimeType Class</span><span>
|
||||
</span><span id="line-78"></span><span>
|
||||
</span><span id="line-79"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span> </span><span class="annot"><a href="#local-6989586621679146045"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span id="MimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-var">MimeType</span></a></span></span><span> </span><span id="local-6989586621679146045"><span class="annot"><a href="#local-6989586621679146045"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-80"></span><span> </span><span class="hs-pragma">{-# MINIMAL</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-pragma hs-type">mimeType</span></a></span><span> </span><span class="hs-pragma">|</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-pragma hs-type">mimeTypes</span></a></span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><span id="line-81"></span><span>
|
||||
</span><span id="line-82"></span><span> </span><span id="mimeTypes"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-type">mimeTypes</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146045"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-83"></span><span> </span><span id="local-6989586621679145942"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var hs-var">mimeTypes</span></a></span><span> </span><span id="local-6989586621679145941"><span class="annot"><span class="annottext">Proxy mtype
|
||||
</span><a href="#local-6989586621679145941"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-84"></span><span> </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -> Maybe MediaType
|
||||
forall mtype. MimeType mtype => Proxy mtype -> Maybe MediaType
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a></span><span> </span><span class="annot"><span class="annottext">Proxy mtype
|
||||
</span><a href="#local-6989586621679145941"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><span id="line-85"></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Just</span></span><span> </span><span id="local-6989586621679145940"><span class="annot"><span class="annottext">MediaType
|
||||
</span><a href="#local-6989586621679145940"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">MediaType
|
||||
</span><a href="#local-6989586621679145940"><span class="hs-identifier hs-var">x</span></a></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-86"></span><span> </span><span class="annot"><span class="annottext">Maybe MediaType
|
||||
</span><span class="hs-identifier hs-var">Nothing</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span></span><span>
|
||||
</span><span id="line-87"></span><span>
|
||||
</span><span id="line-88"></span><span> </span><span id="mimeType"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-type">mimeType</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146045"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
|
||||
</span><span id="line-89"></span><span> </span><span id="local-6989586621679145939"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var hs-var">mimeType</span></a></span><span> </span><span id="local-6989586621679145938"><span class="annot"><span class="annottext">Proxy mtype
|
||||
</span><a href="#local-6989586621679145938"><span class="hs-identifier hs-var">p</span></a></span></span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><span id="line-90"></span><span> </span><span class="hs-keyword">case</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -> [MediaType]
|
||||
forall mtype. MimeType mtype => Proxy mtype -> [MediaType]
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a></span><span> </span><span class="annot"><span class="annottext">Proxy mtype
|
||||
</span><a href="#local-6989586621679145938"><span class="hs-identifier hs-var">p</span></a></span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><span id="line-91"></span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">Maybe MediaType
|
||||
forall a. Maybe a
|
||||
</span><span class="hs-identifier hs-var">Nothing</span></span><span>
|
||||
</span><span id="line-92"></span><span> </span><span class="hs-special">(</span><span id="local-6989586621679145937"><span class="annot"><span class="annottext">MediaType
|
||||
</span><a href="#local-6989586621679145937"><span class="hs-identifier hs-var">x</span></a></span></span><span class="annot"><span class="hs-glyph hs-type">:</span></span><span class="annot"><span class="annottext">[MediaType]
|
||||
</span><span class="hs-identifier">_</span></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">MediaType
|
||||
</span><a href="#local-6989586621679145937"><span class="hs-identifier hs-var">x</span></a></span></span><span>
|
||||
</span><span id="line-93"></span><span>
|
||||
</span><span id="line-94"></span><span> </span><span id="mimeType%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-type">mimeType'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146045"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Maybe</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span>
|
||||
</span><span id="line-95"></span><span> </span><span id="local-6989586621679145935"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-var hs-var">mimeType'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -> Maybe MediaType
|
||||
forall mtype. MimeType mtype => Proxy mtype -> Maybe MediaType
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
|
||||
forall k (t :: k). Proxy t
|
||||
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146045"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
|
||||
</span><span id="line-96"></span><span> </span><span id="mimeTypes%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-type">mimeTypes'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146045"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="hs-identifier hs-type">ME.MediaType</span></span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-97"></span><span> </span><span id="local-6989586621679145932"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier hs-var hs-var">mimeTypes'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -> [MediaType]
|
||||
forall mtype. MimeType mtype => Proxy mtype -> [MediaType]
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
|
||||
forall k (t :: k). Proxy t
|
||||
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146045"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span></span><span>
|
||||
</span><span id="line-98"></span><span>
|
||||
</span><span id="line-99"></span><span class="hs-comment">-- Default MimeType Instances</span><span>
|
||||
</span><span id="line-100"></span><span>
|
||||
</span><span id="line-101"></span><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
|
||||
</span><span id="line-102"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145924"><span id="local-6989586621679145926"><span id="local-6989586621679145929"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-103"></span><span> </span><span id="local-6989586621679145922"><span class="annot"><span class="annottext">mimeType :: Proxy MimeJSON -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145922"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"application/json"</span></span><span>
|
||||
</span><span id="line-104"></span><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><span id="line-105"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145914"><span id="local-6989586621679145916"><span id="local-6989586621679145919"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-106"></span><span> </span><span id="local-6989586621679145913"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXML -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145913"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXML
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"application/xml"</span></span><span>
|
||||
</span><span id="line-107"></span><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><span id="line-108"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145905"><span id="local-6989586621679145907"><span id="local-6989586621679145910"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-109"></span><span> </span><span id="local-6989586621679145904"><span class="annot"><span class="annottext">mimeType :: Proxy MimeFormUrlEncoded -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145904"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"application/x-www-form-urlencoded"</span></span><span>
|
||||
</span><span id="line-110"></span><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
||||
</span><span id="line-111"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145896"><span id="local-6989586621679145898"><span id="local-6989586621679145901"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-112"></span><span> </span><span id="local-6989586621679145895"><span class="annot"><span class="annottext">mimeType :: Proxy MimeMultipartFormData -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145895"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"multipart/form-data"</span></span><span>
|
||||
</span><span id="line-113"></span><span class="hs-comment">-- | @text/plain; charset=utf-8@</span><span>
|
||||
</span><span id="line-114"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145887"><span id="local-6989586621679145889"><span id="local-6989586621679145892"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-115"></span><span> </span><span id="local-6989586621679145886"><span class="annot"><span class="annottext">mimeType :: Proxy MimePlainText -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145886"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"text/plain"</span></span><span>
|
||||
</span><span id="line-116"></span><span class="hs-comment">-- | @application/octet-stream@</span><span>
|
||||
</span><span id="line-117"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145878"><span id="local-6989586621679145880"><span id="local-6989586621679145883"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-118"></span><span> </span><span id="local-6989586621679145877"><span class="annot"><span class="annottext">mimeType :: Proxy MimeOctetStream -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145877"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"application/octet-stream"</span></span><span>
|
||||
</span><span id="line-119"></span><span class="hs-comment">-- | @"*/*"@</span><span>
|
||||
</span><span id="line-120"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145869"><span id="local-6989586621679145871"><span id="local-6989586621679145874"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-121"></span><span> </span><span id="local-6989586621679145868"><span class="annot"><span class="annottext">mimeType :: Proxy MimeAny -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145868"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeAny
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"*/*"</span></span><span>
|
||||
</span><span id="line-122"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145860"><span id="local-6989586621679145862"><span id="local-6989586621679145865"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-123"></span><span> </span><span id="local-6989586621679145859"><span class="annot"><span class="annottext">mimeType :: Proxy MimeNoContent -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145859"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Maybe MediaType
|
||||
forall a. Maybe a
|
||||
</span><span class="hs-identifier hs-var">Nothing</span></span><span>
|
||||
</span><span id="line-124"></span><span>
|
||||
</span><span id="line-125"></span><span class="hs-comment">-- * MimeRender Class</span><span>
|
||||
</span><span id="line-126"></span><span>
|
||||
</span><span id="line-127"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679146026"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span id="MimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-var">MimeRender</span></a></span></span><span> </span><span id="local-6989586621679146026"><span class="annot"><a href="#local-6989586621679146026"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679146025"><span class="annot"><a href="#local-6989586621679146025"><span class="hs-identifier hs-type">x</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-128"></span><span> </span><span id="mimeRender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-type">mimeRender</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146026"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="#local-6989586621679146025"><span class="hs-identifier hs-type">x</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span>
|
||||
</span><span id="line-129"></span><span> </span><span id="mimeRender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-type">mimeRender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146026"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><a href="#local-6989586621679146025"><span class="hs-identifier hs-type">x</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span>
|
||||
</span><span id="line-130"></span><span> </span><span id="local-6989586621679145856"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var hs-var">mimeRender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679145855"><span class="annot"><span class="annottext">x
|
||||
</span><a href="#local-6989586621679145855"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -> x -> ByteString
|
||||
forall mtype x.
|
||||
MimeRender mtype x =>
|
||||
Proxy mtype -> x -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
|
||||
forall k (t :: k). Proxy t
|
||||
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146026"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">x
|
||||
</span><a href="#local-6989586621679145855"><span class="hs-identifier hs-var">x</span></a></span></span><span>
|
||||
</span><span id="line-131"></span><span>
|
||||
</span><span id="line-132"></span><span>
|
||||
</span><span id="line-133"></span><span id="local-6989586621679146007"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-type">mimeRenderDefaultMultipartFormData</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">WH.ToHttpApiData</span></span><span> </span><span class="annot"><a href="#local-6989586621679146007"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="#local-6989586621679146007"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span>
|
||||
</span><span id="line-134"></span><span id="mimeRenderDefaultMultipartFormData"><span class="annot"><span class="annottext">mimeRenderDefaultMultipartFormData :: a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var hs-var">mimeRenderDefaultMultipartFormData</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
</span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -> ByteString) -> (a -> ByteString) -> a -> ByteString
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -> ByteString
|
||||
</span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span> </span><span class="annot"><span class="annottext">(Text -> ByteString) -> (a -> Text) -> a -> ByteString
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">a -> Text
|
||||
forall a. ToHttpApiData a => a -> Text
|
||||
</span><span class="hs-identifier hs-var">WH.toQueryParam</span></span><span>
|
||||
</span><span id="line-135"></span><span>
|
||||
</span><span id="line-136"></span><span class="hs-comment">-- Default MimeRender Instances</span><span>
|
||||
</span><span id="line-137"></span><span>
|
||||
</span><span id="line-138"></span><span class="hs-comment">-- | `A.encode`</span><span>
|
||||
</span><span id="line-139"></span><span id="local-6989586621679145850"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145846"><span class="annot"><span class="hs-identifier hs-type">A.ToJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679145850"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145850"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145844"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeJSON -> a -> ByteString
|
||||
</span><a href="#local-6989586621679145844"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">a -> ByteString
|
||||
forall a. ToJSON a => a -> ByteString
|
||||
</span><span class="hs-identifier hs-var">A.encode</span></span></span><span>
|
||||
</span><span id="line-140"></span><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span><span>
|
||||
</span><span id="line-141"></span><span id="local-6989586621679145842"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145838"><span class="annot"><span class="hs-identifier hs-type">WH.ToForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679145842"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145842"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145837"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeFormUrlEncoded -> a -> ByteString
|
||||
</span><a href="#local-6989586621679145837"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">a -> ByteString
|
||||
forall a. ToForm a => a -> ByteString
|
||||
</span><span class="hs-identifier hs-var">WH.urlEncodeAsForm</span></span></span><span>
|
||||
</span><span id="line-142"></span><span>
|
||||
</span><span id="line-143"></span><span class="hs-comment">-- | @P.id@</span><span>
|
||||
</span><span id="line-144"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145832"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145831"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -> ByteString -> ByteString
|
||||
</span><a href="#local-6989586621679145831"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
forall a. a -> a
|
||||
</span><span class="hs-identifier hs-var">P.id</span></span><span>
|
||||
</span><span id="line-145"></span><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
|
||||
</span><span id="line-146"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145826"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145825"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -> Text -> ByteString
|
||||
</span><a href="#local-6989586621679145825"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
</span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -> ByteString)
|
||||
-> (Text -> ByteString) -> Text -> ByteString
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -> ByteString
|
||||
</span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span>
|
||||
</span><span id="line-147"></span><span class="hs-comment">-- | @BCL.pack@</span><span>
|
||||
</span><span id="line-148"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145821"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145820"><span class="annot"><span class="annottext">mimeRender :: Proxy MimePlainText -> String -> ByteString
|
||||
</span><a href="#local-6989586621679145820"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -> ByteString
|
||||
</span><span class="hs-identifier hs-var">BCL.pack</span></span><span>
|
||||
</span><span id="line-149"></span><span>
|
||||
</span><span id="line-150"></span><span class="hs-comment">-- | @P.id@</span><span>
|
||||
</span><span id="line-151"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145815"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145814"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -> ByteString -> ByteString
|
||||
</span><a href="#local-6989586621679145814"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
forall a. a -> a
|
||||
</span><span class="hs-identifier hs-var">P.id</span></span><span>
|
||||
</span><span id="line-152"></span><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
|
||||
</span><span id="line-153"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145810"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145809"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -> Text -> ByteString
|
||||
</span><a href="#local-6989586621679145809"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
</span><span class="hs-identifier hs-var">BL.fromStrict</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -> ByteString)
|
||||
-> (Text -> ByteString) -> Text -> ByteString
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">Text -> ByteString
|
||||
</span><span class="hs-identifier hs-var">T.encodeUtf8</span></span><span>
|
||||
</span><span id="line-154"></span><span class="hs-comment">-- | @BCL.pack@</span><span>
|
||||
</span><span id="line-155"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145805"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145804"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeOctetStream -> String -> ByteString
|
||||
</span><a href="#local-6989586621679145804"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -> ByteString
|
||||
</span><span class="hs-identifier hs-var">BCL.pack</span></span><span>
|
||||
</span><span id="line-156"></span><span>
|
||||
</span><span id="line-157"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145800"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145799"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> ByteString -> ByteString
|
||||
</span><a href="#local-6989586621679145799"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
forall a. a -> a
|
||||
</span><span class="hs-identifier hs-var">P.id</span></span><span>
|
||||
</span><span id="line-158"></span><span>
|
||||
</span><span id="line-159"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145795"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Bool</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145794"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> Bool -> ByteString
|
||||
</span><a href="#local-6989586621679145794"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Bool -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
|
||||
</span><span id="line-160"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145790"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Char</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145789"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> Char -> ByteString
|
||||
</span><a href="#local-6989586621679145789"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Char -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
|
||||
</span><span id="line-161"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145785"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Double</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145784"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> Double -> ByteString
|
||||
</span><a href="#local-6989586621679145784"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Double -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
|
||||
</span><span id="line-162"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145780"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Float</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145779"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> Float -> ByteString
|
||||
</span><a href="#local-6989586621679145779"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Float -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
|
||||
</span><span id="line-163"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145775"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Int</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145774"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> Int -> ByteString
|
||||
</span><a href="#local-6989586621679145774"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Int -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
|
||||
</span><span id="line-164"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145770"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">Integer</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145769"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> Integer -> ByteString
|
||||
</span><a href="#local-6989586621679145769"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Integer -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
|
||||
</span><span id="line-165"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145765"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145764"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> String -> ByteString
|
||||
</span><a href="#local-6989586621679145764"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
|
||||
</span><span id="line-166"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145760"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145759"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeMultipartFormData -> Text -> ByteString
|
||||
</span><a href="#local-6989586621679145759"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeMultipartFormData
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Text -> ByteString
|
||||
forall a. ToHttpApiData a => a -> ByteString
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a></span><span>
|
||||
</span><span id="line-167"></span><span>
|
||||
</span><span id="line-168"></span><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
|
||||
</span><span id="line-169"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145755"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145754"><span class="annot"><span class="annottext">mimeRender :: Proxy MimeNoContent -> NoContent -> ByteString
|
||||
</span><a href="#local-6989586621679145754"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeRender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> NoContent -> ByteString
|
||||
forall a b. a -> b -> a
|
||||
</span><span class="hs-identifier hs-var">P.const</span></span><span> </span><span class="annot"><span class="annottext">ByteString
|
||||
</span><span class="hs-identifier hs-var">BCL.empty</span></span><span>
|
||||
</span><span id="line-170"></span><span>
|
||||
</span><span id="line-171"></span><span>
|
||||
</span><span id="line-172"></span><span class="hs-comment">-- * MimeUnrender Class</span><span>
|
||||
</span><span id="line-173"></span><span>
|
||||
</span><span id="line-174"></span><span class="hs-keyword">class</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679146004"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span id="MimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-var">MimeUnrender</span></a></span></span><span> </span><span id="local-6989586621679146004"><span class="annot"><a href="#local-6989586621679146004"><span class="hs-identifier hs-type">mtype</span></a></span></span><span> </span><span id="local-6989586621679146003"><span class="annot"><a href="#local-6989586621679146003"><span class="hs-identifier hs-type">o</span></a></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-175"></span><span> </span><span id="mimeUnrender"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-type">mimeUnrender</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146004"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679146003"><span class="hs-identifier hs-type">o</span></a></span><span>
|
||||
</span><span id="line-176"></span><span> </span><span id="mimeUnrender%27"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-type">mimeUnrender'</span></a></span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><a href="#local-6989586621679146004"><span class="hs-identifier hs-type">mtype</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Either</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span><span> </span><span class="annot"><a href="#local-6989586621679146003"><span class="hs-identifier hs-type">o</span></a></span><span>
|
||||
</span><span id="line-177"></span><span> </span><span id="local-6989586621679145749"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var hs-var">mimeUnrender'</span></a></span><span> </span><span class="annot"><span class="annottext">mtype
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span id="local-6989586621679145748"><span class="annot"><span class="annottext">ByteString
|
||||
</span><a href="#local-6989586621679145748"><span class="hs-identifier hs-var">x</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">Proxy mtype -> ByteString -> Either String o
|
||||
forall mtype o.
|
||||
MimeUnrender mtype o =>
|
||||
Proxy mtype -> ByteString -> Either String o
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">Proxy mtype
|
||||
forall k (t :: k). Proxy t
|
||||
</span><span class="hs-identifier hs-var">P.Proxy</span></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">P.Proxy</span></span><span> </span><span class="annot"><a href="#local-6989586621679146004"><span class="hs-identifier hs-type">mtype</span></a></span><span class="hs-special">)</span><span> </span><span class="annot"><span class="annottext">ByteString
|
||||
</span><a href="#local-6989586621679145748"><span class="hs-identifier hs-var">x</span></a></span></span><span>
|
||||
</span><span id="line-178"></span><span>
|
||||
</span><span id="line-179"></span><span class="hs-comment">-- Default MimeUnrender Instances</span><span>
|
||||
</span><span id="line-180"></span><span>
|
||||
</span><span id="line-181"></span><span class="hs-comment">-- | @A.eitherDecode@</span><span>
|
||||
</span><span id="line-182"></span><span id="local-6989586621679145747"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145743"><span class="annot"><span class="hs-identifier hs-type">A.FromJSON</span></span><span> </span><span class="annot"><a href="#local-6989586621679145747"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145747"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145741"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeJSON -> ByteString -> Either String a
|
||||
</span><a href="#local-6989586621679145741"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeJSON
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> Either String a
|
||||
forall a. FromJSON a => ByteString -> Either String a
|
||||
</span><span class="hs-identifier hs-var">A.eitherDecode</span></span></span><span>
|
||||
</span><span id="line-183"></span><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span><span>
|
||||
</span><span id="line-184"></span><span id="local-6989586621679145739"><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145735"><span class="annot"><span class="hs-identifier hs-type">WH.FromForm</span></span><span> </span><span class="annot"><a href="#local-6989586621679145739"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">=></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a></span><span> </span><span class="annot"><a href="#local-6989586621679145739"><span class="hs-identifier hs-type">a</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145734"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeFormUrlEncoded -> ByteString -> Either String a
|
||||
</span><a href="#local-6989586621679145734"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeFormUrlEncoded
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(Text -> String) -> Either Text a -> Either String a
|
||||
forall (a :: * -> * -> *) b c d.
|
||||
ArrowChoice a =>
|
||||
a b c -> a (Either b d) (Either c d)
|
||||
</span><span class="hs-identifier hs-var">P.left</span></span><span> </span><span class="annot"><span class="annottext">Text -> String
|
||||
</span><span class="hs-identifier hs-var">T.unpack</span></span><span> </span><span class="annot"><span class="annottext">(Either Text a -> Either String a)
|
||||
-> (ByteString -> Either Text a) -> ByteString -> Either String a
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> Either Text a
|
||||
forall a. FromForm a => ByteString -> Either Text a
|
||||
</span><span class="hs-identifier hs-var">WH.urlDecodeAsForm</span></span></span><span>
|
||||
</span><span id="line-185"></span><span class="hs-comment">-- | @P.Right . P.id@</span><span>
|
||||
</span><span id="line-186"></span><span>
|
||||
</span><span id="line-187"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145728"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145727"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -> ByteString -> Either String ByteString
|
||||
</span><a href="#local-6989586621679145727"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> Either String ByteString
|
||||
forall a b. b -> Either a b
|
||||
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -> Either String ByteString)
|
||||
-> (ByteString -> ByteString)
|
||||
-> ByteString
|
||||
-> Either String ByteString
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
forall a. a -> a
|
||||
</span><span class="hs-identifier hs-var">P.id</span></span><span>
|
||||
</span><span id="line-188"></span><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span><span>
|
||||
</span><span id="line-189"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145723"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145722"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -> ByteString -> Either String Text
|
||||
</span><a href="#local-6989586621679145722"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(UnicodeException -> String)
|
||||
-> Either UnicodeException Text -> Either String Text
|
||||
forall (a :: * -> * -> *) b c d.
|
||||
ArrowChoice a =>
|
||||
a b c -> a (Either b d) (Either c d)
|
||||
</span><span class="hs-identifier hs-var">P.left</span></span><span> </span><span class="annot"><span class="annottext">UnicodeException -> String
|
||||
forall a. Show a => a -> String
|
||||
</span><span class="hs-identifier hs-var">P.show</span></span><span> </span><span class="annot"><span class="annottext">(Either UnicodeException Text -> Either String Text)
|
||||
-> (ByteString -> Either UnicodeException Text)
|
||||
-> ByteString
|
||||
-> Either String Text
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> Either UnicodeException Text
|
||||
</span><span class="hs-identifier hs-var">T.decodeUtf8'</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -> Either UnicodeException Text)
|
||||
-> (ByteString -> ByteString)
|
||||
-> ByteString
|
||||
-> Either UnicodeException Text
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
</span><span class="hs-identifier hs-var">BL.toStrict</span></span><span>
|
||||
</span><span id="line-190"></span><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
|
||||
</span><span id="line-191"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145715"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145714"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimePlainText -> ByteString -> Either String String
|
||||
</span><a href="#local-6989586621679145714"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimePlainText
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -> Either String String
|
||||
forall a b. b -> Either a b
|
||||
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(String -> Either String String)
|
||||
-> (ByteString -> String) -> ByteString -> Either String String
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> String
|
||||
</span><span class="hs-identifier hs-var">BCL.unpack</span></span><span>
|
||||
</span><span id="line-192"></span><span>
|
||||
</span><span id="line-193"></span><span class="hs-comment">-- | @P.Right . P.id@</span><span>
|
||||
</span><span id="line-194"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145709"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">BL.ByteString</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145708"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -> ByteString -> Either String ByteString
|
||||
</span><a href="#local-6989586621679145708"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">ByteString -> Either String ByteString
|
||||
forall a b. b -> Either a b
|
||||
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -> Either String ByteString)
|
||||
-> (ByteString -> ByteString)
|
||||
-> ByteString
|
||||
-> Either String ByteString
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
forall a. a -> a
|
||||
</span><span class="hs-identifier hs-var">P.id</span></span><span>
|
||||
</span><span id="line-195"></span><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span><span>
|
||||
</span><span id="line-196"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145704"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">T.Text</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145703"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -> ByteString -> Either String Text
|
||||
</span><a href="#local-6989586621679145703"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">(UnicodeException -> String)
|
||||
-> Either UnicodeException Text -> Either String Text
|
||||
forall (a :: * -> * -> *) b c d.
|
||||
ArrowChoice a =>
|
||||
a b c -> a (Either b d) (Either c d)
|
||||
</span><span class="hs-identifier hs-var">P.left</span></span><span> </span><span class="annot"><span class="annottext">UnicodeException -> String
|
||||
forall a. Show a => a -> String
|
||||
</span><span class="hs-identifier hs-var">P.show</span></span><span> </span><span class="annot"><span class="annottext">(Either UnicodeException Text -> Either String Text)
|
||||
-> (ByteString -> Either UnicodeException Text)
|
||||
-> ByteString
|
||||
-> Either String Text
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> Either UnicodeException Text
|
||||
</span><span class="hs-identifier hs-var">T.decodeUtf8'</span></span><span> </span><span class="annot"><span class="annottext">(ByteString -> Either UnicodeException Text)
|
||||
-> (ByteString -> ByteString)
|
||||
-> ByteString
|
||||
-> Either UnicodeException Text
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> ByteString
|
||||
</span><span class="hs-identifier hs-var">BL.toStrict</span></span><span>
|
||||
</span><span id="line-197"></span><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
|
||||
</span><span id="line-198"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145699"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a></span><span> </span><span class="annot"><span class="hs-identifier hs-type">String</span></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145698"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeOctetStream -> ByteString -> Either String String
|
||||
</span><a href="#local-6989586621679145698"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeOctetStream
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String -> Either String String
|
||||
forall a b. b -> Either a b
|
||||
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(String -> Either String String)
|
||||
-> (ByteString -> String) -> ByteString -> Either String String
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">ByteString -> String
|
||||
</span><span class="hs-identifier hs-var">BCL.unpack</span></span><span>
|
||||
</span><span id="line-199"></span><span>
|
||||
</span><span id="line-200"></span><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
|
||||
</span><span id="line-201"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145694"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a></span></span><span> </span><span class="hs-keyword">where</span><span> </span><span id="local-6989586621679145693"><span class="annot"><span class="annottext">mimeUnrender :: Proxy MimeNoContent -> ByteString -> Either String NoContent
|
||||
</span><a href="#local-6989586621679145693"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeUnrender</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeNoContent
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">NoContent -> Either String NoContent
|
||||
forall a b. b -> Either a b
|
||||
</span><span class="hs-identifier hs-var">P.Right</span></span><span> </span><span class="annot"><span class="annottext">(NoContent -> Either String NoContent)
|
||||
-> (ByteString -> NoContent)
|
||||
-> ByteString
|
||||
-> Either String NoContent
|
||||
forall b c a. (b -> c) -> (a -> b) -> a -> c
|
||||
</span><span class="hs-operator hs-var">.</span></span><span> </span><span class="annot"><span class="annottext">NoContent -> ByteString -> NoContent
|
||||
forall a b. a -> b -> a
|
||||
</span><span class="hs-identifier hs-var">P.const</span></span><span> </span><span class="annot"><span class="annottext">NoContent
|
||||
</span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a></span><span>
|
||||
</span><span id="line-202"></span><span>
|
||||
</span><span id="line-203"></span><span>
|
||||
</span><span id="line-204"></span><span class="hs-comment">-- * Custom Mime Types</span><span>
|
||||
</span><span id="line-205"></span><span>
|
||||
</span><span id="line-206"></span><span class="hs-comment">-- ** MimeXmlCharsetutf16</span><span>
|
||||
</span><span id="line-207"></span><span>
|
||||
</span><span id="line-208"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-var">MimeXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-var">MimeXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-209"></span><span>
|
||||
</span><span id="line-210"></span><span class="hs-comment">-- | @application/xml; charset=utf-16@</span><span>
|
||||
</span><span id="line-211"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145684"><span id="local-6989586621679145686"><span id="local-6989586621679145689"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-type">MimeXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-212"></span><span> </span><span id="local-6989586621679145683"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf16 -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145683"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf16
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"application/xml; charset=utf-16"</span></span><span>
|
||||
</span><span id="line-213"></span><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><span id="line-214"></span><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><span id="line-215"></span><span>
|
||||
</span><span id="line-216"></span><span class="hs-comment">-- ** MimeXmlCharsetutf8</span><span>
|
||||
</span><span id="line-217"></span><span>
|
||||
</span><span id="line-218"></span><span class="hs-keyword">data</span><span> </span><span id="MimeXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-var">MimeXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-var">MimeXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-219"></span><span>
|
||||
</span><span id="line-220"></span><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><span id="line-221"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145674"><span id="local-6989586621679145676"><span id="local-6989586621679145679"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-222"></span><span> </span><span id="local-6989586621679145673"><span class="annot"><span class="annottext">mimeType :: Proxy MimeXmlCharsetutf8 -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145673"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeXmlCharsetutf8
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"application/xml; charset=utf-8"</span></span><span>
|
||||
</span><span id="line-223"></span><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><span id="line-224"></span><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><span id="line-225"></span><span>
|
||||
</span><span id="line-226"></span><span class="hs-comment">-- ** MimeTextXml</span><span>
|
||||
</span><span id="line-227"></span><span>
|
||||
</span><span id="line-228"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXml"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-var">MimeTextXml</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXml"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-var">MimeTextXml</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-229"></span><span>
|
||||
</span><span id="line-230"></span><span class="hs-comment">-- | @text/xml@</span><span>
|
||||
</span><span id="line-231"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145664"><span id="local-6989586621679145666"><span id="local-6989586621679145669"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-type">MimeTextXml</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-232"></span><span> </span><span id="local-6989586621679145663"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXml -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145663"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXml
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"text/xml"</span></span><span>
|
||||
</span><span id="line-233"></span><span class="hs-comment">-- instance MimeRender MimeTextXml T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><span id="line-234"></span><span class="hs-comment">-- instance MimeUnrender MimeTextXml T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><span id="line-235"></span><span>
|
||||
</span><span id="line-236"></span><span class="hs-comment">-- ** MimeTextXmlCharsetutf16</span><span>
|
||||
</span><span id="line-237"></span><span>
|
||||
</span><span id="line-238"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXmlCharsetutf16"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf16</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-239"></span><span>
|
||||
</span><span id="line-240"></span><span class="hs-comment">-- | @text/xml; charset=utf-16@</span><span>
|
||||
</span><span id="line-241"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145654"><span id="local-6989586621679145656"><span id="local-6989586621679145659"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf16</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-242"></span><span> </span><span id="local-6989586621679145653"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf16 -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145653"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf16
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"text/xml; charset=utf-16"</span></span><span>
|
||||
</span><span id="line-243"></span><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><span id="line-244"></span><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><span id="line-245"></span><span>
|
||||
</span><span id="line-246"></span><span class="hs-comment">-- ** MimeTextXmlCharsetutf8</span><span>
|
||||
</span><span id="line-247"></span><span>
|
||||
</span><span id="line-248"></span><span class="hs-keyword">data</span><span> </span><span id="MimeTextXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span id="MimeTextXmlCharsetutf8"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-var">MimeTextXmlCharsetutf8</span></a></span></span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">P.Typeable</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-249"></span><span>
|
||||
</span><span id="line-250"></span><span class="hs-comment">-- | @text/xml; charset=utf-8@</span><span>
|
||||
</span><span id="line-251"></span><span class="hs-keyword">instance</span><span> </span><span id="local-6989586621679145644"><span id="local-6989586621679145646"><span id="local-6989586621679145649"><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a></span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf8</span></a></span></span></span></span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-252"></span><span> </span><span id="local-6989586621679145643"><span class="annot"><span class="annottext">mimeType :: Proxy MimeTextXmlCharsetutf8 -> Maybe MediaType
|
||||
</span><a href="#local-6989586621679145643"><span class="hs-identifier hs-var hs-var hs-var hs-var">mimeType</span></a></span></span><span> </span><span class="annot"><span class="annottext">Proxy MimeTextXmlCharsetutf8
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">MediaType -> Maybe MediaType
|
||||
forall a. a -> Maybe a
|
||||
</span><span class="hs-identifier hs-var">Just</span></span><span> </span><span class="annot"><span class="annottext">(MediaType -> Maybe MediaType) -> MediaType -> Maybe MediaType
|
||||
forall a b. (a -> b) -> a -> b
|
||||
</span><span class="hs-operator hs-var">$</span></span><span> </span><span class="annot"><span class="annottext">String -> MediaType
|
||||
forall a. IsString a => String -> a
|
||||
</span><span class="hs-identifier hs-var">P.fromString</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"text/xml; charset=utf-8"</span></span><span>
|
||||
</span><span id="line-253"></span><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><span id="line-254"></span><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><span id="line-255"></span><span>
|
||||
</span><span id="line-256"></span></pre></body></html>
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -7,25 +7,25 @@
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
</span><span id="line-10"></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore
|
||||
-}</span><span>
|
||||
</span><a name="line-14"></a><span>
|
||||
</span><a name="line-15"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore</span><span>
|
||||
</span><a name="line-16"></a><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.API.html"><span class="hs-identifier">OpenAPIPetstore.API</span></a><span>
|
||||
</span><a name="line-17"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.Client.html"><span class="hs-identifier">OpenAPIPetstore.Client</span></a><span>
|
||||
</span><a name="line-18"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a><span>
|
||||
</span><a name="line-19"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.Logging.html"><span class="hs-identifier">OpenAPIPetstore.Logging</span></a><span>
|
||||
</span><a name="line-20"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a><span>
|
||||
</span><a name="line-21"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a><span>
|
||||
</span><a name="line-22"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.ModelLens.html"><span class="hs-identifier">OpenAPIPetstore.ModelLens</span></a><span>
|
||||
</span><a name="line-23"></a><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-24"></a><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.API.html"><span class="hs-identifier">OpenAPIPetstore.API</span></a><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Client.html"><span class="hs-identifier">OpenAPIPetstore.Client</span></a><span>
|
||||
</span><a name="line-27"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a><span>
|
||||
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Logging.html"><span class="hs-identifier">OpenAPIPetstore.Logging</span></a><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.ModelLens.html"><span class="hs-identifier">OpenAPIPetstore.ModelLens</span></a></pre></body></html>
|
||||
</span><span id="line-14"></span><span>
|
||||
</span><span id="line-15"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore</span><span>
|
||||
</span><span id="line-16"></span><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.html"><span class="hs-identifier">OpenAPIPetstore.API</span></a></span><span>
|
||||
</span><span id="line-17"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Client.html"><span class="hs-identifier">OpenAPIPetstore.Client</span></a></span><span>
|
||||
</span><span id="line-18"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a></span><span>
|
||||
</span><span id="line-19"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Logging.html"><span class="hs-identifier">OpenAPIPetstore.Logging</span></a></span><span>
|
||||
</span><span id="line-20"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a></span><span>
|
||||
</span><span id="line-21"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a></span><span>
|
||||
</span><span id="line-22"></span><span> </span><span class="hs-special">,</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="annot"><a href="OpenAPIPetstore.ModelLens.html"><span class="hs-identifier">OpenAPIPetstore.ModelLens</span></a></span><span>
|
||||
</span><span id="line-23"></span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-24"></span><span>
|
||||
</span><span id="line-25"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.API.html"><span class="hs-identifier">OpenAPIPetstore.API</span></a></span><span>
|
||||
</span><span id="line-26"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Client.html"><span class="hs-identifier">OpenAPIPetstore.Client</span></a></span><span>
|
||||
</span><span id="line-27"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Core.html"><span class="hs-identifier">OpenAPIPetstore.Core</span></a></span><span>
|
||||
</span><span id="line-28"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Logging.html"><span class="hs-identifier">OpenAPIPetstore.Logging</span></a></span><span>
|
||||
</span><span id="line-29"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.MimeTypes.html"><span class="hs-identifier">OpenAPIPetstore.MimeTypes</span></a></span><span>
|
||||
</span><span id="line-30"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.Model.html"><span class="hs-identifier">OpenAPIPetstore.Model</span></a></span><span>
|
||||
</span><span id="line-31"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><a href="OpenAPIPetstore.ModelLens.html"><span class="hs-identifier">OpenAPIPetstore.ModelLens</span></a></span></pre></body></html>
|
||||
@ -1,51 +1,139 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><link rel="stylesheet" type="text/css" href="style.css" /><script type="text/javascript" src="highlight.js"></script></head><body><pre><span class="hs-pragma">{-# LANGUAGE CPP #-}</span><span>
|
||||
</span><a name="line-2"></a><span class="hs-pragma">{-# LANGUAGE NoRebindableSyntax #-}</span><span>
|
||||
</span><a name="line-3"></a><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-missing-import-lists #-}</span><span>
|
||||
</span><a name="line-4"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">Paths_openapi_petstore</span><span> </span><span class="hs-special">(</span><span>
|
||||
</span><a name="line-5"></a><span> </span><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier hs-var">version</span></a><span class="hs-special">,</span><span>
|
||||
</span><a name="line-6"></a><span> </span><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier hs-var">getBinDir</span></a><span class="hs-special">,</span><span> </span><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier hs-var">getLibDir</span></a><span class="hs-special">,</span><span> </span><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier hs-var">getDynLibDir</span></a><span class="hs-special">,</span><span> </span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a><span class="hs-special">,</span><span> </span><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier hs-var">getLibexecDir</span></a><span class="hs-special">,</span><span>
|
||||
</span><a name="line-7"></a><span> </span><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-var">getDataFileName</span></a><span class="hs-special">,</span><span> </span><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier hs-var">getSysconfDir</span></a><span>
|
||||
</span><a name="line-8"></a><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-9"></a><span>
|
||||
</span><a name="line-10"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Exception</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">Exception</span><span>
|
||||
</span><a name="line-11"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Version</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Version</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-12"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">System.Environment</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-13"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Prelude</span><span>
|
||||
</span><a name="line-14"></a><span>
|
||||
</span><a name="line-15"></a><span class="hs-cpp">#if defined(VERSION_base)
|
||||
</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-cpp">#if MIN_VERSION_base(4,0,0)
|
||||
</span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679196807"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Exception.IOException</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679196807"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679196807"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-19"></a><span class="hs-cpp">#else
|
||||
</span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception.Exception</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span>
|
||||
</span><a name="line-21"></a><span class="hs-cpp">#endif
|
||||
</span><span>
|
||||
</span><a name="line-23"></a><span class="hs-cpp">#else
|
||||
</span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception.IOException</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span>
|
||||
</span><a name="line-25"></a><span class="hs-cpp">#endif
|
||||
</span><a name="catchIO"><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier">catchIO</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Exception.catch</span><span>
|
||||
</span><a name="line-27"></a><span>
|
||||
</span><a name="line-28"></a><span class="hs-identifier">version</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Version</span><span>
|
||||
</span><a name="line-29"></a><a name="version"><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier">version</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Version</span><span> </span><span class="hs-special">[</span><span class="hs-number">0</span><span class="hs-special">,</span><span class="hs-number">1</span><span class="hs-special">,</span><span class="hs-number">0</span><span class="hs-special">,</span><span class="hs-number">0</span><span class="hs-special">]</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-identifier">bindir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">dynlibdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">datadir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libexecdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">sysconfdir</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
|
||||
</span><a name="line-31"></a><span>
|
||||
</span><a name="line-32"></a><a name="bindir"><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier">bindir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/ivanbakel/Code/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/d2701ee3786f8106751f5b4a2971e31f1c44aa5239b0d08ed84a6e24577ee110/8.6.5/bin"</span><span>
|
||||
</span><a name="line-33"></a><a name="libdir"><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier">libdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/ivanbakel/Code/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/d2701ee3786f8106751f5b4a2971e31f1c44aa5239b0d08ed84a6e24577ee110/8.6.5/lib/x86_64-linux-ghc-8.6.5/openapi-petstore-0.1.0.0-8Y8fjG4kZ9N1YzSM6VEvto"</span><span>
|
||||
</span><a name="line-34"></a><a name="dynlibdir"><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier">dynlibdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/ivanbakel/Code/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/d2701ee3786f8106751f5b4a2971e31f1c44aa5239b0d08ed84a6e24577ee110/8.6.5/lib/x86_64-linux-ghc-8.6.5"</span><span>
|
||||
</span><a name="line-35"></a><a name="datadir"><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier">datadir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/ivanbakel/Code/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/d2701ee3786f8106751f5b4a2971e31f1c44aa5239b0d08ed84a6e24577ee110/8.6.5/share/x86_64-linux-ghc-8.6.5/openapi-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-36"></a><a name="libexecdir"><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier">libexecdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/ivanbakel/Code/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/d2701ee3786f8106751f5b4a2971e31f1c44aa5239b0d08ed84a6e24577ee110/8.6.5/libexec/x86_64-linux-ghc-8.6.5/openapi-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-37"></a><a name="sysconfdir"><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier">sysconfdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/ivanbakel/Code/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/d2701ee3786f8106751f5b4a2971e31f1c44aa5239b0d08ed84a6e24577ee110/8.6.5/etc"</span><span>
|
||||
</span><a name="line-38"></a><span>
|
||||
</span><a name="line-39"></a><span class="hs-identifier">getBinDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getLibDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getDynLibDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getDataDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getLibexecDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getSysconfDir</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
|
||||
</span><a name="line-40"></a><a name="getBinDir"><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier">getBinDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">"openapi_petstore_bindir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-var">bindir</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-41"></a><a name="getLibDir"><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier">getLibDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">"openapi_petstore_libdir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier hs-var">libdir</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-42"></a><a name="getDynLibDir"><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier">getDynLibDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">"openapi_petstore_dynlibdir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier hs-var">dynlibdir</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-43"></a><a name="getDataDir"><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier">getDataDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">"openapi_petstore_datadir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier hs-var">datadir</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-44"></a><a name="getLibexecDir"><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier">getLibexecDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">"openapi_petstore_libexecdir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier hs-var">libexecdir</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-45"></a><a name="getSysconfDir"><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">"openapi_petstore_sysconfdir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-var">sysconfdir</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-46"></a><span>
|
||||
</span><a name="line-47"></a><span class="hs-identifier">getDataFileName</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
|
||||
</span><a name="line-48"></a><a name="getDataFileName"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></a><span> </span><a name="local-6989586621679197629"><a href="#local-6989586621679197629"><span class="hs-identifier">name</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-49"></a><span> </span><a name="local-6989586621679197630"><a href="#local-6989586621679197630"><span class="hs-identifier">dir</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a><span>
|
||||
</span><a name="line-50"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679197630"><span class="hs-identifier hs-var">dir</span></a><span> </span><span class="hs-operator hs-var">++</span><span> </span><span class="hs-string">"/"</span><span> </span><span class="hs-operator hs-var">++</span><span> </span><a href="#local-6989586621679197629"><span class="hs-identifier hs-var">name</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-51"></a></pre></body></html>
|
||||
</span><span id="line-2"></span><span class="hs-pragma">{-# LANGUAGE NoRebindableSyntax #-}</span><span>
|
||||
</span><span id="line-3"></span><span class="hs-pragma">{-# OPTIONS_GHC -fno-warn-missing-import-lists #-}</span><span>
|
||||
</span><span id="line-4"></span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">Paths_openapi_petstore</span><span> </span><span class="hs-special">(</span><span>
|
||||
</span><span id="line-5"></span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier">version</span></a></span><span class="hs-special">,</span><span>
|
||||
</span><span id="line-6"></span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier">getBinDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier">getLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier">getDynLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier">getDataDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier">getLibexecDir</span></a></span><span class="hs-special">,</span><span>
|
||||
</span><span id="line-7"></span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></span><span>
|
||||
</span><span id="line-8"></span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><span id="line-9"></span><span>
|
||||
</span><span id="line-10"></span><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="annot"><span class="hs-identifier">Control.Exception</span></span><span> </span><span class="hs-keyword">as</span><span> </span><span class="annot"><span class="hs-identifier">Exception</span></span><span>
|
||||
</span><span id="line-11"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Data.Version</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">Version</span></span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-12"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">System.Environment</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier">getEnv</span></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-13"></span><span class="hs-keyword">import</span><span> </span><span class="annot"><span class="hs-identifier">Prelude</span></span><span class="hs-cpp">
|
||||
|
||||
#if defined(VERSION_base)
|
||||
</span><span class="hs-cpp">
|
||||
#if MIN_VERSION_base(4,0,0)
|
||||
</span><span id="local-6989586621679155310"><span class="annot"><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-type">catchIO</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="#local-6989586621679155310"><span class="hs-identifier hs-type">a</span></a></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="hs-identifier hs-type">Exception.IOException</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="#local-6989586621679155310"><span class="hs-identifier hs-type">a</span></a></span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><a href="#local-6989586621679155310"><span class="hs-identifier hs-type">a</span></a></span></span><span class="hs-cpp">
|
||||
#else
|
||||
</span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception.Exception</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-cpp">
|
||||
#endif
|
||||
</span><span class="hs-cpp">
|
||||
#else
|
||||
</span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception.IOException</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-cpp">
|
||||
#endif
|
||||
</span><span id="catchIO"><span class="annot"><span class="annottext">catchIO :: IO a -> (IOException -> IO a) -> IO a
|
||||
</span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var hs-var">catchIO</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO a -> (IOException -> IO a) -> IO a
|
||||
forall e a. Exception e => IO a -> (e -> IO a) -> IO a
|
||||
</span><span class="hs-identifier hs-var">Exception.catch</span></span><span>
|
||||
</span><span id="line-27"></span><span>
|
||||
</span><span id="line-28"></span><span class="annot"><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier hs-type">version</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">Version</span></span><span>
|
||||
</span><span id="line-29"></span><span id="version"><span class="annot"><span class="annottext">version :: Version
|
||||
</span><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier hs-var hs-var">version</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">[Int] -> [String] -> Version
|
||||
</span><span class="hs-identifier hs-var">Version</span></span><span> </span><span class="hs-special">[</span><span class="annot"><span class="annottext">Int
|
||||
</span><span class="hs-number">0</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Int
|
||||
</span><span class="hs-number">1</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Int
|
||||
</span><span class="hs-number">0</span></span><span class="hs-special">,</span><span class="annot"><span class="annottext">Int
|
||||
</span><span class="hs-number">0</span></span><span class="hs-special">]</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><span id="line-30"></span><span class="annot"><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-type">bindir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier hs-type">libdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier hs-type">dynlibdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier hs-type">datadir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier hs-type">libexecdir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-type">sysconfdir</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span>
|
||||
</span><span id="line-31"></span><span>
|
||||
</span><span id="line-32"></span><span id="bindir"><span class="annot"><span class="annottext">bindir :: String
|
||||
</span><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-var hs-var">bindir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/bin"</span></span><span>
|
||||
</span><span id="line-33"></span><span id="libdir"><span class="annot"><span class="annottext">libdir :: String
|
||||
</span><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier hs-var hs-var">libdir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/lib/x86_64-linux-ghc-8.10.7/openapi-petstore-0.1.0.0-KK0a84V9cgE7ifsb9ACXB1"</span></span><span>
|
||||
</span><span id="line-34"></span><span id="dynlibdir"><span class="annot"><span class="annottext">dynlibdir :: String
|
||||
</span><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier hs-var hs-var">dynlibdir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/lib/x86_64-linux-ghc-8.10.7"</span></span><span>
|
||||
</span><span id="line-35"></span><span id="datadir"><span class="annot"><span class="annottext">datadir :: String
|
||||
</span><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier hs-var hs-var">datadir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/share/x86_64-linux-ghc-8.10.7/openapi-petstore-0.1.0.0"</span></span><span>
|
||||
</span><span id="line-36"></span><span id="libexecdir"><span class="annot"><span class="annottext">libexecdir :: String
|
||||
</span><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier hs-var hs-var">libexecdir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/libexec/x86_64-linux-ghc-8.10.7/openapi-petstore-0.1.0.0"</span></span><span>
|
||||
</span><span id="line-37"></span><span id="sysconfdir"><span class="annot"><span class="annottext">sysconfdir :: String
|
||||
</span><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-var hs-var">sysconfdir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/c2d06f167ed22c3aeac6ab338dd025e6d4619b0164253f553a46d24aab5989bd/8.10.7/etc"</span></span><span>
|
||||
</span><span id="line-38"></span><span>
|
||||
</span><span id="line-39"></span><span class="annot"><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier hs-type">getBinDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier hs-type">getLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier hs-type">getDynLibDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-type">getDataDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier hs-type">getLibexecDir</span></a></span><span class="hs-special">,</span><span> </span><span class="annot"><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier hs-type">getSysconfDir</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span>
|
||||
</span><span id="line-40"></span><span id="getBinDir"><span class="annot"><span class="annottext">getBinDir :: IO String
|
||||
</span><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier hs-var hs-var">getBinDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -> (IOException -> IO String) -> IO String
|
||||
forall a. IO a -> (IOException -> IO a) -> IO a
|
||||
</span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> IO String
|
||||
</span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"openapi_petstore_bindir"</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> IO String
|
||||
forall (m :: * -> *) a. Monad m => a -> m a
|
||||
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-var">bindir</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-41"></span><span id="getLibDir"><span class="annot"><span class="annottext">getLibDir :: IO String
|
||||
</span><a href="Paths_openapi_petstore.html#getLibDir"><span class="hs-identifier hs-var hs-var">getLibDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -> (IOException -> IO String) -> IO String
|
||||
forall a. IO a -> (IOException -> IO a) -> IO a
|
||||
</span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> IO String
|
||||
</span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"openapi_petstore_libdir"</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> IO String
|
||||
forall (m :: * -> *) a. Monad m => a -> m a
|
||||
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier hs-var">libdir</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-42"></span><span id="getDynLibDir"><span class="annot"><span class="annottext">getDynLibDir :: IO String
|
||||
</span><a href="Paths_openapi_petstore.html#getDynLibDir"><span class="hs-identifier hs-var hs-var">getDynLibDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -> (IOException -> IO String) -> IO String
|
||||
forall a. IO a -> (IOException -> IO a) -> IO a
|
||||
</span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> IO String
|
||||
</span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"openapi_petstore_dynlibdir"</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> IO String
|
||||
forall (m :: * -> *) a. Monad m => a -> m a
|
||||
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier hs-var">dynlibdir</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-43"></span><span id="getDataDir"><span class="annot"><span class="annottext">getDataDir :: IO String
|
||||
</span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var hs-var">getDataDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -> (IOException -> IO String) -> IO String
|
||||
forall a. IO a -> (IOException -> IO a) -> IO a
|
||||
</span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> IO String
|
||||
</span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"openapi_petstore_datadir"</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> IO String
|
||||
forall (m :: * -> *) a. Monad m => a -> m a
|
||||
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier hs-var">datadir</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-44"></span><span id="getLibexecDir"><span class="annot"><span class="annottext">getLibexecDir :: IO String
|
||||
</span><a href="Paths_openapi_petstore.html#getLibexecDir"><span class="hs-identifier hs-var hs-var">getLibexecDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -> (IOException -> IO String) -> IO String
|
||||
forall a. IO a -> (IOException -> IO a) -> IO a
|
||||
</span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> IO String
|
||||
</span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"openapi_petstore_libexecdir"</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> IO String
|
||||
forall (m :: * -> *) a. Monad m => a -> m a
|
||||
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier hs-var">libexecdir</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-45"></span><span id="getSysconfDir"><span class="annot"><span class="annottext">getSysconfDir :: IO String
|
||||
</span><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier hs-var hs-var">getSysconfDir</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="annot"><span class="annottext">IO String -> (IOException -> IO String) -> IO String
|
||||
forall a. IO a -> (IOException -> IO a) -> IO a
|
||||
</span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String -> IO String
|
||||
</span><span class="hs-identifier hs-var">getEnv</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"openapi_petstore_sysconfdir"</span></span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="annot"><span class="annottext">IOException
|
||||
</span><span class="hs-identifier">_</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="annottext">String -> IO String
|
||||
forall (m :: * -> *) a. Monad m => a -> m a
|
||||
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-var">sysconfdir</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-46"></span><span>
|
||||
</span><span id="line-47"></span><span class="annot"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-type">getDataFileName</span></a></span><span> </span><span class="hs-glyph">::</span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span> </span><span class="hs-glyph">-></span><span> </span><span class="annot"><span class="hs-identifier hs-type">IO</span></span><span> </span><span class="annot"><span class="hs-identifier hs-type">FilePath</span></span><span>
|
||||
</span><span id="line-48"></span><span id="getDataFileName"><span class="annot"><span class="annottext">getDataFileName :: String -> IO String
|
||||
</span><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier hs-var hs-var">getDataFileName</span></a></span></span><span> </span><span id="local-6989586621679155287"><span class="annot"><span class="annottext">String
|
||||
</span><a href="#local-6989586621679155287"><span class="hs-identifier hs-var">name</span></a></span></span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><span id="line-49"></span><span> </span><span id="local-6989586621679155286"><span class="annot"><span class="annottext">String
|
||||
</span><a href="#local-6989586621679155286"><span class="hs-identifier hs-var">dir</span></a></span></span><span> </span><span class="hs-glyph"><-</span><span> </span><span class="annot"><span class="annottext">IO String
|
||||
</span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a></span><span>
|
||||
</span><span id="line-50"></span><span> </span><span class="annot"><span class="annottext">String -> IO String
|
||||
forall (m :: * -> *) a. Monad m => a -> m a
|
||||
</span><span class="hs-identifier hs-var">return</span></span><span> </span><span class="hs-special">(</span><span class="annot"><span class="annottext">String
|
||||
</span><a href="#local-6989586621679155286"><span class="hs-identifier hs-var">dir</span></a></span><span> </span><span class="annot"><span class="annottext">String -> String -> String
|
||||
forall a. [a] -> [a] -> [a]
|
||||
</span><span class="hs-operator hs-var">++</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><span class="hs-string">"/"</span></span><span> </span><span class="annot"><span class="annottext">String -> String -> String
|
||||
forall a. [a] -> [a] -> [a]
|
||||
</span><span class="hs-operator hs-var">++</span></span><span> </span><span class="annot"><span class="annottext">String
|
||||
</span><a href="#local-6989586621679155287"><span class="hs-identifier hs-var">name</span></a></span><span class="hs-special">)</span><span>
|
||||
</span><span id="line-51"></span></pre></body></html>
|
||||
@ -53,3 +53,45 @@ a:link, a:visited {
|
||||
a:hover, a.hover-highlight {
|
||||
background-color: #eee8d5;
|
||||
}
|
||||
|
||||
span.annot{
|
||||
position:relative;
|
||||
color:#000;
|
||||
text-decoration:none
|
||||
}
|
||||
|
||||
span.annot:hover{z-index:25; background-color:#ff0}
|
||||
|
||||
span.annot span.annottext{
|
||||
display: none;
|
||||
border-radius: 5px 5px;
|
||||
|
||||
-moz-border-radius: 5px;
|
||||
-webkit-border-radius: 5px;
|
||||
|
||||
box-shadow: 5px 5px 5px rgba(0, 0, 0, 0.1);
|
||||
-webkit-box-shadow: 5px 5px rgba(0, 0, 0, 0.1);
|
||||
-moz-box-shadow: 5px 5px rgba(0, 0, 0, 0.1);
|
||||
|
||||
position: absolute;
|
||||
left: 1em; top: 2em;
|
||||
z-index: 99;
|
||||
margin-left: 5;
|
||||
background: #FFFFAA;
|
||||
border: 2px solid #FFAD33;
|
||||
padding: 0.8em 1em;
|
||||
}
|
||||
|
||||
span.annot:hover span.annottext{
|
||||
display:block;
|
||||
}
|
||||
|
||||
/* This bridges the gap so you can mouse into the tooltip without it disappearing */
|
||||
span.annot span.annottext:before{
|
||||
content: "";
|
||||
position: absolute;
|
||||
left: -1em; top: -1em;
|
||||
background: #FFFFFF00;
|
||||
z-index:-1;
|
||||
padding: 2em 2em;
|
||||
}
|
||||
|
||||
@ -1,10 +1,8 @@
|
||||
cabal-version: 1.12
|
||||
|
||||
-- This file has been generated from package.yaml by hpack version 0.31.1.
|
||||
-- This file has been generated from package.yaml by hpack version 0.34.4.
|
||||
--
|
||||
-- see: https://github.com/sol/hpack
|
||||
--
|
||||
-- hash: 683b4f8e9235d6d2d003d7984f2a2a973c96adb8f3f0687e39d730fbf2e8b221
|
||||
|
||||
name: openapi-petstore-app
|
||||
version: 0.1.0.0
|
||||
@ -32,11 +30,11 @@ executable openapi-petstore-app
|
||||
, case-insensitive
|
||||
, containers >=0.5.0.0 && <0.8
|
||||
, http-api-data >=0.3.4 && <0.5
|
||||
, http-client >=0.5 && <0.7
|
||||
, http-client >=0.5 && <0.8
|
||||
, http-client-tls
|
||||
, http-media >=0.4 && <0.9
|
||||
, http-media >=0.4
|
||||
, http-types >=0.8 && <0.13
|
||||
, microlens >=0.4.3 && <0.5
|
||||
, microlens >=0.4.3
|
||||
, mtl >=2.2.1
|
||||
, openapi-petstore
|
||||
, text >=0.11 && <1.3
|
||||
|
||||
@ -22,16 +22,16 @@ dependencies:
|
||||
- aeson >=1.0 && <2.0
|
||||
- bytestring >=0.10.0 && <0.11
|
||||
- http-types >=0.8 && <0.13
|
||||
- http-client >=0.5 && <0.6
|
||||
- http-client >=0.5 && <0.8
|
||||
- http-client-tls
|
||||
- http-api-data >= 0.3.4 && <0.5
|
||||
- http-media >= 0.4 && < 0.8
|
||||
- http-media >= 0.4
|
||||
- text >=0.11 && <1.3
|
||||
- time (>=1.5 && <1.9) || (>=1.10 && <2.0)
|
||||
- time
|
||||
- vector >=0.10.9 && <0.13
|
||||
- case-insensitive
|
||||
- openapi-petstore
|
||||
- microlens >= 0.4.3 && <0.5
|
||||
- microlens >= 0.4.3
|
||||
executables:
|
||||
openapi-petstore-app:
|
||||
main: Main.hs
|
||||
|
||||
@ -1,2 +1,2 @@
|
||||
resolver: lts-14.27
|
||||
resolver: lts-18.10
|
||||
extra-deps: [ '..' ]
|
||||
|
||||
@ -6,7 +6,7 @@
|
||||
packages: []
|
||||
snapshots:
|
||||
- completed:
|
||||
size: 524996
|
||||
url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/14/27.yaml
|
||||
sha256: 7ea31a280c56bf36ff591a7397cc384d0dff622e7f9e4225b47d8980f019a0f0
|
||||
original: lts-14.27
|
||||
size: 587546
|
||||
url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/18/10.yaml
|
||||
sha256: 88b4f81e162ba3adc230a9fcccc4d19ac116377656bab56c7382ca88598b257a
|
||||
original: lts-18.10
|
||||
|
||||
@ -78,7 +78,7 @@ data MimeError =
|
||||
MimeError {
|
||||
mimeError :: String -- ^ unrender/parser error
|
||||
, mimeErrorResponse :: NH.Response BCL.ByteString -- ^ http response
|
||||
} deriving (Eq, Show)
|
||||
} deriving (Show)
|
||||
|
||||
-- | send a request returning the 'MimeResult'
|
||||
dispatchMime
|
||||
@ -207,11 +207,11 @@ modifyInitRequestM (InitRequest req) f = fmap InitRequest (f req)
|
||||
-- | Run a block using the configured logger instance
|
||||
runConfigLog
|
||||
:: P.MonadIO m
|
||||
=> OpenAPIPetstoreConfig -> LogExec m
|
||||
=> OpenAPIPetstoreConfig -> LogExec m a
|
||||
runConfigLog config = configLogExecWithContext config (configLogContext config)
|
||||
|
||||
-- | Run a block using the configured logger instance (logs exceptions)
|
||||
runConfigLogWithExceptions
|
||||
:: (E.MonadCatch m, P.MonadIO m)
|
||||
=> T.Text -> OpenAPIPetstoreConfig -> LogExec m
|
||||
=> T.Text -> OpenAPIPetstoreConfig -> LogExec m a
|
||||
runConfigLogWithExceptions src config = runConfigLog config . logExceptions src
|
||||
|
||||
@ -44,6 +44,7 @@ import qualified Data.CaseInsensitive as CI
|
||||
import qualified Data.Data as P (Data, Typeable, TypeRep, typeRep)
|
||||
import qualified Data.Foldable as P
|
||||
import qualified Data.Ix as P
|
||||
import qualified Data.Kind as K (Type)
|
||||
import qualified Data.Maybe as P
|
||||
import qualified Data.Proxy as P (Proxy(..))
|
||||
import qualified Data.Text as T
|
||||
@ -55,9 +56,9 @@ import qualified Lens.Micro as L
|
||||
import qualified Network.HTTP.Client.MultipartFormData as NH
|
||||
import qualified Network.HTTP.Types as NH
|
||||
import qualified Prelude as P
|
||||
import qualified Text.Printf as T
|
||||
import qualified Web.FormUrlEncoded as WH
|
||||
import qualified Web.HttpApiData as WH
|
||||
import qualified Text.Printf as T
|
||||
|
||||
import Control.Applicative ((<|>))
|
||||
import Control.Applicative (Alternative)
|
||||
@ -560,4 +561,4 @@ _showBinaryBase64 = T.decodeUtf8 . BL.toStrict . BL64.encode . unBinary
|
||||
-- * Lens Type Aliases
|
||||
|
||||
type Lens_' s a = Lens_ s s a a
|
||||
type Lens_ s t a b = forall (f :: * -> *). Functor f => (a -> f b) -> s -> f t
|
||||
type Lens_ s t a b = forall (f :: K.Type -> K.Type). Functor f => (a -> f b) -> s -> f t
|
||||
|
||||
@ -34,11 +34,11 @@ import qualified Katip as LG
|
||||
-- * Type Aliases (for compatibility)
|
||||
|
||||
-- | Runs a Katip logging block with the Log environment
|
||||
type LogExecWithContext = forall m. P.MonadIO m =>
|
||||
LogContext -> LogExec m
|
||||
type LogExecWithContext = forall m a. P.MonadIO m =>
|
||||
LogContext -> LogExec m a
|
||||
|
||||
-- | A Katip logging block
|
||||
type LogExec m = forall a. LG.KatipT m a -> m a
|
||||
type LogExec m a = LG.KatipT m a -> m a
|
||||
|
||||
-- | A Katip Log environment
|
||||
type LogContext = LG.LogEnv
|
||||
|
||||
@ -24,7 +24,6 @@ import qualified Control.Monad.IO.Class as P
|
||||
import qualified Data.Text as T
|
||||
import qualified Data.Time as TI
|
||||
|
||||
import Data.Monoid ((<>))
|
||||
import Data.Text (Text)
|
||||
|
||||
import qualified Control.Monad.Logger as LG
|
||||
@ -32,11 +31,11 @@ import qualified Control.Monad.Logger as LG
|
||||
-- * Type Aliases (for compatibility)
|
||||
|
||||
-- | Runs a monad-logger block with the filter predicate
|
||||
type LogExecWithContext = forall m. P.MonadIO m =>
|
||||
LogContext -> LogExec m
|
||||
type LogExecWithContext = forall m a. P.MonadIO m =>
|
||||
LogContext -> LogExec m a
|
||||
|
||||
-- | A monad-logger block
|
||||
type LogExec m = forall a. LG.LoggingT m a -> m a
|
||||
type LogExec m a = LG.LoggingT m a -> m a
|
||||
|
||||
-- | A monad-logger filter predicate
|
||||
type LogContext = LG.LogSource -> LG.LogLevel -> Bool
|
||||
|
||||
@ -38,18 +38,18 @@ library
|
||||
aeson >=1.0 && <2.0
|
||||
, base >=4.7 && <5.0
|
||||
, base64-bytestring >1.0 && <2.0
|
||||
, bytestring >=0.10.0 && <0.11
|
||||
, bytestring >=0.10.0
|
||||
, case-insensitive
|
||||
, containers >=0.5.0.0 && <0.8
|
||||
, deepseq >= 1.4 && <1.6
|
||||
, exceptions >= 0.4
|
||||
, http-api-data >= 0.3.4 && <0.5
|
||||
, http-client >=0.5 && <0.7
|
||||
, http-client >=0.5 && <0.8
|
||||
, http-client-tls
|
||||
, http-media >= 0.4 && < 0.9
|
||||
, http-types >=0.8 && <0.13
|
||||
, iso8601-time >=0.1.3 && <0.2.0
|
||||
, microlens >= 0.4.3 && <0.5
|
||||
, microlens >= 0.4.3
|
||||
, mtl >=2.2.1
|
||||
, network >=2.6.2 && <3.9
|
||||
, random >=1.1
|
||||
@ -98,7 +98,7 @@ test-suite tests
|
||||
, QuickCheck
|
||||
, aeson
|
||||
, base >=4.7 && <5.0
|
||||
, bytestring >=0.10.0 && <0.11
|
||||
, bytestring >=0.10.0
|
||||
, containers
|
||||
, hspec >=1.8
|
||||
, iso8601-time
|
||||
|
||||
@ -1,4 +1,4 @@
|
||||
resolver: lts-14.27
|
||||
resolver: lts-18.10
|
||||
build:
|
||||
haddock-arguments:
|
||||
haddock-args:
|
||||
|
||||
@ -1,10 +1,10 @@
|
||||
cabal-version: 1.12
|
||||
|
||||
-- This file has been generated from package.yaml by hpack version 0.31.2.
|
||||
-- This file has been generated from package.yaml by hpack version 0.34.4.
|
||||
--
|
||||
-- see: https://github.com/sol/hpack
|
||||
--
|
||||
-- hash: 1de2469e3014acffdfb079309edd15dc88ec7f5acce21f1062b61a1b002418fd
|
||||
-- hash: 67946b4cbdad5837b584f5f3f5dbe69d3529a6aafe98c462228958f8d19e894e
|
||||
|
||||
name: openapi-petstore-tests-integration
|
||||
version: 0.1.0.0
|
||||
@ -33,18 +33,18 @@ test-suite tests
|
||||
, QuickCheck
|
||||
, aeson
|
||||
, base >=4.7 && <5.0
|
||||
, bytestring >=0.10.0 && <0.11
|
||||
, bytestring >=0.10.0
|
||||
, case-insensitive
|
||||
, containers
|
||||
, exceptions >=0.4
|
||||
, hspec >=1.8
|
||||
, http-api-data >=0.3.4 && <0.5
|
||||
, http-client >=0.5 && <0.7
|
||||
, http-client >=0.5 && <0.8
|
||||
, http-client-tls
|
||||
, http-media >=0.4 && <0.9
|
||||
, http-media
|
||||
, http-types >=0.8 && <0.13
|
||||
, iso8601-time
|
||||
, microlens >=0.4.3 && <0.5
|
||||
, microlens >=0.4.3
|
||||
, mtl >=2.2.1
|
||||
, openapi-petstore
|
||||
, safe-exceptions <0.2
|
||||
|
||||
@ -20,19 +20,19 @@ dependencies:
|
||||
- unordered-containers
|
||||
- containers >=0.5.0.0 && <0.7
|
||||
- aeson >=1.0 && <2.0
|
||||
- bytestring >=0.10.0 && <0.11
|
||||
- bytestring >=0.10.0
|
||||
- http-types >=0.8 && <0.13
|
||||
- http-client >=0.5 && <0.7
|
||||
- http-client >=0.5 && <0.8
|
||||
- http-client-tls
|
||||
- http-api-data >= 0.3.4 && <0.5
|
||||
- http-media >= 0.4 && < 0.9
|
||||
- http-media
|
||||
- text >=0.11 && <1.3
|
||||
- time (>=1.5 && <1.9) || (>=1.10 && <2.0)
|
||||
- time
|
||||
- vector >=0.10.9 && <0.13
|
||||
- exceptions >= 0.4
|
||||
- case-insensitive
|
||||
- safe-exceptions <0.2
|
||||
- microlens >= 0.4.3 && <0.5
|
||||
- microlens >= 0.4.3
|
||||
- openapi-petstore
|
||||
tests:
|
||||
tests:
|
||||
@ -42,7 +42,7 @@ tests:
|
||||
- -fno-warn-orphans
|
||||
dependencies:
|
||||
- openapi-petstore
|
||||
- bytestring >=0.10.0 && <0.11
|
||||
- bytestring >=0.10.0
|
||||
- containers
|
||||
- hspec >=1.8
|
||||
- HUnit > 1.5.0
|
||||
|
||||
@ -1,2 +1,2 @@
|
||||
resolver: lts-14.7
|
||||
resolver: lts-18.10
|
||||
extra-deps: [ '..' ]
|
||||
|
||||
@ -6,7 +6,7 @@
|
||||
packages: []
|
||||
snapshots:
|
||||
- completed:
|
||||
size: 523700
|
||||
url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/14/7.yaml
|
||||
sha256: 8e3f3c894be74d71fa4bf085e0a8baae7e4d7622d07ea31a52736b80f8b9bb1a
|
||||
original: lts-14.7
|
||||
size: 587546
|
||||
url: https://raw.githubusercontent.com/commercialhaskell/stackage-snapshots/master/lts/18/10.yaml
|
||||
sha256: 88b4f81e162ba3adc230a9fcccc4d19ac116377656bab56c7382ca88598b257a
|
||||
original: lts-18.10
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user