forked from loafle/openapi-generator-original
[haskell-http-client] update readme; improve lens generation; fix dateFormat (#6448)
* point readme links to canonical locations * use lenses for non-required model fields, instead of traversals * fix .gitignore generation * fix dateFormat cli option bug
This commit is contained in:
@@ -128,7 +128,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
|
|||||||
supportingFiles.add(new SupportingFile("README.mustache", "", "README.md"));
|
supportingFiles.add(new SupportingFile("README.mustache", "", "README.md"));
|
||||||
supportingFiles.add(new SupportingFile("stack.mustache", "", "stack.yaml"));
|
supportingFiles.add(new SupportingFile("stack.mustache", "", "stack.yaml"));
|
||||||
supportingFiles.add(new SupportingFile("Setup.mustache", "", "Setup.hs"));
|
supportingFiles.add(new SupportingFile("Setup.mustache", "", "Setup.hs"));
|
||||||
supportingFiles.add(new SupportingFile(".gitignore", "", ".gitignore"));
|
supportingFiles.add(new SupportingFile("gitignore.mustache", "", ".gitignore"));
|
||||||
supportingFiles.add(new SupportingFile(".travis.yml", "", ".travis.yml"));
|
supportingFiles.add(new SupportingFile(".travis.yml", "", ".travis.yml"));
|
||||||
supportingFiles.add(new SupportingFile("git_push.sh.mustache", "", "git_push.sh"));
|
supportingFiles.add(new SupportingFile("git_push.sh.mustache", "", "git_push.sh"));
|
||||||
|
|
||||||
@@ -241,7 +241,7 @@ public class HaskellHttpClientCodegen extends DefaultCodegen implements CodegenC
|
|||||||
|
|
||||||
public void setDateFormat(String value) {
|
public void setDateFormat(String value) {
|
||||||
if (StringUtils.isBlank(value)) {
|
if (StringUtils.isBlank(value)) {
|
||||||
additionalProperties.remove(DATE_FORMAT);
|
additionalProperties.put(DATE_FORMAT, defaultDateFormat);
|
||||||
} else {
|
} else {
|
||||||
additionalProperties.put(DATE_FORMAT, value);
|
additionalProperties.put(DATE_FORMAT, value);
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -29,8 +29,6 @@ import {{title}}.Model
|
|||||||
|
|
||||||
-- * Type Aliases
|
-- * Type Aliases
|
||||||
|
|
||||||
type Traversal_' s a = Traversal_ s s a a
|
|
||||||
type Traversal_ s t a b = forall (f :: * -> *). Applicative f => (a -> f b) -> s -> f t
|
|
||||||
type Lens_' s a = Lens_ s s a a
|
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 :: * -> *). Functor f => (a -> f b) -> s -> f t
|
||||||
|
|
||||||
@@ -40,27 +38,12 @@ type Lens_ s t a b = forall (f :: * -> *). Functor f => (a -> f b) -> s -> f t
|
|||||||
-- * {{classname}}
|
-- * {{classname}}
|
||||||
|
|
||||||
{{#vars}}
|
{{#vars}}
|
||||||
{{#required}}
|
|
||||||
-- | '{{name}}' Lens
|
-- | '{{name}}' Lens
|
||||||
{{name}}L :: Lens_' {{classname}} {{datatype}}
|
{{name}}L :: Lens_' {{classname}} ({{^required}}Maybe {{/required}}{{datatype}})
|
||||||
{{name}}L f {{classname}}{..} = (\{{name}} -> {{classname}} { {{name}}, ..} ) <$> f {{name}}
|
{{name}}L f {{classname}}{..} = (\{{name}} -> {{classname}} { {{name}}, ..} ) <$> f {{name}}
|
||||||
{-# INLINE {{name}}L #-}
|
{-# INLINE {{name}}L #-}
|
||||||
{{/required}}
|
|
||||||
{{^required}}
|
|
||||||
-- | '{{name}}' Traversal
|
|
||||||
{{name}}T :: Traversal_' {{classname}} {{datatype}}
|
|
||||||
{{name}}T f s = _mtraversal {{name}} (\b -> s { {{name}} = Just b}) f s
|
|
||||||
{-# INLINE {{name}}T #-}
|
|
||||||
{{/required}}
|
|
||||||
|
|
||||||
{{/vars}}
|
{{/vars}}
|
||||||
|
|
||||||
{{/model}}
|
{{/model}}
|
||||||
{{/models}}
|
{{/models}}
|
||||||
|
|
||||||
|
|
||||||
-- * Helpers
|
|
||||||
|
|
||||||
_mtraversal :: Applicative f => (b -> Maybe t) -> (a -> b) -> (t -> f a) -> b -> f b
|
|
||||||
_mtraversal x fsb f s = maybe (pure s) (\a -> fsb <$> f a) (x s)
|
|
||||||
{-# INLINE _mtraversal #-}
|
|
||||||
|
|||||||
@@ -63,15 +63,15 @@ These options allow some customization of the code generation process.
|
|||||||
**haskell-http-client specific options:**
|
**haskell-http-client specific options:**
|
||||||
|
|
||||||
| OPTION | DESCRIPTION | DEFAULT | ACTUAL |
|
| OPTION | DESCRIPTION | DEFAULT | ACTUAL |
|
||||||
| ------------------------------- | ----------------------------------------------------------------------------------------------------------------------------- | -------- | ----------------------------------- |
|
| ------------------------------- | ----------------------------------------------------------------------------------------------------------------------------- | -------- | ------------------------------------- |
|
||||||
| allowFromJsonNulls | allow JSON Null during model decoding from JSON | true | {{allowFromJsonNulls}} |
|
| allowFromJsonNulls | allow JSON Null during model decoding from JSON | true | {{{allowFromJsonNulls}}} |
|
||||||
| allowToJsonNulls | allow emitting JSON Null during model encoding to JSON | false | {{allowToJsonNulls}} |
|
| allowToJsonNulls | allow emitting JSON Null during model encoding to JSON | false | {{{allowToJsonNulls}}} |
|
||||||
| dateFormat | format string used to parse/render a date | %Y-%m-%d | {{dateFormat}} |
|
| dateFormat | format string used to parse/render a date | %Y-%m-%d | {{{dateFormat}}} |
|
||||||
| dateTimeFormat | format string used to parse/render a datetime. (Defaults to [formatISO8601Millis][1] when not provided) | | {{dateTimeFormat}} |
|
| dateTimeFormat | format string used to parse/render a datetime. (Defaults to [formatISO8601Millis][1] when not provided) | | {{{dateTimeFormat}}} |
|
||||||
| generateFormUrlEncodedInstances | Generate FromForm/ToForm instances for models used by x-www-form-urlencoded operations (model fields must be primitive types) | true | {{generateFormUrlEncodedInstances}} |
|
| generateFormUrlEncodedInstances | Generate FromForm/ToForm instances for models used by x-www-form-urlencoded operations (model fields must be primitive types) | true | {{{generateFormUrlEncodedInstances}}} |
|
||||||
| generateLenses | Generate Lens optics for Models | true | {{generateLenses}} |
|
| generateLenses | Generate Lens optics for Models | true | {{{generateLenses}}} |
|
||||||
| generateModelConstructors | Generate smart constructors (only supply required fields) for models | true | {{generateModelConstructors}} |
|
| generateModelConstructors | Generate smart constructors (only supply required fields) for models | true | {{{generateModelConstructors}}} |
|
||||||
| modelDeriving | Additional classes to include in the deriving() clause of Models | | {{modelDeriving}} |
|
| modelDeriving | Additional classes to include in the deriving() clause of Models | | {{{modelDeriving}}} |
|
||||||
|
|
||||||
[1]: https://www.stackage.org/haddock/lts-9.0/iso8601-time-0.1.4/Data-Time-ISO8601.html#v:formatISO8601Millis
|
[1]: https://www.stackage.org/haddock/lts-9.0/iso8601-time-0.1.4/Data-Time-ISO8601.html#v:formatISO8601Millis
|
||||||
|
|
||||||
@@ -85,13 +85,13 @@ java -jar modules/swagger-codegen-cli/target/swagger-codegen-cli.jar config-help
|
|||||||
|
|
||||||
An example of the generated haddock documentation targeting the server http://petstore.swagger.io/ (SwaggerPetstore) can be found [here][2]
|
An example of the generated haddock documentation targeting the server http://petstore.swagger.io/ (SwaggerPetstore) can be found [here][2]
|
||||||
|
|
||||||
[2]: https://jonschoning.github.io/swaggerpetstore-haskell-http-client/
|
[2]: https://hackage.haskell.org/package/swagger-petstore
|
||||||
|
|
||||||
### Example SwaggerPetstore App
|
### Example SwaggerPetstore App
|
||||||
|
|
||||||
An example application using the auto-generated haskell-http-client bindings for the server http://petstore.swagger.io/ can be found [here][3]
|
An example application using the auto-generated haskell-http-client bindings for the server http://petstore.swagger.io/ can be found [here][3]
|
||||||
|
|
||||||
[3]: https://github.com/jonschoning/swagger-codegen/tree/haskell-http-client/samples/client/petstore/haskell-http-client/example-app
|
[3]: https://github.com/swagger-api/swagger-codegen/tree/c7d145a4ba3c0627e04ece9eb97e354ac91be821/samples/client/petstore/haskell-http-client/example-app
|
||||||
|
|
||||||
### Usage Notes
|
### Usage Notes
|
||||||
|
|
||||||
@@ -103,22 +103,23 @@ This library is intended to be imported qualified.
|
|||||||
| {{title}}.API | construct requetss |
|
| {{title}}.API | construct requetss |
|
||||||
| {{title}}.Model | describes models |
|
| {{title}}.Model | describes models |
|
||||||
| {{title}}.MimeTypes | encoding/decoding MIME types (content-types/accept) |
|
| {{title}}.MimeTypes | encoding/decoding MIME types (content-types/accept) |
|
||||||
| {{title}}.Lens | lenses & traversals for model fields |
|
| {{title}}.Lens | lenses for model fields |
|
||||||
|
|
||||||
This library adds type safety around what swagger specifies as
|
This library adds type safety around what swagger specifies as
|
||||||
Produces and Consumes for each Operation (e.g. the list of MIME types an
|
Produces and Consumes for each Operation (e.g. the list of MIME types an
|
||||||
Operation can Produce (using 'accept' headers) and Consume (using 'content-type' headers).
|
Operation can Produce (using 'accept' headers) and Consume (using 'content-type' headers).
|
||||||
|
|
||||||
For example, if there is an Operation named _addFoo_, there will be a
|
For example, if there is an Operation named _addFoo_, there will be a
|
||||||
data type generated named _AddFoo_ (note the capitalization) which
|
data type generated named _AddFoo_ (note the capitalization), which
|
||||||
describes additional constraints and actions on the _addFoo_
|
describes additional constraints and actions on the _addFoo_ operation
|
||||||
operation, which can be viewed in GHCi or via the Haddocks.
|
via its typeclass instances. These typeclass instances can be viewed
|
||||||
|
in GHCi or via the Haddocks.
|
||||||
|
|
||||||
* requried parameters are included as function arguments to _addFoo_
|
* requried parameters are included as function arguments to _addFoo_
|
||||||
* optional non-body parameters are included by using `applyOptionalParam`
|
* optional non-body parameters are included by using `applyOptionalParam`
|
||||||
* optional body parameters are set by using `setBodyParam`
|
* optional body parameters are set by using `setBodyParam`
|
||||||
|
|
||||||
Example for pretend _addFoo_ operation:
|
Example code generated for pretend _addFoo_ operation:
|
||||||
|
|
||||||
```haskell
|
```haskell
|
||||||
data AddFoo
|
data AddFoo
|
||||||
|
|||||||
@@ -63,10 +63,10 @@ These options allow some customization of the code generation process.
|
|||||||
**haskell-http-client specific options:**
|
**haskell-http-client specific options:**
|
||||||
|
|
||||||
| OPTION | DESCRIPTION | DEFAULT | ACTUAL |
|
| OPTION | DESCRIPTION | DEFAULT | ACTUAL |
|
||||||
| ------------------------------- | ----------------------------------------------------------------------------------------------------------------------------- | -------- | ----------------------------------- |
|
| ------------------------------- | ----------------------------------------------------------------------------------------------------------------------------- | -------- | ------------------------------------- |
|
||||||
| allowFromJsonNulls | allow JSON Null during model decoding from JSON | true | true |
|
| allowFromJsonNulls | allow JSON Null during model decoding from JSON | true | true |
|
||||||
| allowToJsonNulls | allow emitting JSON Null during model encoding to JSON | false | false |
|
| allowToJsonNulls | allow emitting JSON Null during model encoding to JSON | false | false |
|
||||||
| dateFormat | format string used to parse/render a date | %Y-%m-%d | |
|
| dateFormat | format string used to parse/render a date | %Y-%m-%d | %Y-%m-%d |
|
||||||
| dateTimeFormat | format string used to parse/render a datetime. (Defaults to [formatISO8601Millis][1] when not provided) | | |
|
| dateTimeFormat | format string used to parse/render a datetime. (Defaults to [formatISO8601Millis][1] when not provided) | | |
|
||||||
| generateFormUrlEncodedInstances | Generate FromForm/ToForm instances for models used by x-www-form-urlencoded operations (model fields must be primitive types) | true | true |
|
| generateFormUrlEncodedInstances | Generate FromForm/ToForm instances for models used by x-www-form-urlencoded operations (model fields must be primitive types) | true | true |
|
||||||
| generateLenses | Generate Lens optics for Models | true | true |
|
| generateLenses | Generate Lens optics for Models | true | true |
|
||||||
@@ -85,13 +85,13 @@ java -jar modules/swagger-codegen-cli/target/swagger-codegen-cli.jar config-help
|
|||||||
|
|
||||||
An example of the generated haddock documentation targeting the server http://petstore.swagger.io/ (SwaggerPetstore) can be found [here][2]
|
An example of the generated haddock documentation targeting the server http://petstore.swagger.io/ (SwaggerPetstore) can be found [here][2]
|
||||||
|
|
||||||
[2]: https://jonschoning.github.io/swaggerpetstore-haskell-http-client/
|
[2]: https://hackage.haskell.org/package/swagger-petstore
|
||||||
|
|
||||||
### Example SwaggerPetstore App
|
### Example SwaggerPetstore App
|
||||||
|
|
||||||
An example application using the auto-generated haskell-http-client bindings for the server http://petstore.swagger.io/ can be found [here][3]
|
An example application using the auto-generated haskell-http-client bindings for the server http://petstore.swagger.io/ can be found [here][3]
|
||||||
|
|
||||||
[3]: https://github.com/jonschoning/swagger-codegen/tree/haskell-http-client/samples/client/petstore/haskell-http-client/example-app
|
[3]: https://github.com/swagger-api/swagger-codegen/tree/c7d145a4ba3c0627e04ece9eb97e354ac91be821/samples/client/petstore/haskell-http-client/example-app
|
||||||
|
|
||||||
### Usage Notes
|
### Usage Notes
|
||||||
|
|
||||||
@@ -103,22 +103,23 @@ This library is intended to be imported qualified.
|
|||||||
| SwaggerPetstore.API | construct requetss |
|
| SwaggerPetstore.API | construct requetss |
|
||||||
| SwaggerPetstore.Model | describes models |
|
| SwaggerPetstore.Model | describes models |
|
||||||
| SwaggerPetstore.MimeTypes | encoding/decoding MIME types (content-types/accept) |
|
| SwaggerPetstore.MimeTypes | encoding/decoding MIME types (content-types/accept) |
|
||||||
| SwaggerPetstore.Lens | lenses & traversals for model fields |
|
| SwaggerPetstore.Lens | lenses for model fields |
|
||||||
|
|
||||||
This library adds type safety around what swagger specifies as
|
This library adds type safety around what swagger specifies as
|
||||||
Produces and Consumes for each Operation (e.g. the list of MIME types an
|
Produces and Consumes for each Operation (e.g. the list of MIME types an
|
||||||
Operation can Produce (using 'accept' headers) and Consume (using 'content-type' headers).
|
Operation can Produce (using 'accept' headers) and Consume (using 'content-type' headers).
|
||||||
|
|
||||||
For example, if there is an Operation named _addFoo_, there will be a
|
For example, if there is an Operation named _addFoo_, there will be a
|
||||||
data type generated named _AddFoo_ (note the capitalization) which
|
data type generated named _AddFoo_ (note the capitalization), which
|
||||||
describes additional constraints and actions on the _addFoo_
|
describes additional constraints and actions on the _addFoo_ operation
|
||||||
operation, which can be viewed in GHCi or via the Haddocks.
|
via its typeclass instances. These typeclass instances can be viewed
|
||||||
|
in GHCi or via the Haddocks.
|
||||||
|
|
||||||
* requried parameters are included as function arguments to _addFoo_
|
* requried parameters are included as function arguments to _addFoo_
|
||||||
* optional non-body parameters are included by using `applyOptionalParam`
|
* optional non-body parameters are included by using `applyOptionalParam`
|
||||||
* optional body parameters are set by using `setBodyParam`
|
* optional body parameters are set by using `setBodyParam`
|
||||||
|
|
||||||
Example for pretend _addFoo_ operation:
|
Example code generated for pretend _addFoo_ operation:
|
||||||
|
|
||||||
```haskell
|
```haskell
|
||||||
data AddFoo
|
data AddFoo
|
||||||
|
|||||||
@@ -1,31 +0,0 @@
|
|||||||
#!/bin/bash
|
|
||||||
set -e
|
|
||||||
|
|
||||||
cabal_file=$(find . -maxdepth 1 -name "*.cabal" -print -quit)
|
|
||||||
|
|
||||||
if [ ! -f "$cabal_file" ]; then
|
|
||||||
echo "Run this script in the top-level package directory"
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
pkg=$(awk -F ":[[:space:]]*" 'tolower($1)=="name" { print $2 }' < "$cabal_file")
|
|
||||||
ver=$(awk -F ":[[:space:]]*" 'tolower($1)=="version" { print $2 }' < "$cabal_file")
|
|
||||||
|
|
||||||
if [ -z "$pkg" ]; then
|
|
||||||
echo "Unable to determine package name"
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
if [ -z "$ver" ]; then
|
|
||||||
echo "Unable to determine package version"
|
|
||||||
exit 1
|
|
||||||
fi
|
|
||||||
|
|
||||||
echo "Detected package: $pkg-$ver"
|
|
||||||
|
|
||||||
cabal haddock --hyperlink-source --html-location='https://www.stackage.org/haddock/nightly-2017-08-25/$pkg-$version' --contents-location='https://www.stackage.org/nightly-2017-08-25/package/$pkg-$version'
|
|
||||||
|
|
||||||
dir="build-docs"
|
|
||||||
trap 'rm -r "$dir"' EXIT
|
|
||||||
mkdir -p $dir
|
|
||||||
cp -R dist/doc/html/$pkg/ $dir/$pkg-$ver-docs
|
|
||||||
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,4 +1,4 @@
|
|||||||
<!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>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - A)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
<!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>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - A)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||||
window.onload = function () {pageLoad();};
|
window.onload = function () {pageLoad();};
|
||||||
//]]>
|
//]]>
|
||||||
</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">swagger-petstore-0.1.0.0: Auto-generated swagger-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-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-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-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 - A</p><table><tr><td class="src">AdditionalMetadata</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:AdditionalMetadata">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:AdditionalMetadata">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">AddPet</td><td class="module"><a href="SwaggerPetstore-API.html#t:AddPet">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">addPet</td><td class="module"><a href="SwaggerPetstore-API.html#v:addPet">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">ApiResponse</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:ApiResponse">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:ApiResponse">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseCode</td><td class="module"><a href="SwaggerPetstore-Model.html#v:apiResponseCode">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseCodeT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:apiResponseCodeT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseMessage</td><td class="module"><a href="SwaggerPetstore-Model.html#v:apiResponseMessage">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseMessageT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:apiResponseMessageT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseType</td><td class="module"><a href="SwaggerPetstore-Model.html#v:apiResponseType">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseTypeT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:apiResponseTypeT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">ApiUnderscorekey</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:ApiUnderscorekey">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:ApiUnderscorekey">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">applyOptionalParam</td><td class="module"><a href="SwaggerPetstore-API.html#v:applyOptionalParam">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
|
</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">swagger-petstore-0.1.0.0: Auto-generated swagger-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-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-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-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 - A</p><table><tr><td class="src">AdditionalMetadata</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:AdditionalMetadata">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:AdditionalMetadata">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">AddPet</td><td class="module"><a href="SwaggerPetstore-API.html#t:AddPet">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">addPet</td><td class="module"><a href="SwaggerPetstore-API.html#v:addPet">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">ApiResponse</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:ApiResponse">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:ApiResponse">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseCode</td><td class="module"><a href="SwaggerPetstore-Model.html#v:apiResponseCode">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseCodeL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:apiResponseCodeL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseMessage</td><td class="module"><a href="SwaggerPetstore-Model.html#v:apiResponseMessage">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseMessageL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:apiResponseMessageL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseType</td><td class="module"><a href="SwaggerPetstore-Model.html#v:apiResponseType">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">apiResponseTypeL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:apiResponseTypeL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">ApiUnderscorekey</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-API.html#t:ApiUnderscorekey">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-API.html#v:ApiUnderscorekey">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">applyOptionalParam</td><td class="module"><a href="SwaggerPetstore-API.html#v:applyOptionalParam">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
|
||||||
File diff suppressed because one or more lines are too long
@@ -1,4 +1,4 @@
|
|||||||
<!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>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - C)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
<!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>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - C)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||||
window.onload = function () {pageLoad();};
|
window.onload = function () {pageLoad();};
|
||||||
//]]>
|
//]]>
|
||||||
</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">swagger-petstore-0.1.0.0: Auto-generated swagger-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-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-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-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 - C</p><table><tr><td class="src">Category</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Category">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Category">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">categoryId</td><td class="module"><a href="SwaggerPetstore-Model.html#v:categoryId">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">categoryIdT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:categoryIdT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">categoryName</td><td class="module"><a href="SwaggerPetstore-Model.html#v:categoryName">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">categoryNameT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:categoryNameT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">CollectionFormat</td><td class="module"><a href="SwaggerPetstore-API.html#t:CollectionFormat">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">CommaSeparated</td><td class="module"><a href="SwaggerPetstore-API.html#v:CommaSeparated">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">configExecLoggingT</td><td class="module"><a href="SwaggerPetstore-Client.html#v:configExecLoggingT">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">configHost</td><td class="module"><a href="SwaggerPetstore-Client.html#v:configHost">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">configLoggingFilter</td><td class="module"><a href="SwaggerPetstore-Client.html#v:configLoggingFilter">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">configUserAgent</td><td class="module"><a href="SwaggerPetstore-Client.html#v:configUserAgent">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">Consumes</td><td class="module"><a href="SwaggerPetstore-MimeTypes.html#t:Consumes">SwaggerPetstore.MimeTypes</a>, SwaggerPetstore</td></tr><tr><td class="src">CreateUser</td><td class="module"><a href="SwaggerPetstore-API.html#t:CreateUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">createUser</td><td class="module"><a href="SwaggerPetstore-API.html#v:createUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">CreateUsersWithArrayInput</td><td class="module"><a href="SwaggerPetstore-API.html#t:CreateUsersWithArrayInput">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">createUsersWithArrayInput</td><td class="module"><a href="SwaggerPetstore-API.html#v:createUsersWithArrayInput">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">CreateUsersWithListInput</td><td class="module"><a href="SwaggerPetstore-API.html#t:CreateUsersWithListInput">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">createUsersWithListInput</td><td class="module"><a href="SwaggerPetstore-API.html#v:createUsersWithListInput">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
|
</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">swagger-petstore-0.1.0.0: Auto-generated swagger-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-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-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-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 - C</p><table><tr><td class="src">Category</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Category">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Category">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">categoryId</td><td class="module"><a href="SwaggerPetstore-Model.html#v:categoryId">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">categoryIdL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:categoryIdL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">categoryName</td><td class="module"><a href="SwaggerPetstore-Model.html#v:categoryName">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">categoryNameL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:categoryNameL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">CollectionFormat</td><td class="module"><a href="SwaggerPetstore-API.html#t:CollectionFormat">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">CommaSeparated</td><td class="module"><a href="SwaggerPetstore-API.html#v:CommaSeparated">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">configExecLoggingT</td><td class="module"><a href="SwaggerPetstore-Client.html#v:configExecLoggingT">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">configHost</td><td class="module"><a href="SwaggerPetstore-Client.html#v:configHost">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">configLoggingFilter</td><td class="module"><a href="SwaggerPetstore-Client.html#v:configLoggingFilter">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">configUserAgent</td><td class="module"><a href="SwaggerPetstore-Client.html#v:configUserAgent">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">Consumes</td><td class="module"><a href="SwaggerPetstore-MimeTypes.html#t:Consumes">SwaggerPetstore.MimeTypes</a>, SwaggerPetstore</td></tr><tr><td class="src">CreateUser</td><td class="module"><a href="SwaggerPetstore-API.html#t:CreateUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">createUser</td><td class="module"><a href="SwaggerPetstore-API.html#v:createUser">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">CreateUsersWithArrayInput</td><td class="module"><a href="SwaggerPetstore-API.html#t:CreateUsersWithArrayInput">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">createUsersWithArrayInput</td><td class="module"><a href="SwaggerPetstore-API.html#v:createUsersWithArrayInput">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">CreateUsersWithListInput</td><td class="module"><a href="SwaggerPetstore-API.html#t:CreateUsersWithListInput">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">createUsersWithListInput</td><td class="module"><a href="SwaggerPetstore-API.html#v:createUsersWithListInput">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
|
||||||
@@ -1,4 +1,4 @@
|
|||||||
<!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>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - O)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
<!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>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - O)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||||
window.onload = function () {pageLoad();};
|
window.onload = function () {pageLoad();};
|
||||||
//]]>
|
//]]>
|
||||||
</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">swagger-petstore-0.1.0.0: Auto-generated swagger-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-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-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-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 - O</p><table><tr><td class="src">Order</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Order">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Order">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderComplete</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderComplete">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderCompleteT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderCompleteT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderId</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderId">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderIdT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderIdT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderPetId</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderPetId">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderPetIdT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderPetIdT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderQuantity</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderQuantity">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderQuantityT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderQuantityT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderShipDate</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderShipDate">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderShipDateT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderShipDateT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderStatus</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderStatus">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderStatusT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderStatusT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
|
</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">swagger-petstore-0.1.0.0: Auto-generated swagger-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-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-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-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 - O</p><table><tr><td class="src">Order</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Order">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Order">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderComplete</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderComplete">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderCompleteL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderCompleteL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderId</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderId">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderIdL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderIdL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderPetId</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderPetId">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderPetIdL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderPetIdL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderQuantity</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderQuantity">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderQuantityL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderQuantityL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderShipDate</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderShipDate">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderShipDateL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderShipDateL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">orderStatus</td><td class="module"><a href="SwaggerPetstore-Model.html#v:orderStatus">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">orderStatusL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:orderStatusL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
|
||||||
File diff suppressed because one or more lines are too long
@@ -1,4 +1,4 @@
|
|||||||
<!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>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - T)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
<!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>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client (Index - T)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||||
window.onload = function () {pageLoad();};
|
window.onload = function () {pageLoad();};
|
||||||
//]]>
|
//]]>
|
||||||
</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">swagger-petstore-0.1.0.0: Auto-generated swagger-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-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-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-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 - T</p><table><tr><td class="src">TabSeparated</td><td class="module"><a href="SwaggerPetstore-API.html#v:TabSeparated">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">Tag</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Tag">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Tag">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">tagId</td><td class="module"><a href="SwaggerPetstore-Model.html#v:tagId">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">tagIdT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:tagIdT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">tagName</td><td class="module"><a href="SwaggerPetstore-Model.html#v:tagName">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">tagNameT</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:tagNameT">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">toForm</td><td class="module"><a href="SwaggerPetstore-API.html#v:toForm">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toFormColl</td><td class="module"><a href="SwaggerPetstore-API.html#v:toFormColl">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toHeader</td><td class="module"><a href="SwaggerPetstore-API.html#v:toHeader">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toHeaderColl</td><td class="module"><a href="SwaggerPetstore-API.html#v:toHeaderColl">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toPath</td><td class="module"><a href="SwaggerPetstore-API.html#v:toPath">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toQuery</td><td class="module"><a href="SwaggerPetstore-API.html#v:toQuery">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toQueryColl</td><td class="module"><a href="SwaggerPetstore-API.html#v:toQueryColl">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">Traversal_</td><td class="module"><a href="SwaggerPetstore-Lens.html#t:Traversal_">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">Traversal_'</td><td class="module"><a href="SwaggerPetstore-Lens.html#t:Traversal_-39-">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
|
</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">swagger-petstore-0.1.0.0: Auto-generated swagger-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-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-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-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 - T</p><table><tr><td class="src">TabSeparated</td><td class="module"><a href="SwaggerPetstore-API.html#v:TabSeparated">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">Tag</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Tag">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Tag">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">tagId</td><td class="module"><a href="SwaggerPetstore-Model.html#v:tagId">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">tagIdL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:tagIdL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">tagName</td><td class="module"><a href="SwaggerPetstore-Model.html#v:tagName">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">tagNameL</td><td class="module"><a href="SwaggerPetstore-Lens.html#v:tagNameL">SwaggerPetstore.Lens</a>, SwaggerPetstore</td></tr><tr><td class="src">toForm</td><td class="module"><a href="SwaggerPetstore-API.html#v:toForm">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toFormColl</td><td class="module"><a href="SwaggerPetstore-API.html#v:toFormColl">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toHeader</td><td class="module"><a href="SwaggerPetstore-API.html#v:toHeader">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toHeaderColl</td><td class="module"><a href="SwaggerPetstore-API.html#v:toHeaderColl">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toPath</td><td class="module"><a href="SwaggerPetstore-API.html#v:toPath">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toQuery</td><td class="module"><a href="SwaggerPetstore-API.html#v:toQuery">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr><tr><td class="src">toQueryColl</td><td class="module"><a href="SwaggerPetstore-API.html#v:toQueryColl">SwaggerPetstore.API</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.17.3</p></div></body></html>
|
||||||
File diff suppressed because one or more lines are too long
@@ -1,4 +1,4 @@
|
|||||||
<!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>SwaggerPetstore.Lens</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
<!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>SwaggerPetstore.Lens</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||||
window.onload = function () {pageLoad();};
|
window.onload = function () {pageLoad();};
|
||||||
//]]>
|
//]]>
|
||||||
</script></head><body id="mini"><div id="module-header"><p class="caption">SwaggerPetstore.Lens</p></div><div id="interface"><h1>Type Aliases</h1><div class="top"><p class="src"><span class="keyword">type</span> <a href="SwaggerPetstore-Lens.html#t:Traversal_-39-" target="main">Traversal_'</a> s a</p></div><div class="top"><p class="src"><span class="keyword">type</span> <a href="SwaggerPetstore-Lens.html#t:Traversal_" target="main">Traversal_</a> s t a b</p></div><div class="top"><p class="src"><span class="keyword">type</span> <a href="SwaggerPetstore-Lens.html#t:Lens_-39-" target="main">Lens_'</a> s a</p></div><div class="top"><p class="src"><span class="keyword">type</span> <a href="SwaggerPetstore-Lens.html#t:Lens_" target="main">Lens_</a> s t a b</p></div><h1>ApiResponse</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:apiResponseCodeT" target="main">apiResponseCodeT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:apiResponseTypeT" target="main">apiResponseTypeT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:apiResponseMessageT" target="main">apiResponseMessageT</a></p></div><h1>Category</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:categoryIdT" target="main">categoryIdT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:categoryNameT" target="main">categoryNameT</a></p></div><h1>Order</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderIdT" target="main">orderIdT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderPetIdT" target="main">orderPetIdT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderQuantityT" target="main">orderQuantityT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderShipDateT" target="main">orderShipDateT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderStatusT" target="main">orderStatusT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderCompleteT" target="main">orderCompleteT</a></p></div><h1>Pet</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petIdT" target="main">petIdT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petCategoryT" target="main">petCategoryT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petNameL" target="main">petNameL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petPhotoUrlsL" target="main">petPhotoUrlsL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petTagsT" target="main">petTagsT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petStatusT" target="main">petStatusT</a></p></div><h1>Tag</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:tagIdT" target="main">tagIdT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:tagNameT" target="main">tagNameT</a></p></div><h1>User</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userIdT" target="main">userIdT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userUsernameT" target="main">userUsernameT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userFirstNameT" target="main">userFirstNameT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userLastNameT" target="main">userLastNameT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userEmailT" target="main">userEmailT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userPasswordT" target="main">userPasswordT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userPhoneT" target="main">userPhoneT</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userUserStatusT" target="main">userUserStatusT</a></p></div><h1>Helpers</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:_mtraversal" target="main">_mtraversal</a></p></div></div></body></html>
|
</script></head><body id="mini"><div id="module-header"><p class="caption">SwaggerPetstore.Lens</p></div><div id="interface"><h1>Type Aliases</h1><div class="top"><p class="src"><span class="keyword">type</span> <a href="SwaggerPetstore-Lens.html#t:Lens_-39-" target="main">Lens_'</a> s a</p></div><div class="top"><p class="src"><span class="keyword">type</span> <a href="SwaggerPetstore-Lens.html#t:Lens_" target="main">Lens_</a> s t a b</p></div><h1>ApiResponse</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:apiResponseCodeL" target="main">apiResponseCodeL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:apiResponseTypeL" target="main">apiResponseTypeL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:apiResponseMessageL" target="main">apiResponseMessageL</a></p></div><h1>Category</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:categoryIdL" target="main">categoryIdL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:categoryNameL" target="main">categoryNameL</a></p></div><h1>Order</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderIdL" target="main">orderIdL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderPetIdL" target="main">orderPetIdL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderQuantityL" target="main">orderQuantityL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderShipDateL" target="main">orderShipDateL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderStatusL" target="main">orderStatusL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:orderCompleteL" target="main">orderCompleteL</a></p></div><h1>Pet</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petIdL" target="main">petIdL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petCategoryL" target="main">petCategoryL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petNameL" target="main">petNameL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petPhotoUrlsL" target="main">petPhotoUrlsL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petTagsL" target="main">petTagsL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:petStatusL" target="main">petStatusL</a></p></div><h1>Tag</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:tagIdL" target="main">tagIdL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:tagNameL" target="main">tagNameL</a></p></div><h1>User</h1><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userIdL" target="main">userIdL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userUsernameL" target="main">userUsernameL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userFirstNameL" target="main">userFirstNameL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userLastNameL" target="main">userLastNameL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userEmailL" target="main">userEmailL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userPasswordL" target="main">userPasswordL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userPhoneL" target="main">userPhoneL</a></p></div><div class="top"><p class="src"><a href="SwaggerPetstore-Lens.html#v:userUserStatusL" target="main">userUserStatusL</a></p></div></div></body></html>
|
||||||
@@ -15,7 +15,7 @@
|
|||||||
</span><a name="line-15"></a><span class="hs-cpp">#if defined(VERSION_base)</span><span>
|
</span><a name="line-15"></a><span class="hs-cpp">#if defined(VERSION_base)</span><span>
|
||||||
</span><a name="line-16"></a><span>
|
</span><a name="line-16"></a><span>
|
||||||
</span><a name="line-17"></a><span class="hs-cpp">#if MIN_VERSION_base(4,0,0)</span><span>
|
</span><a name="line-17"></a><span class="hs-cpp">#if MIN_VERSION_base(4,0,0)</span><span>
|
||||||
</span><a name="line-18"></a><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-6989586621679142330"><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</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">IOException</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679142330"><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-6989586621679142330"><span class="hs-identifier hs-type">a</span></a><span>
|
</span><a name="line-18"></a><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-6989586621679142201"><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</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">IOException</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679142201"><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-6989586621679142201"><span class="hs-identifier hs-type">a</span></a><span>
|
||||||
</span><a name="line-19"></a><span class="hs-cpp">#else</span><span>
|
</span><a name="line-19"></a><span class="hs-cpp">#else</span><span>
|
||||||
</span><a name="line-20"></a><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</span><span class="hs-operator">.</span><span class="hs-identifier">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-20"></a><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</span><span class="hs-operator">.</span><span class="hs-identifier">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-21"></a><span class="hs-cpp">#endif</span><span>
|
||||||
@@ -45,7 +45,7 @@
|
|||||||
</span><a name="line-45"></a><a name="getSysconfDir"><a href="Paths_swagger_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_swagger_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">"swagger_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_swagger_petstore.html#sysconfdir"><span class="hs-identifier hs-var">sysconfdir</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-45"></a><a name="getSysconfDir"><a href="Paths_swagger_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_swagger_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">"swagger_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_swagger_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-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-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_swagger_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></a><span> </span><a name="local-6989586621679142656"><a href="#local-6989586621679142656"><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-48"></a><a name="getDataFileName"><a href="Paths_swagger_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></a><span> </span><a name="local-6989586621679142527"><a href="#local-6989586621679142527"><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-6989586621679142657"><a href="#local-6989586621679142657"><span class="hs-identifier">dir</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="Paths_swagger_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a><span>
|
</span><a name="line-49"></a><span> </span><a name="local-6989586621679142528"><a href="#local-6989586621679142528"><span class="hs-identifier">dir</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="Paths_swagger_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-6989586621679142657"><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-6989586621679142656"><span class="hs-identifier hs-var">name</span></a><span class="hs-special">)</span><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-6989586621679142528"><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-6989586621679142527"><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><a name="line-51"></a></pre></body></html>
|
||||||
@@ -79,13 +79,13 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-79"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
</span><a name="line-79"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||||
</span><a name="line-80"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-80"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-81"></a><span class="hs-identifier">addPet</span><span> </span><span>
|
</span><a name="line-81"></a><span class="hs-identifier">addPet</span><span> </span><span>
|
||||||
</span><a name="line-82"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679096578"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096578"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-82"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679096448"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096448"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-83"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096578"><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-83"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096448"><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-84"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-comment">-- ^ "body" - Pet object that needs to be added to the store</span><span>
|
</span><a name="line-84"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-comment">-- ^ "body" - Pet object that needs to be added to the store</span><span>
|
||||||
</span><a name="line-85"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679096578"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096579"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-85"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679096448"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096449"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-86"></a><a name="addPet"><a href="SwaggerPetstore.API.html#addPet"><span class="hs-identifier">addPet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096580"><a href="#local-6989586621679096580"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-86"></a><a name="addPet"><a href="SwaggerPetstore.API.html#addPet"><span class="hs-identifier">addPet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096450"><a href="#local-6989586621679096450"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-87"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet"</span><span class="hs-special">]</span><span>
|
</span><a name="line-87"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet"</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-88"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096580"><span class="hs-identifier hs-var">body</span></a><span>
|
</span><a name="line-88"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096450"><span class="hs-identifier hs-var">body</span></a><span>
|
||||||
</span><a name="line-89"></a><span>
|
</span><a name="line-89"></a><span>
|
||||||
</span><a name="line-90"></a><span class="hs-keyword">data</span><span> </span><a name="AddPet"><a href="SwaggerPetstore.API.html#AddPet"><span class="hs-identifier">AddPet</span></a></a><span> </span><span>
|
</span><a name="line-90"></a><span class="hs-keyword">data</span><span> </span><a name="AddPet"><a href="SwaggerPetstore.API.html#AddPet"><span class="hs-identifier">AddPet</span></a></a><span> </span><span>
|
||||||
</span><a name="line-91"></a><span>
|
</span><a name="line-91"></a><span>
|
||||||
@@ -117,15 +117,15 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-117"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-117"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-118"></a><span class="hs-identifier">deletePet</span><span> </span><span>
|
</span><a name="line-118"></a><span class="hs-identifier">deletePet</span><span> </span><span>
|
||||||
</span><a name="line-119"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "petId" - Pet id to delete</span><span>
|
</span><a name="line-119"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "petId" - Pet id to delete</span><span>
|
||||||
</span><a name="line-120"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="#local-6989586621679096577"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-120"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="#local-6989586621679096447"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-121"></a><a name="deletePet"><a href="SwaggerPetstore.API.html#deletePet"><span class="hs-identifier">deletePet</span></a></a><span> </span><a name="local-6989586621679096581"><a href="#local-6989586621679096581"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-121"></a><a name="deletePet"><a href="SwaggerPetstore.API.html#deletePet"><span class="hs-identifier">deletePet</span></a></a><span> </span><a name="local-6989586621679096451"><a href="#local-6989586621679096451"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-122"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096581"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-122"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096451"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-123"></a><span> </span><span>
|
</span><a name="line-123"></a><span> </span><span>
|
||||||
</span><a name="line-124"></a><span>
|
</span><a name="line-124"></a><span>
|
||||||
</span><a name="line-125"></a><span class="hs-keyword">data</span><span> </span><a name="DeletePet"><a href="SwaggerPetstore.API.html#DeletePet"><span class="hs-identifier">DeletePet</span></a></a><span> </span><span>
|
</span><a name="line-125"></a><span class="hs-keyword">data</span><span> </span><a name="DeletePet"><a href="SwaggerPetstore.API.html#DeletePet"><span class="hs-identifier">DeletePet</span></a></a><span> </span><span>
|
||||||
</span><a name="line-126"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.API.html#ApiUnderscorekey"><span class="hs-identifier hs-type">ApiUnderscorekey</span></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-126"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.API.html#ApiUnderscorekey"><span class="hs-identifier hs-type">ApiUnderscorekey</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-127"></a><span> </span><a name="local-8214565720323870210"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096899"><a href="#local-6989586621679096899"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#ApiUnderscorekey"><span class="hs-identifier hs-var">ApiUnderscorekey</span></a><span> </span><a name="local-6989586621679096900"><a href="#local-6989586621679096900"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-127"></a><span> </span><a name="local-8214565720323870080"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096769"><a href="#local-6989586621679096769"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#ApiUnderscorekey"><span class="hs-identifier hs-var">ApiUnderscorekey</span></a><span> </span><a name="local-6989586621679096770"><a href="#local-6989586621679096770"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-128"></a><span> </span><a href="#local-6989586621679096899"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"api_key"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096900"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-128"></a><span> </span><a href="#local-6989586621679096769"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"api_key"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096770"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-129"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
</span><a name="line-129"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||||
</span><a name="line-130"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
</span><a name="line-130"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||||
</span><a name="line-131"></a><span class="hs-comment">-- | @application/json@</span><span>
|
</span><a name="line-131"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||||
@@ -145,9 +145,9 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-145"></a><span class="hs-identifier">findPetsByStatus</span><span> </span><span>
|
</span><a name="line-145"></a><span class="hs-identifier">findPetsByStatus</span><span> </span><span>
|
||||||
</span><a name="line-146"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ "status" - Status values that need to be considered for filter</span><span>
|
</span><a name="line-146"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ "status" - Status values that need to be considered for filter</span><span>
|
||||||
</span><a name="line-147"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-147"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-148"></a><a name="findPetsByStatus"><a href="SwaggerPetstore.API.html#findPetsByStatus"><span class="hs-identifier">findPetsByStatus</span></a></a><span> </span><a name="local-6989586621679096582"><a href="#local-6989586621679096582"><span class="hs-identifier">status</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-148"></a><a name="findPetsByStatus"><a href="SwaggerPetstore.API.html#findPetsByStatus"><span class="hs-identifier">findPetsByStatus</span></a></a><span> </span><a name="local-6989586621679096452"><a href="#local-6989586621679096452"><span class="hs-identifier">status</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-149"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/findByStatus"</span><span class="hs-special">]</span><span>
|
</span><a name="line-149"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/findByStatus"</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-150"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier hs-var">_setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.API.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"status"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679096582"><span class="hs-identifier hs-var">status</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-150"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier hs-var">_setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.API.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"status"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679096452"><span class="hs-identifier hs-var">status</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-151"></a><span>
|
</span><a name="line-151"></a><span>
|
||||||
</span><a name="line-152"></a><span class="hs-keyword">data</span><span> </span><a name="FindPetsByStatus"><a href="SwaggerPetstore.API.html#FindPetsByStatus"><span class="hs-identifier">FindPetsByStatus</span></a></a><span> </span><span>
|
</span><a name="line-152"></a><span class="hs-keyword">data</span><span> </span><a name="FindPetsByStatus"><a href="SwaggerPetstore.API.html#FindPetsByStatus"><span class="hs-identifier">FindPetsByStatus</span></a></a><span> </span><span>
|
||||||
</span><a name="line-153"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
</span><a name="line-153"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||||
@@ -169,9 +169,9 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-169"></a><span class="hs-identifier">findPetsByTags</span><span> </span><span>
|
</span><a name="line-169"></a><span class="hs-identifier">findPetsByTags</span><span> </span><span>
|
||||||
</span><a name="line-170"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ "tags" - Tags to filter by</span><span>
|
</span><a name="line-170"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ "tags" - Tags to filter by</span><span>
|
||||||
</span><a name="line-171"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-171"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-172"></a><a name="findPetsByTags"><a href="SwaggerPetstore.API.html#findPetsByTags"><span class="hs-identifier">findPetsByTags</span></a></a><span> </span><a name="local-6989586621679096583"><a href="#local-6989586621679096583"><span class="hs-identifier">tags</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-172"></a><a name="findPetsByTags"><a href="SwaggerPetstore.API.html#findPetsByTags"><span class="hs-identifier">findPetsByTags</span></a></a><span> </span><a name="local-6989586621679096453"><a href="#local-6989586621679096453"><span class="hs-identifier">tags</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-173"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/findByTags"</span><span class="hs-special">]</span><span>
|
</span><a name="line-173"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/findByTags"</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-174"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier hs-var">_setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.API.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"tags"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679096583"><span class="hs-identifier hs-var">tags</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-174"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier hs-var">_setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.API.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"tags"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679096453"><span class="hs-identifier hs-var">tags</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-175"></a><span>
|
</span><a name="line-175"></a><span>
|
||||||
</span><a name="line-176"></a><span class="hs-pragma">{-# DEPRECATED findPetsByTags "" #-}</span><span>
|
</span><a name="line-176"></a><span class="hs-pragma">{-# DEPRECATED findPetsByTags "" #-}</span><span>
|
||||||
</span><a name="line-177"></a><span>
|
</span><a name="line-177"></a><span>
|
||||||
@@ -195,8 +195,8 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-195"></a><span class="hs-identifier">getPetById</span><span> </span><span>
|
</span><a name="line-195"></a><span class="hs-identifier">getPetById</span><span> </span><span>
|
||||||
</span><a name="line-196"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet to return</span><span>
|
</span><a name="line-196"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet to return</span><span>
|
||||||
</span><a name="line-197"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span>
|
</span><a name="line-197"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span>
|
||||||
</span><a name="line-198"></a><a name="getPetById"><a href="SwaggerPetstore.API.html#getPetById"><span class="hs-identifier">getPetById</span></a></a><span> </span><a name="local-6989586621679096584"><a href="#local-6989586621679096584"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-198"></a><a name="getPetById"><a href="SwaggerPetstore.API.html#getPetById"><span class="hs-identifier">getPetById</span></a></a><span> </span><a name="local-6989586621679096454"><a href="#local-6989586621679096454"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-199"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096584"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-199"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096454"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-200"></a><span> </span><span>
|
</span><a name="line-200"></a><span> </span><span>
|
||||||
</span><a name="line-201"></a><span>
|
</span><a name="line-201"></a><span>
|
||||||
</span><a name="line-202"></a><span class="hs-keyword">data</span><span> </span><a name="GetPetById"><a href="SwaggerPetstore.API.html#GetPetById"><span class="hs-identifier">GetPetById</span></a></a><span> </span><span>
|
</span><a name="line-202"></a><span class="hs-keyword">data</span><span> </span><a name="GetPetById"><a href="SwaggerPetstore.API.html#GetPetById"><span class="hs-identifier">GetPetById</span></a></a><span> </span><span>
|
||||||
@@ -219,13 +219,13 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-219"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
</span><a name="line-219"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||||
</span><a name="line-220"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-220"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-221"></a><span class="hs-identifier">updatePet</span><span> </span><span>
|
</span><a name="line-221"></a><span class="hs-identifier">updatePet</span><span> </span><span>
|
||||||
</span><a name="line-222"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679096575"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096575"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-222"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679096445"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096445"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-223"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096575"><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-223"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096445"><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-224"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-comment">-- ^ "body" - Pet object that needs to be added to the store</span><span>
|
</span><a name="line-224"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-comment">-- ^ "body" - Pet object that needs to be added to the store</span><span>
|
||||||
</span><a name="line-225"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679096575"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096576"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-225"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679096445"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096446"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-226"></a><a name="updatePet"><a href="SwaggerPetstore.API.html#updatePet"><span class="hs-identifier">updatePet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096585"><a href="#local-6989586621679096585"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-226"></a><a name="updatePet"><a href="SwaggerPetstore.API.html#updatePet"><span class="hs-identifier">updatePet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096455"><a href="#local-6989586621679096455"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-227"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet"</span><span class="hs-special">]</span><span>
|
</span><a name="line-227"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet"</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-228"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096585"><span class="hs-identifier hs-var">body</span></a><span>
|
</span><a name="line-228"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096455"><span class="hs-identifier hs-var">body</span></a><span>
|
||||||
</span><a name="line-229"></a><span>
|
</span><a name="line-229"></a><span>
|
||||||
</span><a name="line-230"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePet"><a href="SwaggerPetstore.API.html#UpdatePet"><span class="hs-identifier">UpdatePet</span></a></a><span> </span><span>
|
</span><a name="line-230"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePet"><a href="SwaggerPetstore.API.html#UpdatePet"><span class="hs-identifier">UpdatePet</span></a></a><span> </span><span>
|
||||||
</span><a name="line-231"></a><span>
|
</span><a name="line-231"></a><span>
|
||||||
@@ -256,25 +256,25 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-256"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
</span><a name="line-256"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||||
</span><a name="line-257"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-257"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-258"></a><span class="hs-identifier">updatePetWithForm</span><span> </span><span>
|
</span><a name="line-258"></a><span class="hs-identifier">updatePetWithForm</span><span> </span><span>
|
||||||
</span><a name="line-259"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="#local-6989586621679096573"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-259"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="#local-6989586621679096443"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-260"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096573"><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-260"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096443"><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-261"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet that needs to be updated</span><span>
|
</span><a name="line-261"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet that needs to be updated</span><span>
|
||||||
</span><a name="line-262"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="#local-6989586621679096573"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096574"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-262"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="#local-6989586621679096443"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096444"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-263"></a><a name="updatePetWithForm"><a href="SwaggerPetstore.API.html#updatePetWithForm"><span class="hs-identifier">updatePetWithForm</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096586"><a href="#local-6989586621679096586"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-263"></a><a name="updatePetWithForm"><a href="SwaggerPetstore.API.html#updatePetWithForm"><span class="hs-identifier">updatePetWithForm</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096456"><a href="#local-6989586621679096456"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-264"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096586"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-264"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096456"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-265"></a><span> </span><span>
|
</span><a name="line-265"></a><span> </span><span>
|
||||||
</span><a name="line-266"></a><span>
|
</span><a name="line-266"></a><span>
|
||||||
</span><a name="line-267"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePetWithForm"><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier">UpdatePetWithForm</span></a></a><span> </span><span>
|
</span><a name="line-267"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePetWithForm"><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier">UpdatePetWithForm</span></a></a><span> </span><span>
|
||||||
</span><a name="line-268"></a><span>
|
</span><a name="line-268"></a><span>
|
||||||
</span><a name="line-269"></a><span class="hs-comment">-- | /Optional Param/ "name" - Updated name of the pet</span><span>
|
</span><a name="line-269"></a><span class="hs-comment">-- | /Optional Param/ "name" - Updated name of the pet</span><span>
|
||||||
</span><a name="line-270"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.API.html#Name"><span class="hs-identifier hs-type">Name</span></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-270"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.API.html#Name"><span class="hs-identifier hs-type">Name</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-271"></a><span> </span><a name="local-8214565720323870210"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096897"><a href="#local-6989586621679096897"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#Name"><span class="hs-identifier hs-var">Name</span></a><span> </span><a name="local-6989586621679096898"><a href="#local-6989586621679096898"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-271"></a><span> </span><a name="local-8214565720323870080"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096767"><a href="#local-6989586621679096767"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#Name"><span class="hs-identifier hs-var">Name</span></a><span> </span><a name="local-6989586621679096768"><a href="#local-6989586621679096768"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-272"></a><span> </span><a href="#local-6989586621679096897"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_addForm"><span class="hs-identifier hs-var">_addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"name"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096898"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-272"></a><span> </span><a href="#local-6989586621679096767"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_addForm"><span class="hs-identifier hs-var">_addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"name"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096768"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-273"></a><span>
|
</span><a name="line-273"></a><span>
|
||||||
</span><a name="line-274"></a><span class="hs-comment">-- | /Optional Param/ "status" - Updated status of the pet</span><span>
|
</span><a name="line-274"></a><span class="hs-comment">-- | /Optional Param/ "status" - Updated status of the pet</span><span>
|
||||||
</span><a name="line-275"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.API.html#Status"><span class="hs-identifier hs-type">Status</span></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-275"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.API.html#Status"><span class="hs-identifier hs-type">Status</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-276"></a><span> </span><a name="local-8214565720323870210"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096895"><a href="#local-6989586621679096895"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#Status"><span class="hs-identifier hs-var">Status</span></a><span> </span><a name="local-6989586621679096896"><a href="#local-6989586621679096896"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-276"></a><span> </span><a name="local-8214565720323870080"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096765"><a href="#local-6989586621679096765"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#Status"><span class="hs-identifier hs-var">Status</span></a><span> </span><a name="local-6989586621679096766"><a href="#local-6989586621679096766"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-277"></a><span> </span><a href="#local-6989586621679096895"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_addForm"><span class="hs-identifier hs-var">_addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"status"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096896"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-277"></a><span> </span><a href="#local-6989586621679096765"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_addForm"><span class="hs-identifier hs-var">_addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"status"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096766"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-278"></a><span>
|
</span><a name="line-278"></a><span>
|
||||||
</span><a name="line-279"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
</span><a name="line-279"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||||
</span><a name="line-280"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span>
|
</span><a name="line-280"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span>
|
||||||
@@ -296,25 +296,25 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-296"></a><span class="hs-comment">-- AuthMethod: petstore_auth</span><span>
|
</span><a name="line-296"></a><span class="hs-comment">-- AuthMethod: petstore_auth</span><span>
|
||||||
</span><a name="line-297"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-297"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-298"></a><span class="hs-identifier">uploadFile</span><span> </span><span>
|
</span><a name="line-298"></a><span class="hs-identifier">uploadFile</span><span> </span><span>
|
||||||
</span><a name="line-299"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="#local-6989586621679096572"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-299"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="#local-6989586621679096442"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-300"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096572"><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-300"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096442"><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-301"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet to update</span><span>
|
</span><a name="line-301"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet to update</span><span>
|
||||||
</span><a name="line-302"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="#local-6989586621679096572"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span>
|
</span><a name="line-302"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="#local-6989586621679096442"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span>
|
||||||
</span><a name="line-303"></a><a name="uploadFile"><a href="SwaggerPetstore.API.html#uploadFile"><span class="hs-identifier">uploadFile</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096587"><a href="#local-6989586621679096587"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-303"></a><a name="uploadFile"><a href="SwaggerPetstore.API.html#uploadFile"><span class="hs-identifier">uploadFile</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096457"><a href="#local-6989586621679096457"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-304"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096587"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">,</span><span class="hs-string">"/uploadImage"</span><span class="hs-special">]</span><span>
|
</span><a name="line-304"></a><span> </span><a href="SwaggerPetstore.API.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">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096457"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">,</span><span class="hs-string">"/uploadImage"</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-305"></a><span> </span><span>
|
</span><a name="line-305"></a><span> </span><span>
|
||||||
</span><a name="line-306"></a><span>
|
</span><a name="line-306"></a><span>
|
||||||
</span><a name="line-307"></a><span class="hs-keyword">data</span><span> </span><a name="UploadFile"><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier">UploadFile</span></a></a><span> </span><span>
|
</span><a name="line-307"></a><span class="hs-keyword">data</span><span> </span><a name="UploadFile"><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier">UploadFile</span></a></a><span> </span><span>
|
||||||
</span><a name="line-308"></a><span>
|
</span><a name="line-308"></a><span>
|
||||||
</span><a name="line-309"></a><span class="hs-comment">-- | /Optional Param/ "additionalMetadata" - Additional data to pass to server</span><span>
|
</span><a name="line-309"></a><span class="hs-comment">-- | /Optional Param/ "additionalMetadata" - Additional data to pass to server</span><span>
|
||||||
</span><a name="line-310"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.API.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-310"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.API.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-311"></a><span> </span><a name="local-8214565720323870210"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096893"><a href="#local-6989586621679096893"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#AdditionalMetadata"><span class="hs-identifier hs-var">AdditionalMetadata</span></a><span> </span><a name="local-6989586621679096894"><a href="#local-6989586621679096894"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-311"></a><span> </span><a name="local-8214565720323870080"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096763"><a href="#local-6989586621679096763"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#AdditionalMetadata"><span class="hs-identifier hs-var">AdditionalMetadata</span></a><span> </span><a name="local-6989586621679096764"><a href="#local-6989586621679096764"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-312"></a><span> </span><a href="#local-6989586621679096893"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_addMultiFormPart"><span class="hs-identifier hs-var">_addMultiFormPart</span></a><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">partLBS</span><span> </span><span class="hs-string">"additionalMetadata"</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a><span> </span><a href="#local-6989586621679096894"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-312"></a><span> </span><a href="#local-6989586621679096763"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_addMultiFormPart"><span class="hs-identifier hs-var">_addMultiFormPart</span></a><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">partLBS</span><span> </span><span class="hs-string">"additionalMetadata"</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a><span> </span><a href="#local-6989586621679096764"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-313"></a><span>
|
</span><a name="line-313"></a><span>
|
||||||
</span><a name="line-314"></a><span class="hs-comment">-- | /Optional Param/ "file" - file to upload</span><span>
|
</span><a name="line-314"></a><span class="hs-comment">-- | /Optional Param/ "file" - file to upload</span><span>
|
||||||
</span><a name="line-315"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.API.html#File"><span class="hs-identifier hs-type">File</span></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-315"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.API.html#File"><span class="hs-identifier hs-type">File</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-316"></a><span> </span><a name="local-8214565720323870210"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096891"><a href="#local-6989586621679096891"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#File"><span class="hs-identifier hs-var">File</span></a><span> </span><a name="local-6989586621679096892"><a href="#local-6989586621679096892"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-316"></a><span> </span><a name="local-8214565720323870080"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679096761"><a href="#local-6989586621679096761"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#File"><span class="hs-identifier hs-var">File</span></a><span> </span><a name="local-6989586621679096762"><a href="#local-6989586621679096762"><span class="hs-identifier">xs</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-317"></a><span> </span><a href="#local-6989586621679096891"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_addMultiFormPart"><span class="hs-identifier hs-var">_addMultiFormPart</span></a><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">partFileSource</span><span> </span><span class="hs-string">"file"</span><span> </span><a href="#local-6989586621679096892"><span class="hs-identifier hs-var">xs</span></a><span>
|
</span><a name="line-317"></a><span> </span><a href="#local-6989586621679096761"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_addMultiFormPart"><span class="hs-identifier hs-var">_addMultiFormPart</span></a><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">partFileSource</span><span> </span><span class="hs-string">"file"</span><span> </span><a href="#local-6989586621679096762"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||||
</span><a name="line-318"></a><span>
|
</span><a name="line-318"></a><span>
|
||||||
</span><a name="line-319"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
</span><a name="line-319"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
||||||
</span><a name="line-320"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span>
|
</span><a name="line-320"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span>
|
||||||
@@ -337,9 +337,9 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-337"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-337"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-338"></a><span class="hs-identifier">deleteOrder</span><span> </span><span>
|
</span><a name="line-338"></a><span class="hs-identifier">deleteOrder</span><span> </span><span>
|
||||||
</span><a name="line-339"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "orderId" - ID of the order that needs to be deleted</span><span>
|
</span><a name="line-339"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "orderId" - ID of the order that needs to be deleted</span><span>
|
||||||
</span><a name="line-340"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="#local-6989586621679096571"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-340"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="#local-6989586621679096441"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-341"></a><a name="deleteOrder"><a href="SwaggerPetstore.API.html#deleteOrder"><span class="hs-identifier">deleteOrder</span></a></a><span> </span><a name="local-6989586621679096588"><a href="#local-6989586621679096588"><span class="hs-identifier">orderId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-341"></a><a name="deleteOrder"><a href="SwaggerPetstore.API.html#deleteOrder"><span class="hs-identifier">deleteOrder</span></a></a><span> </span><a name="local-6989586621679096458"><a href="#local-6989586621679096458"><span class="hs-identifier">orderId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-342"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096588"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-342"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096458"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-343"></a><span> </span><span>
|
</span><a name="line-343"></a><span> </span><span>
|
||||||
</span><a name="line-344"></a><span>
|
</span><a name="line-344"></a><span>
|
||||||
</span><a name="line-345"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteOrder"><a href="SwaggerPetstore.API.html#DeleteOrder"><span class="hs-identifier">DeleteOrder</span></a></a><span> </span><span>
|
</span><a name="line-345"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteOrder"><a href="SwaggerPetstore.API.html#DeleteOrder"><span class="hs-identifier">DeleteOrder</span></a></a><span> </span><span>
|
||||||
@@ -380,8 +380,8 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-380"></a><span class="hs-identifier">getOrderById</span><span> </span><span>
|
</span><a name="line-380"></a><span class="hs-identifier">getOrderById</span><span> </span><span>
|
||||||
</span><a name="line-381"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "orderId" - ID of pet that needs to be fetched</span><span>
|
</span><a name="line-381"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-comment">-- ^ "orderId" - ID of pet that needs to be fetched</span><span>
|
||||||
</span><a name="line-382"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span>
|
</span><a name="line-382"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span>
|
||||||
</span><a name="line-383"></a><a name="getOrderById"><a href="SwaggerPetstore.API.html#getOrderById"><span class="hs-identifier">getOrderById</span></a></a><span> </span><a name="local-6989586621679096589"><a href="#local-6989586621679096589"><span class="hs-identifier">orderId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-383"></a><a name="getOrderById"><a href="SwaggerPetstore.API.html#getOrderById"><span class="hs-identifier">getOrderById</span></a></a><span> </span><a name="local-6989586621679096459"><a href="#local-6989586621679096459"><span class="hs-identifier">orderId</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-384"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096589"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-384"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096459"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-385"></a><span> </span><span>
|
</span><a name="line-385"></a><span> </span><span>
|
||||||
</span><a name="line-386"></a><span>
|
</span><a name="line-386"></a><span>
|
||||||
</span><a name="line-387"></a><span class="hs-keyword">data</span><span> </span><a name="GetOrderById"><a href="SwaggerPetstore.API.html#GetOrderById"><span class="hs-identifier">GetOrderById</span></a></a><span> </span><span>
|
</span><a name="line-387"></a><span class="hs-keyword">data</span><span> </span><a name="GetOrderById"><a href="SwaggerPetstore.API.html#GetOrderById"><span class="hs-identifier">GetOrderById</span></a></a><span> </span><span>
|
||||||
@@ -400,13 +400,13 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-400"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-400"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-401"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-401"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-402"></a><span class="hs-identifier">placeOrder</span><span> </span><span>
|
</span><a name="line-402"></a><span class="hs-identifier">placeOrder</span><span> </span><span>
|
||||||
</span><a name="line-403"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679096090"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096090"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-403"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679095960"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679095960"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-404"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096090"><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-404"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679095960"><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-405"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.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-405"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.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-406"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679096090"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span>
|
</span><a name="line-406"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679095960"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span>
|
||||||
</span><a name="line-407"></a><a name="placeOrder"><a href="SwaggerPetstore.API.html#placeOrder"><span class="hs-identifier">placeOrder</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096590"><a href="#local-6989586621679096590"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-407"></a><a name="placeOrder"><a href="SwaggerPetstore.API.html#placeOrder"><span class="hs-identifier">placeOrder</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096460"><a href="#local-6989586621679096460"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-408"></a><span> </span><a href="SwaggerPetstore.API.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-408"></a><span> </span><a href="SwaggerPetstore.API.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-409"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096590"><span class="hs-identifier hs-var">body</span></a><span>
|
</span><a name="line-409"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096460"><span class="hs-identifier hs-var">body</span></a><span>
|
||||||
</span><a name="line-410"></a><span>
|
</span><a name="line-410"></a><span>
|
||||||
</span><a name="line-411"></a><span class="hs-keyword">data</span><span> </span><a name="PlaceOrder"><a href="SwaggerPetstore.API.html#PlaceOrder"><span class="hs-identifier">PlaceOrder</span></a></a><span> </span><span>
|
</span><a name="line-411"></a><span class="hs-keyword">data</span><span> </span><a name="PlaceOrder"><a href="SwaggerPetstore.API.html#PlaceOrder"><span class="hs-identifier">PlaceOrder</span></a></a><span> </span><span>
|
||||||
</span><a name="line-412"></a><span>
|
</span><a name="line-412"></a><span>
|
||||||
@@ -431,13 +431,13 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-431"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
</span><a name="line-431"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||||
</span><a name="line-432"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-432"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-433"></a><span class="hs-identifier">createUser</span><span> </span><span>
|
</span><a name="line-433"></a><span class="hs-identifier">createUser</span><span> </span><span>
|
||||||
</span><a name="line-434"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679096088"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096088"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-434"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679095958"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679095958"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-435"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096088"><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-435"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679095958"><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-436"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.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-436"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.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-437"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679096088"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096089"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-437"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679095958"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095959"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-438"></a><a name="createUser"><a href="SwaggerPetstore.API.html#createUser"><span class="hs-identifier">createUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096591"><a href="#local-6989586621679096591"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-438"></a><a name="createUser"><a href="SwaggerPetstore.API.html#createUser"><span class="hs-identifier">createUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096461"><a href="#local-6989586621679096461"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-439"></a><span> </span><a href="SwaggerPetstore.API.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-439"></a><span> </span><a href="SwaggerPetstore.API.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-440"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096591"><span class="hs-identifier hs-var">body</span></a><span>
|
</span><a name="line-440"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096461"><span class="hs-identifier hs-var">body</span></a><span>
|
||||||
</span><a name="line-441"></a><span>
|
</span><a name="line-441"></a><span>
|
||||||
</span><a name="line-442"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUser"><a href="SwaggerPetstore.API.html#CreateUser"><span class="hs-identifier">CreateUser</span></a></a><span> </span><span>
|
</span><a name="line-442"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUser"><a href="SwaggerPetstore.API.html#CreateUser"><span class="hs-identifier">CreateUser</span></a></a><span> </span><span>
|
||||||
</span><a name="line-443"></a><span>
|
</span><a name="line-443"></a><span>
|
||||||
@@ -460,13 +460,13 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-460"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
</span><a name="line-460"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||||
</span><a name="line-461"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-461"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-462"></a><span class="hs-identifier">createUsersWithArrayInput</span><span> </span><span>
|
</span><a name="line-462"></a><span class="hs-identifier">createUsersWithArrayInput</span><span> </span><span>
|
||||||
</span><a name="line-463"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679096086"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096086"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span>
|
</span><a name="line-463"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679095956"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679095956"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-464"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096086"><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-464"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679095956"><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-465"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
</span><a name="line-465"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||||
</span><a name="line-466"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679096086"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096087"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-466"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679095956"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095957"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-467"></a><a name="createUsersWithArrayInput"><a href="SwaggerPetstore.API.html#createUsersWithArrayInput"><span class="hs-identifier">createUsersWithArrayInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096592"><a href="#local-6989586621679096592"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-467"></a><a name="createUsersWithArrayInput"><a href="SwaggerPetstore.API.html#createUsersWithArrayInput"><span class="hs-identifier">createUsersWithArrayInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096462"><a href="#local-6989586621679096462"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-468"></a><span> </span><a href="SwaggerPetstore.API.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-468"></a><span> </span><a href="SwaggerPetstore.API.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-469"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096592"><span class="hs-identifier hs-var">body</span></a><span>
|
</span><a name="line-469"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096462"><span class="hs-identifier hs-var">body</span></a><span>
|
||||||
</span><a name="line-470"></a><span>
|
</span><a name="line-470"></a><span>
|
||||||
</span><a name="line-471"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithArrayInput"><a href="SwaggerPetstore.API.html#CreateUsersWithArrayInput"><span class="hs-identifier">CreateUsersWithArrayInput</span></a></a><span> </span><span>
|
</span><a name="line-471"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithArrayInput"><a href="SwaggerPetstore.API.html#CreateUsersWithArrayInput"><span class="hs-identifier">CreateUsersWithArrayInput</span></a></a><span> </span><span>
|
||||||
</span><a name="line-472"></a><span>
|
</span><a name="line-472"></a><span>
|
||||||
@@ -489,13 +489,13 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-489"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
</span><a name="line-489"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||||
</span><a name="line-490"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-490"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-491"></a><span class="hs-identifier">createUsersWithListInput</span><span> </span><span>
|
</span><a name="line-491"></a><span class="hs-identifier">createUsersWithListInput</span><span> </span><span>
|
||||||
</span><a name="line-492"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679096084"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096084"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span>
|
</span><a name="line-492"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679095954"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679095954"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-493"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096084"><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-493"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679095954"><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-494"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
</span><a name="line-494"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||||
</span><a name="line-495"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679096084"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096085"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-495"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679095954"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095955"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-496"></a><a name="createUsersWithListInput"><a href="SwaggerPetstore.API.html#createUsersWithListInput"><span class="hs-identifier">createUsersWithListInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096593"><a href="#local-6989586621679096593"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-496"></a><a name="createUsersWithListInput"><a href="SwaggerPetstore.API.html#createUsersWithListInput"><span class="hs-identifier">createUsersWithListInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096463"><a href="#local-6989586621679096463"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-497"></a><span> </span><a href="SwaggerPetstore.API.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-497"></a><span> </span><a href="SwaggerPetstore.API.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-498"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096593"><span class="hs-identifier hs-var">body</span></a><span>
|
</span><a name="line-498"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096463"><span class="hs-identifier hs-var">body</span></a><span>
|
||||||
</span><a name="line-499"></a><span>
|
</span><a name="line-499"></a><span>
|
||||||
</span><a name="line-500"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithListInput"><a href="SwaggerPetstore.API.html#CreateUsersWithListInput"><span class="hs-identifier">CreateUsersWithListInput</span></a></a><span> </span><span>
|
</span><a name="line-500"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithListInput"><a href="SwaggerPetstore.API.html#CreateUsersWithListInput"><span class="hs-identifier">CreateUsersWithListInput</span></a></a><span> </span><span>
|
||||||
</span><a name="line-501"></a><span>
|
</span><a name="line-501"></a><span>
|
||||||
@@ -519,9 +519,9 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-519"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-519"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-520"></a><span class="hs-identifier">deleteUser</span><span> </span><span>
|
</span><a name="line-520"></a><span class="hs-identifier">deleteUser</span><span> </span><span>
|
||||||
</span><a name="line-521"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be deleted</span><span>
|
</span><a name="line-521"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be deleted</span><span>
|
||||||
</span><a name="line-522"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="#local-6989586621679096083"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-522"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="#local-6989586621679095953"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-523"></a><a name="deleteUser"><a href="SwaggerPetstore.API.html#deleteUser"><span class="hs-identifier">deleteUser</span></a></a><span> </span><a name="local-6989586621679096594"><a href="#local-6989586621679096594"><span class="hs-identifier">username</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-523"></a><a name="deleteUser"><a href="SwaggerPetstore.API.html#deleteUser"><span class="hs-identifier">deleteUser</span></a></a><span> </span><a name="local-6989586621679096464"><a href="#local-6989586621679096464"><span class="hs-identifier">username</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-524"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096594"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-524"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096464"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-525"></a><span> </span><span>
|
</span><a name="line-525"></a><span> </span><span>
|
||||||
</span><a name="line-526"></a><span>
|
</span><a name="line-526"></a><span>
|
||||||
</span><a name="line-527"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteUser"><a href="SwaggerPetstore.API.html#DeleteUser"><span class="hs-identifier">DeleteUser</span></a></a><span> </span><span>
|
</span><a name="line-527"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteUser"><a href="SwaggerPetstore.API.html#DeleteUser"><span class="hs-identifier">DeleteUser</span></a></a><span> </span><span>
|
||||||
@@ -542,8 +542,8 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-542"></a><span class="hs-identifier">getUserByName</span><span> </span><span>
|
</span><a name="line-542"></a><span class="hs-identifier">getUserByName</span><span> </span><span>
|
||||||
</span><a name="line-543"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be fetched. Use user1 for testing. </span><span>
|
</span><a name="line-543"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be fetched. Use user1 for testing. </span><span>
|
||||||
</span><a name="line-544"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span>
|
</span><a name="line-544"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span>
|
||||||
</span><a name="line-545"></a><a name="getUserByName"><a href="SwaggerPetstore.API.html#getUserByName"><span class="hs-identifier">getUserByName</span></a></a><span> </span><a name="local-6989586621679096595"><a href="#local-6989586621679096595"><span class="hs-identifier">username</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-545"></a><a name="getUserByName"><a href="SwaggerPetstore.API.html#getUserByName"><span class="hs-identifier">getUserByName</span></a></a><span> </span><a name="local-6989586621679096465"><a href="#local-6989586621679096465"><span class="hs-identifier">username</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-546"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096595"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-546"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096465"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-547"></a><span> </span><span>
|
</span><a name="line-547"></a><span> </span><span>
|
||||||
</span><a name="line-548"></a><span>
|
</span><a name="line-548"></a><span>
|
||||||
</span><a name="line-549"></a><span class="hs-keyword">data</span><span> </span><a name="GetUserByName"><a href="SwaggerPetstore.API.html#GetUserByName"><span class="hs-identifier">GetUserByName</span></a></a><span> </span><span>
|
</span><a name="line-549"></a><span class="hs-keyword">data</span><span> </span><a name="GetUserByName"><a href="SwaggerPetstore.API.html#GetUserByName"><span class="hs-identifier">GetUserByName</span></a></a><span> </span><span>
|
||||||
@@ -565,10 +565,10 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-565"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "username" - The user name for login</span><span>
|
</span><a name="line-565"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "username" - The user name for login</span><span>
|
||||||
</span><a name="line-566"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "password" - The password for login in clear text</span><span>
|
</span><a name="line-566"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "password" - The password for login in clear text</span><span>
|
||||||
</span><a name="line-567"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="SwaggerPetstore.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 name="line-567"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="SwaggerPetstore.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 name="line-568"></a><a name="loginUser"><a href="SwaggerPetstore.API.html#loginUser"><span class="hs-identifier">loginUser</span></a></a><span> </span><a name="local-6989586621679096596"><a href="#local-6989586621679096596"><span class="hs-identifier">username</span></a></a><span> </span><a name="local-6989586621679096597"><a href="#local-6989586621679096597"><span class="hs-identifier">password</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-568"></a><a name="loginUser"><a href="SwaggerPetstore.API.html#loginUser"><span class="hs-identifier">loginUser</span></a></a><span> </span><a name="local-6989586621679096466"><a href="#local-6989586621679096466"><span class="hs-identifier">username</span></a></a><span> </span><a name="local-6989586621679096467"><a href="#local-6989586621679096467"><span class="hs-identifier">password</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-569"></a><span> </span><a href="SwaggerPetstore.API.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-569"></a><span> </span><a href="SwaggerPetstore.API.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-570"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier hs-var">_setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.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-6989586621679096596"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-570"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier hs-var">_setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.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-6989586621679096466"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-571"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier hs-var">_setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.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-6989586621679096597"><span class="hs-identifier hs-var">password</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-571"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier hs-var">_setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.API.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-6989586621679096467"><span class="hs-identifier hs-var">password</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-572"></a><span>
|
</span><a name="line-572"></a><span>
|
||||||
</span><a name="line-573"></a><span class="hs-keyword">data</span><span> </span><a name="LoginUser"><a href="SwaggerPetstore.API.html#LoginUser"><span class="hs-identifier">LoginUser</span></a></a><span> </span><span>
|
</span><a name="line-573"></a><span class="hs-keyword">data</span><span> </span><a name="LoginUser"><a href="SwaggerPetstore.API.html#LoginUser"><span class="hs-identifier">LoginUser</span></a></a><span> </span><span>
|
||||||
</span><a name="line-574"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
</span><a name="line-574"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||||
@@ -588,7 +588,7 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-588"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
</span><a name="line-588"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||||
</span><a name="line-589"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-589"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-590"></a><span class="hs-identifier">logoutUser</span><span> </span><span>
|
</span><a name="line-590"></a><span class="hs-identifier">logoutUser</span><span> </span><span>
|
||||||
</span><a name="line-591"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="#local-6989586621679096082"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-591"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="#local-6989586621679095952"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-592"></a><a name="logoutUser"><a href="SwaggerPetstore.API.html#logoutUser"><span class="hs-identifier">logoutUser</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-592"></a><a name="logoutUser"><a href="SwaggerPetstore.API.html#logoutUser"><span class="hs-identifier">logoutUser</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-593"></a><span> </span><a href="SwaggerPetstore.API.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-593"></a><span> </span><a href="SwaggerPetstore.API.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-594"></a><span>
|
</span><a name="line-594"></a><span>
|
||||||
@@ -610,15 +610,15 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-610"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
</span><a name="line-610"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||||
</span><a name="line-611"></a><span class="hs-comment">-- </span><span>
|
</span><a name="line-611"></a><span class="hs-comment">-- </span><span>
|
||||||
</span><a name="line-612"></a><span class="hs-identifier">updateUser</span><span> </span><span>
|
</span><a name="line-612"></a><span class="hs-identifier">updateUser</span><span> </span><span>
|
||||||
</span><a name="line-613"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679096080"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096080"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-613"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679095950"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679095950"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-614"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096080"><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-614"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679095950"><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-615"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "username" - name that need to be deleted</span><span>
|
</span><a name="line-615"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ "username" - name that need to be deleted</span><span>
|
||||||
</span><a name="line-616"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.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-616"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.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-617"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679096080"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096081"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-617"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679095950"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095951"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-618"></a><a name="updateUser"><a href="SwaggerPetstore.API.html#updateUser"><span class="hs-identifier">updateUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096598"><a href="#local-6989586621679096598"><span class="hs-identifier">username</span></a></a><span> </span><a name="local-6989586621679096599"><a href="#local-6989586621679096599"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-618"></a><a name="updateUser"><a href="SwaggerPetstore.API.html#updateUser"><span class="hs-identifier">updateUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679096468"><a href="#local-6989586621679096468"><span class="hs-identifier">username</span></a></a><span> </span><a name="local-6989586621679096469"><a href="#local-6989586621679096469"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-619"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096598"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-619"></a><span> </span><a href="SwaggerPetstore.API.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="SwaggerPetstore.API.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679096468"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-620"></a><span> </span><span>
|
</span><a name="line-620"></a><span> </span><span>
|
||||||
</span><a name="line-621"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096599"><span class="hs-identifier hs-var">body</span></a><span>
|
</span><a name="line-621"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679096469"><span class="hs-identifier hs-var">body</span></a><span>
|
||||||
</span><a name="line-622"></a><span>
|
</span><a name="line-622"></a><span>
|
||||||
</span><a name="line-623"></a><span class="hs-keyword">data</span><span> </span><a name="UpdateUser"><a href="SwaggerPetstore.API.html#UpdateUser"><span class="hs-identifier">UpdateUser</span></a></a><span> </span><span>
|
</span><a name="line-623"></a><span class="hs-keyword">data</span><span> </span><a name="UpdateUser"><a href="SwaggerPetstore.API.html#UpdateUser"><span class="hs-identifier">UpdateUser</span></a></a><span> </span><span>
|
||||||
</span><a name="line-624"></a><span>
|
</span><a name="line-624"></a><span>
|
||||||
@@ -634,25 +634,25 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-634"></a><span class="hs-comment">-- * HasBodyParam</span><span>
|
</span><a name="line-634"></a><span class="hs-comment">-- * HasBodyParam</span><span>
|
||||||
</span><a name="line-635"></a><span>
|
</span><a name="line-635"></a><span>
|
||||||
</span><a name="line-636"></a><span class="hs-comment">-- | Designates the body parameter of a request</span><span>
|
</span><a name="line-636"></a><span class="hs-comment">-- | Designates the body parameter of a request</span><span>
|
||||||
</span><a name="line-637"></a><span class="hs-keyword">class</span><span> </span><a name="HasBodyParam"><a href="SwaggerPetstore.API.html#HasBodyParam"><span class="hs-identifier">HasBodyParam</span></a></a><span> </span><a name="local-6989586621679096024"><a href="#local-6989586621679096024"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096025"><a href="#local-6989586621679096025"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-637"></a><span class="hs-keyword">class</span><span> </span><a name="HasBodyParam"><a href="SwaggerPetstore.API.html#HasBodyParam"><span class="hs-identifier">HasBodyParam</span></a></a><span> </span><a name="local-6989586621679095894"><a href="#local-6989586621679095894"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679095895"><a href="#local-6989586621679095895"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-638"></a><span> </span><span class="hs-identifier">setBodyParam</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679096026"><a href="#local-6989586621679096026"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679096027"><a href="#local-6989586621679096027"><span class="hs-identifier">res</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="#local-6989586621679096024"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096026"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679096026"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096025"><span class="hs-identifier hs-type">param</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096024"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096026"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096027"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096025"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096024"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096026"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096027"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-638"></a><span> </span><span class="hs-identifier">setBodyParam</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679095896"><a href="#local-6989586621679095896"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679095897"><a href="#local-6989586621679095897"><span class="hs-identifier">res</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="#local-6989586621679095894"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095896"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679095896"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095895"><span class="hs-identifier hs-type">param</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095894"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095896"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095897"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679095895"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095894"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095896"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095897"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-639"></a><span> </span><a name="local-8214565720323870213"><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier">setBodyParam</span></a></a><span> </span><a name="local-6989586621679096028"><a href="#local-6989586621679096028"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096029"><a href="#local-6989586621679096029"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-639"></a><span> </span><a name="local-8214565720323870083"><a href="SwaggerPetstore.API.html#setBodyParam"><span class="hs-identifier">setBodyParam</span></a></a><span> </span><a name="local-6989586621679095898"><a href="#local-6989586621679095898"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679095899"><a href="#local-6989586621679095899"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-640"></a><span> </span><a href="#local-6989586621679096028"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setBodyLBS"><span class="hs-identifier hs-var">_setBodyLBS</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.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</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679096026"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679096029"><span class="hs-identifier hs-var">xs</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.API.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
|
</span><a name="line-640"></a><span> </span><a href="#local-6989586621679095898"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#_setBodyLBS"><span class="hs-identifier hs-var">_setBodyLBS</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.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</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679095896"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679095899"><span class="hs-identifier hs-var">xs</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.API.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
|
||||||
</span><a name="line-641"></a><span>
|
</span><a name="line-641"></a><span>
|
||||||
</span><a name="line-642"></a><span class="hs-comment">-- * HasOptionalParam</span><span>
|
</span><a name="line-642"></a><span class="hs-comment">-- * HasOptionalParam</span><span>
|
||||||
</span><a name="line-643"></a><span>
|
</span><a name="line-643"></a><span>
|
||||||
</span><a name="line-644"></a><span class="hs-comment">-- | Designates the optional parameters of a request</span><span>
|
</span><a name="line-644"></a><span class="hs-comment">-- | Designates the optional parameters of a request</span><span>
|
||||||
</span><a name="line-645"></a><span class="hs-keyword">class</span><span> </span><a name="HasOptionalParam"><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier">HasOptionalParam</span></a></a><span> </span><a name="local-6989586621679096018"><a href="#local-6989586621679096018"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096019"><a href="#local-6989586621679096019"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-645"></a><span class="hs-keyword">class</span><span> </span><a name="HasOptionalParam"><a href="SwaggerPetstore.API.html#HasOptionalParam"><span class="hs-identifier">HasOptionalParam</span></a></a><span> </span><a name="local-6989586621679095888"><a href="#local-6989586621679095888"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679095889"><a href="#local-6989586621679095889"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-646"></a><span> </span><span class="hs-pragma">{-# MINIMAL applyOptionalParam | (-&-) #-}</span><span>
|
</span><a name="line-646"></a><span> </span><span class="hs-pragma">{-# MINIMAL applyOptionalParam | (-&-) #-}</span><span>
|
||||||
</span><a name="line-647"></a><span>
|
</span><a name="line-647"></a><span>
|
||||||
</span><a name="line-648"></a><span> </span><span class="hs-comment">-- | Apply an optional parameter to a request</span><span>
|
</span><a name="line-648"></a><span> </span><span class="hs-comment">-- | Apply an optional parameter to a request</span><span>
|
||||||
</span><a name="line-649"></a><span> </span><span class="hs-identifier">applyOptionalParam</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096018"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096020"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096021"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096019"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096018"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096020"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096021"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-649"></a><span> </span><span class="hs-identifier">applyOptionalParam</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095888"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095890"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095891"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679095889"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095888"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095890"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095891"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-650"></a><span> </span><a name="local-8214565720323870210"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#-%26-"><span class="hs-operator hs-var">-&-</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-650"></a><span> </span><a name="local-8214565720323870080"><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#-%26-"><span class="hs-operator hs-var">-&-</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-651"></a><span> </span><span class="hs-pragma">{-# INLINE applyOptionalParam #-}</span><span>
|
</span><a name="line-651"></a><span> </span><span class="hs-pragma">{-# INLINE applyOptionalParam #-}</span><span>
|
||||||
</span><a name="line-652"></a><span>
|
</span><a name="line-652"></a><span>
|
||||||
</span><a name="line-653"></a><span> </span><span class="hs-comment">-- | infix operator \/ alias for 'addOptionalParam'</span><span>
|
</span><a name="line-653"></a><span> </span><span class="hs-comment">-- | infix operator \/ alias for 'addOptionalParam'</span><span>
|
||||||
</span><a name="line-654"></a><span> </span><span class="hs-special">(</span><span class="hs-operator">-&-</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096018"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096022"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096023"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096019"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096018"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096022"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096023"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-654"></a><span> </span><span class="hs-special">(</span><span class="hs-operator">-&-</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095888"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095892"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095893"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679095889"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095888"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095892"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095893"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-655"></a><span> </span><span class="hs-special">(</span><a name="local-8214565720323870211"><a href="SwaggerPetstore.API.html#-%26-"><span class="hs-operator">-&-</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier hs-var">applyOptionalParam</span></a><span>
|
</span><a name="line-655"></a><span> </span><span class="hs-special">(</span><a name="local-8214565720323870081"><a href="SwaggerPetstore.API.html#-%26-"><span class="hs-operator">-&-</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#applyOptionalParam"><span class="hs-identifier hs-var">applyOptionalParam</span></a><span>
|
||||||
</span><a name="line-656"></a><span> </span><span class="hs-pragma">{-# INLINE (-&-) #-}</span><span>
|
</span><a name="line-656"></a><span> </span><span class="hs-pragma">{-# INLINE (-&-) #-}</span><span>
|
||||||
</span><a name="line-657"></a><span>
|
</span><a name="line-657"></a><span>
|
||||||
</span><a name="line-658"></a><span class="hs-keyword">infixl</span><span> </span><span class="hs-number">2</span><span> </span><span class="hs-operator">-&-</span><span>
|
</span><a name="line-658"></a><span class="hs-keyword">infixl</span><span> </span><span class="hs-number">2</span><span> </span><span class="hs-operator">-&-</span><span>
|
||||||
@@ -674,7 +674,7 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-674"></a><span class="hs-comment">-- * SwaggerPetstoreRequest</span><span>
|
</span><a name="line-674"></a><span class="hs-comment">-- * SwaggerPetstoreRequest</span><span>
|
||||||
</span><a name="line-675"></a><span>
|
</span><a name="line-675"></a><span>
|
||||||
</span><a name="line-676"></a><span class="hs-comment">-- | Represents a request. The "req" type variable is the request type. The "res" type variable is the response type.</span><span>
|
</span><a name="line-676"></a><span class="hs-comment">-- | Represents a request. The "req" type variable is the request type. The "res" type variable is the response type.</span><span>
|
||||||
</span><a name="line-677"></a><span class="hs-keyword">data</span><span> </span><a name="SwaggerPetstoreRequest"><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier">SwaggerPetstoreRequest</span></a></a><span> </span><a name="local-6989586621679095659"><a href="#local-6989586621679095659"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679095660"><a href="#local-6989586621679095660"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679095661"><a href="#local-6989586621679095661"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="SwaggerPetstoreRequest"><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier">SwaggerPetstoreRequest</span></a></a><span>
|
</span><a name="line-677"></a><span class="hs-keyword">data</span><span> </span><a name="SwaggerPetstoreRequest"><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier">SwaggerPetstoreRequest</span></a></a><span> </span><a name="local-6989586621679095529"><a href="#local-6989586621679095529"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679095530"><a href="#local-6989586621679095530"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679095531"><a href="#local-6989586621679095531"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="SwaggerPetstoreRequest"><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier">SwaggerPetstoreRequest</span></a></a><span>
|
||||||
</span><a name="line-678"></a><span> </span><span class="hs-special">{</span><span> </span><a name="rMethod"><a href="SwaggerPetstore.API.html#rMethod"><span class="hs-identifier">rMethod</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Method</span><span> </span><span class="hs-comment">-- ^ Method of SwaggerPetstoreRequest</span><span>
|
</span><a name="line-678"></a><span> </span><span class="hs-special">{</span><span> </span><a name="rMethod"><a href="SwaggerPetstore.API.html#rMethod"><span class="hs-identifier">rMethod</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Method</span><span> </span><span class="hs-comment">-- ^ Method of SwaggerPetstoreRequest</span><span>
|
||||||
</span><a name="line-679"></a><span> </span><span class="hs-special">,</span><span> </span><a name="urlPath"><a href="SwaggerPetstore.API.html#urlPath"><span class="hs-identifier">urlPath</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ Endpoint of SwaggerPetstoreRequest</span><span>
|
</span><a name="line-679"></a><span> </span><span class="hs-special">,</span><span> </span><a name="urlPath"><a href="SwaggerPetstore.API.html#urlPath"><span class="hs-identifier">urlPath</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ Endpoint of SwaggerPetstoreRequest</span><span>
|
||||||
</span><a name="line-680"></a><span> </span><span class="hs-special">,</span><span> </span><a name="params"><a href="SwaggerPetstore.API.html#params"><span class="hs-identifier">params</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#Params"><span class="hs-identifier hs-type">Params</span></a><span> </span><span class="hs-comment">-- ^ params of SwaggerPetstoreRequest</span><span>
|
</span><a name="line-680"></a><span> </span><span class="hs-special">,</span><span> </span><a name="params"><a href="SwaggerPetstore.API.html#params"><span class="hs-identifier">params</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#Params"><span class="hs-identifier hs-type">Params</span></a><span> </span><span class="hs-comment">-- ^ params of SwaggerPetstoreRequest</span><span>
|
||||||
@@ -702,85 +702,85 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-702"></a><span>
|
</span><a name="line-702"></a><span>
|
||||||
</span><a name="line-703"></a><span class="hs-identifier">_mkRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Method</span><span> </span><span class="hs-comment">-- ^ Method </span><span>
|
</span><a name="line-703"></a><span class="hs-identifier">_mkRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Method</span><span> </span><span class="hs-comment">-- ^ Method </span><span>
|
||||||
</span><a name="line-704"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ Endpoint</span><span>
|
</span><a name="line-704"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ Endpoint</span><span>
|
||||||
</span><a name="line-705"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096077"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096078"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096079"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ req: Request Type, res: Response Type</span><span>
|
</span><a name="line-705"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095947"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095948"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095949"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ req: Request Type, res: Response Type</span><span>
|
||||||
</span><a name="line-706"></a><a name="_mkRequest"><a href="SwaggerPetstore.API.html#_mkRequest"><span class="hs-identifier">_mkRequest</span></a></a><span> </span><a name="local-6989586621679096600"><a href="#local-6989586621679096600"><span class="hs-identifier">m</span></a></a><span> </span><a name="local-6989586621679096601"><a href="#local-6989586621679096601"><span class="hs-identifier">u</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096600"><span class="hs-identifier hs-var">m</span></a><span> </span><a href="#local-6989586621679096601"><span class="hs-identifier hs-var">u</span></a><span> </span><a href="SwaggerPetstore.API.html#_mkParams"><span class="hs-identifier hs-var">_mkParams</span></a><span>
|
</span><a name="line-706"></a><a name="_mkRequest"><a href="SwaggerPetstore.API.html#_mkRequest"><span class="hs-identifier">_mkRequest</span></a></a><span> </span><a name="local-6989586621679096470"><a href="#local-6989586621679096470"><span class="hs-identifier">m</span></a></a><span> </span><a name="local-6989586621679096471"><a href="#local-6989586621679096471"><span class="hs-identifier">u</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096470"><span class="hs-identifier hs-var">m</span></a><span> </span><a href="#local-6989586621679096471"><span class="hs-identifier hs-var">u</span></a><span> </span><a href="SwaggerPetstore.API.html#_mkParams"><span class="hs-identifier hs-var">_mkParams</span></a><span>
|
||||||
</span><a name="line-707"></a><span>
|
</span><a name="line-707"></a><span>
|
||||||
</span><a name="line-708"></a><span class="hs-identifier">_mkParams</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#Params"><span class="hs-identifier hs-type">Params</span></a><span>
|
</span><a name="line-708"></a><span class="hs-identifier">_mkParams</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#Params"><span class="hs-identifier hs-type">Params</span></a><span>
|
||||||
</span><a name="line-709"></a><a name="_mkParams"><a href="SwaggerPetstore.API.html#_mkParams"><span class="hs-identifier">_mkParams</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a><span>
|
</span><a name="line-709"></a><a name="_mkParams"><a href="SwaggerPetstore.API.html#_mkParams"><span class="hs-identifier">_mkParams</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a><span>
|
||||||
</span><a name="line-710"></a><span>
|
</span><a name="line-710"></a><span>
|
||||||
</span><a name="line-711"></a><span class="hs-identifier">setHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096074"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096075"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096076"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Header</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096074"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096075"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096076"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-711"></a><span class="hs-identifier">setHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095944"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095945"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095946"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Header</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095944"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095945"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095946"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-712"></a><a name="setHeader"><a href="SwaggerPetstore.API.html#setHeader"><span class="hs-identifier">setHeader</span></a></a><span> </span><a name="local-6989586621679096602"><a href="#local-6989586621679096602"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096603"><a href="#local-6989586621679096603"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
</span><a name="line-712"></a><a name="setHeader"><a href="SwaggerPetstore.API.html#setHeader"><span class="hs-identifier">setHeader</span></a></a><span> </span><a name="local-6989586621679096472"><a href="#local-6989586621679096472"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096473"><a href="#local-6989586621679096473"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||||
</span><a name="line-713"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096604"><a href="#local-6989586621679096604"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096602"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#removeHeader"><span class="hs-identifier hs-var">removeHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fst</span><span> </span><a href="#local-6989586621679096603"><span class="hs-identifier hs-var">header</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-713"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096474"><a href="#local-6989586621679096474"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096472"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#removeHeader"><span class="hs-identifier hs-var">removeHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fst</span><span> </span><a href="#local-6989586621679096473"><span class="hs-identifier hs-var">header</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-714"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096602"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096604"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096603"><span class="hs-identifier hs-var">header</span></a><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.++</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><a href="#local-6989586621679096604"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-714"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096472"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096474"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096473"><span class="hs-identifier hs-var">header</span></a><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.++</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><a href="#local-6989586621679096474"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-715"></a><span>
|
</span><a name="line-715"></a><span>
|
||||||
</span><a name="line-716"></a><span class="hs-identifier">removeHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096071"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096072"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096073"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">HeaderName</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096071"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096072"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096073"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-716"></a><span class="hs-identifier">removeHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095941"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095942"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095943"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">HeaderName</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095941"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095942"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095943"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-717"></a><a name="removeHeader"><a href="SwaggerPetstore.API.html#removeHeader"><span class="hs-identifier">removeHeader</span></a></a><span> </span><a name="local-6989586621679096616"><a href="#local-6989586621679096616"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096617"><a href="#local-6989586621679096617"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
</span><a name="line-717"></a><a name="removeHeader"><a href="SwaggerPetstore.API.html#removeHeader"><span class="hs-identifier">removeHeader</span></a></a><span> </span><a name="local-6989586621679096486"><a href="#local-6989586621679096486"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096487"><a href="#local-6989586621679096487"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||||
</span><a name="line-718"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096825"><a href="#local-6989586621679096825"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096616"><span class="hs-identifier hs-var">req</span></a><span>
|
</span><a name="line-718"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096695"><a href="#local-6989586621679096695"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096486"><span class="hs-identifier hs-var">req</span></a><span>
|
||||||
</span><a name="line-719"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096616"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096825"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096826"><span class="hs-identifier hs-var">h</span></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="local-6989586621679096826"><a href="#local-6989586621679096826"><span class="hs-identifier">h</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><a href="#local-6989586621679096825"><span class="hs-identifier hs-var">_params</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096618"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679096826"><span class="hs-identifier hs-var">h</span></a><span> </span><span class="hs-special">`</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">notElem</span><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">CI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mk</span><span> </span><a href="#local-6989586621679096617"><span class="hs-identifier hs-var">header</span></a><span class="hs-special">]</span><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-719"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096486"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096695"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096696"><span class="hs-identifier hs-var">h</span></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="local-6989586621679096696"><a href="#local-6989586621679096696"><span class="hs-identifier">h</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><a href="#local-6989586621679096695"><span class="hs-identifier hs-var">_params</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096488"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679096696"><span class="hs-identifier hs-var">h</span></a><span> </span><span class="hs-special">`</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">notElem</span><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">CI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mk</span><span> </span><a href="#local-6989586621679096487"><span class="hs-identifier hs-var">header</span></a><span class="hs-special">]</span><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-720"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679096618"><a href="#local-6989586621679096618"><span class="hs-identifier">cifst</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">CI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mk</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fst</span><span>
|
</span><a name="line-720"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679096488"><a href="#local-6989586621679096488"><span class="hs-identifier">cifst</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">CI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mk</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fst</span><span>
|
||||||
</span><a name="line-721"></a><span>
|
</span><a name="line-721"></a><span>
|
||||||
</span><a name="line-722"></a><span>
|
</span><a name="line-722"></a><span>
|
||||||
</span><a name="line-723"></a><span class="hs-identifier">_setContentTypeHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679096068"><a href="#local-6989586621679096068"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096069"><a href="#local-6989586621679096069"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679096070"><a href="#local-6989586621679096070"><span class="hs-identifier">res</span></a></a><span class="hs-operator">.</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679096069"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096068"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096069"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096070"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096068"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096069"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096070"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-723"></a><span class="hs-identifier">_setContentTypeHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679095938"><a href="#local-6989586621679095938"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679095939"><a href="#local-6989586621679095939"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679095940"><a href="#local-6989586621679095940"><span class="hs-identifier">res</span></a></a><span class="hs-operator">.</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679095939"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095938"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095939"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095940"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095938"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095939"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095940"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-724"></a><a name="_setContentTypeHeader"><a href="SwaggerPetstore.API.html#_setContentTypeHeader"><span class="hs-identifier">_setContentTypeHeader</span></a></a><span> </span><a name="local-6989586621679096827"><a href="#local-6989586621679096827"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-724"></a><a name="_setContentTypeHeader"><a href="SwaggerPetstore.API.html#_setContentTypeHeader"><span class="hs-identifier">_setContentTypeHeader</span></a></a><span> </span><a name="local-6989586621679096697"><a href="#local-6989586621679096697"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-725"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.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</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679096069"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span> </span><span>
|
</span><a name="line-725"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.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</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Proxy</span><span> </span><a href="#local-6989586621679095939"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span> </span><span>
|
||||||
</span><a name="line-726"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679096828"><a href="#local-6989586621679096828"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096827"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-string">"content-type"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">show</span><span> </span><a href="#local-6989586621679096828"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
</span><a name="line-726"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679096698"><a href="#local-6989586621679096698"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096697"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-string">"content-type"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">show</span><span> </span><a href="#local-6989586621679096698"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-727"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096827"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#removeHeader"><span class="hs-identifier hs-var">removeHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">[</span><span class="hs-string">"content-type"</span><span class="hs-special">]</span><span>
|
</span><a name="line-727"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096697"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#removeHeader"><span class="hs-identifier hs-var">removeHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">[</span><span class="hs-string">"content-type"</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-728"></a><span>
|
</span><a name="line-728"></a><span>
|
||||||
</span><a name="line-729"></a><span class="hs-identifier">_setAcceptHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679096064"><a href="#local-6989586621679096064"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096065"><a href="#local-6989586621679096065"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679096066"><a href="#local-6989586621679096066"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679096067"><a href="#local-6989586621679096067"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679096067"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096064"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096065"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096066"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096067"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096064"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096065"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096066"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-729"></a><span class="hs-identifier">_setAcceptHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679095934"><a href="#local-6989586621679095934"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679095935"><a href="#local-6989586621679095935"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679095936"><a href="#local-6989586621679095936"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679095937"><a href="#local-6989586621679095937"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679095937"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095934"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095935"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095936"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679095937"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095934"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095935"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095936"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-730"></a><a name="_setAcceptHeader"><a href="SwaggerPetstore.API.html#_setAcceptHeader"><span class="hs-identifier">_setAcceptHeader</span></a></a><span> </span><a name="local-6989586621679096829"><a href="#local-6989586621679096829"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096830"><a href="#local-6989586621679096830"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-730"></a><a name="_setAcceptHeader"><a href="SwaggerPetstore.API.html#_setAcceptHeader"><span class="hs-identifier">_setAcceptHeader</span></a></a><span> </span><a name="local-6989586621679096699"><a href="#local-6989586621679096699"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096700"><a href="#local-6989586621679096700"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-731"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-var">mimeType'</span></a><span> </span><a href="#local-6989586621679096830"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-keyword">of</span><span> </span><span>
|
</span><a name="line-731"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier hs-var">mimeType'</span></a><span> </span><a href="#local-6989586621679096700"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-keyword">of</span><span> </span><span>
|
||||||
</span><a name="line-732"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679096831"><a href="#local-6989586621679096831"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096829"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-string">"accept"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">show</span><span> </span><a href="#local-6989586621679096831"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
</span><a name="line-732"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679096701"><a href="#local-6989586621679096701"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096699"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-string">"accept"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">show</span><span> </span><a href="#local-6989586621679096701"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-733"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096829"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#removeHeader"><span class="hs-identifier hs-var">removeHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">[</span><span class="hs-string">"accept"</span><span class="hs-special">]</span><span>
|
</span><a name="line-733"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096699"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.API.html#removeHeader"><span class="hs-identifier hs-var">removeHeader</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">[</span><span class="hs-string">"accept"</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-734"></a><span>
|
</span><a name="line-734"></a><span>
|
||||||
</span><a name="line-735"></a><span class="hs-identifier">_setQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096061"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096062"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096063"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">QueryItem</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096061"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096062"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096063"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-735"></a><span class="hs-identifier">_setQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095931"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095932"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095933"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">QueryItem</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095931"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095932"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095933"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-736"></a><a name="_setQuery"><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier">_setQuery</span></a></a><span> </span><a name="local-6989586621679096832"><a href="#local-6989586621679096832"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096833"><a href="#local-6989586621679096833"><span class="hs-identifier">query</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
</span><a name="line-736"></a><a name="_setQuery"><a href="SwaggerPetstore.API.html#_setQuery"><span class="hs-identifier">_setQuery</span></a></a><span> </span><a name="local-6989586621679096702"><a href="#local-6989586621679096702"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096703"><a href="#local-6989586621679096703"><span class="hs-identifier">query</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||||
</span><a name="line-737"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096835"><a href="#local-6989586621679096835"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096832"><span class="hs-identifier hs-var">req</span></a><span> </span><span>
|
</span><a name="line-737"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096705"><a href="#local-6989586621679096705"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096702"><span class="hs-identifier hs-var">req</span></a><span> </span><span>
|
||||||
</span><a name="line-738"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096832"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096835"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsQuery</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096833"><span class="hs-identifier hs-var">query</span></a><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.++</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096836"><span class="hs-identifier hs-var">q</span></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="local-6989586621679096836"><a href="#local-6989586621679096836"><span class="hs-identifier">q</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier">paramsQuery</span><span> </span><a href="#local-6989586621679096835"><span class="hs-identifier hs-var">_params</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096834"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679096836"><span class="hs-identifier hs-var">q</span></a><span> </span><span class="hs-special">`</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">notElem</span><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fmap</span><span> </span><a href="#local-6989586621679096834"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679096833"><span class="hs-identifier hs-var">query</span></a><span class="hs-special">]</span><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-738"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096702"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096705"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsQuery</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096703"><span class="hs-identifier hs-var">query</span></a><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.++</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096706"><span class="hs-identifier hs-var">q</span></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="local-6989586621679096706"><a href="#local-6989586621679096706"><span class="hs-identifier">q</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier">paramsQuery</span><span> </span><a href="#local-6989586621679096705"><span class="hs-identifier hs-var">_params</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096704"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679096706"><span class="hs-identifier hs-var">q</span></a><span> </span><span class="hs-special">`</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">notElem</span><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fmap</span><span> </span><a href="#local-6989586621679096704"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679096703"><span class="hs-identifier hs-var">query</span></a><span class="hs-special">]</span><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-739"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679096834"><a href="#local-6989586621679096834"><span class="hs-identifier">cifst</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">CI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mk</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fst</span><span>
|
</span><a name="line-739"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679096704"><a href="#local-6989586621679096704"><span class="hs-identifier">cifst</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">CI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mk</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fst</span><span>
|
||||||
</span><a name="line-740"></a><span>
|
</span><a name="line-740"></a><span>
|
||||||
</span><a name="line-741"></a><span class="hs-identifier">_addForm</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096058"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096059"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096060"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Form</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096058"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096059"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096060"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-741"></a><span class="hs-identifier">_addForm</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095928"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095929"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095930"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Form</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095928"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095929"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095930"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-742"></a><a name="_addForm"><a href="SwaggerPetstore.API.html#_addForm"><span class="hs-identifier">_addForm</span></a></a><span> </span><a name="local-6989586621679096837"><a href="#local-6989586621679096837"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096838"><a href="#local-6989586621679096838"><span class="hs-identifier">newform</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
</span><a name="line-742"></a><a name="_addForm"><a href="SwaggerPetstore.API.html#_addForm"><span class="hs-identifier">_addForm</span></a></a><span> </span><a name="local-6989586621679096707"><a href="#local-6989586621679096707"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096708"><a href="#local-6989586621679096708"><span class="hs-identifier">newform</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||||
</span><a name="line-743"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096839"><a href="#local-6989586621679096839"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096837"><span class="hs-identifier hs-var">req</span></a><span>
|
</span><a name="line-743"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096709"><a href="#local-6989586621679096709"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096707"><span class="hs-identifier hs-var">req</span></a><span>
|
||||||
</span><a name="line-744"></a><span> </span><a name="local-6989586621679096840"><a href="#local-6989586621679096840"><span class="hs-identifier">form</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><a href="#local-6989586621679096839"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-keyword">of</span><span>
|
</span><a name="line-744"></a><span> </span><a name="local-6989586621679096710"><a href="#local-6989586621679096710"><span class="hs-identifier">form</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><a href="#local-6989586621679096709"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||||
</span><a name="line-745"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679096841"><a href="#local-6989586621679096841"><span class="hs-identifier">_form</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096841"><span class="hs-identifier hs-var">_form</span></a><span>
|
</span><a name="line-745"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679096711"><a href="#local-6989586621679096711"><span class="hs-identifier">_form</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096711"><span class="hs-identifier hs-var">_form</span></a><span>
|
||||||
</span><a name="line-746"></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">mempty</span><span>
|
</span><a name="line-746"></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">mempty</span><span>
|
||||||
</span><a name="line-747"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096837"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096839"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096838"><span class="hs-identifier hs-var">newform</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679096840"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-747"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096707"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096709"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096708"><span class="hs-identifier hs-var">newform</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679096710"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-748"></a><span>
|
</span><a name="line-748"></a><span>
|
||||||
</span><a name="line-749"></a><span class="hs-identifier">_addMultiFormPart</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096055"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096056"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096057"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Part</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096055"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096056"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096057"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-749"></a><span class="hs-identifier">_addMultiFormPart</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095925"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095926"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095927"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Part</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095925"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095926"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095927"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-750"></a><a name="_addMultiFormPart"><a href="SwaggerPetstore.API.html#_addMultiFormPart"><span class="hs-identifier">_addMultiFormPart</span></a></a><span> </span><a name="local-6989586621679096842"><a href="#local-6989586621679096842"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096843"><a href="#local-6989586621679096843"><span class="hs-identifier">newpart</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
</span><a name="line-750"></a><a name="_addMultiFormPart"><a href="SwaggerPetstore.API.html#_addMultiFormPart"><span class="hs-identifier">_addMultiFormPart</span></a></a><span> </span><a name="local-6989586621679096712"><a href="#local-6989586621679096712"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096713"><a href="#local-6989586621679096713"><span class="hs-identifier">newpart</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||||
</span><a name="line-751"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096844"><a href="#local-6989586621679096844"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096842"><span class="hs-identifier hs-var">req</span></a><span>
|
</span><a name="line-751"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096714"><a href="#local-6989586621679096714"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096712"><span class="hs-identifier hs-var">req</span></a><span>
|
||||||
</span><a name="line-752"></a><span> </span><a name="local-6989586621679096845"><a href="#local-6989586621679096845"><span class="hs-identifier">parts</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><a href="#local-6989586621679096844"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-keyword">of</span><span>
|
</span><a name="line-752"></a><span> </span><a name="local-6989586621679096715"><a href="#local-6989586621679096715"><span class="hs-identifier">parts</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><a href="#local-6989586621679096714"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||||
</span><a name="line-753"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679096846"><a href="#local-6989586621679096846"><span class="hs-identifier">_parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096846"><span class="hs-identifier hs-var">_parts</span></a><span>
|
</span><a name="line-753"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679096716"><a href="#local-6989586621679096716"><span class="hs-identifier">_parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096716"><span class="hs-identifier hs-var">_parts</span></a><span>
|
||||||
</span><a name="line-754"></a><span> </span><span class="hs-identifier">_</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-754"></a><span> </span><span class="hs-identifier">_</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-755"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096842"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096844"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096843"><span class="hs-identifier hs-var">newpart</span></a><span> </span><span class="hs-glyph">:</span><span> </span><a href="#local-6989586621679096845"><span class="hs-identifier hs-var">parts</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-755"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096712"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096714"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096713"><span class="hs-identifier hs-var">newpart</span></a><span> </span><span class="hs-glyph">:</span><span> </span><a href="#local-6989586621679096715"><span class="hs-identifier hs-var">parts</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-756"></a><span>
|
</span><a name="line-756"></a><span>
|
||||||
</span><a name="line-757"></a><span class="hs-identifier">_setBodyBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096052"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096053"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096054"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">B</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096052"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096053"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096054"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-757"></a><span class="hs-identifier">_setBodyBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095922"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095923"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095924"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">B</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095922"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095923"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095924"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-758"></a><a name="_setBodyBS"><a href="SwaggerPetstore.API.html#_setBodyBS"><span class="hs-identifier">_setBodyBS</span></a></a><span> </span><a name="local-6989586621679096847"><a href="#local-6989586621679096847"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096848"><a href="#local-6989586621679096848"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
</span><a name="line-758"></a><a name="_setBodyBS"><a href="SwaggerPetstore.API.html#_setBodyBS"><span class="hs-identifier">_setBodyBS</span></a></a><span> </span><a name="local-6989586621679096717"><a href="#local-6989586621679096717"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096718"><a href="#local-6989586621679096718"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||||
</span><a name="line-759"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096849"><a href="#local-6989586621679096849"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096847"><span class="hs-identifier hs-var">req</span></a><span>
|
</span><a name="line-759"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096719"><a href="#local-6989586621679096719"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096717"><span class="hs-identifier hs-var">req</span></a><span>
|
||||||
</span><a name="line-760"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096847"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096849"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a href="#local-6989586621679096848"><span class="hs-identifier hs-var">body</span></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-760"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096717"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096719"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a href="#local-6989586621679096718"><span class="hs-identifier hs-var">body</span></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-761"></a><span>
|
</span><a name="line-761"></a><span>
|
||||||
</span><a name="line-762"></a><span class="hs-identifier">_setBodyLBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096049"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096050"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096051"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679096049"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679096050"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679096051"><span class="hs-identifier hs-type">res</span></a><span>
|
</span><a name="line-762"></a><span class="hs-identifier">_setBodyLBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095919"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095920"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095921"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679095919"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679095920"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679095921"><span class="hs-identifier hs-type">res</span></a><span>
|
||||||
</span><a name="line-763"></a><a name="_setBodyLBS"><a href="SwaggerPetstore.API.html#_setBodyLBS"><span class="hs-identifier">_setBodyLBS</span></a></a><span> </span><a name="local-6989586621679096850"><a href="#local-6989586621679096850"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096851"><a href="#local-6989586621679096851"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
</span><a name="line-763"></a><a name="_setBodyLBS"><a href="SwaggerPetstore.API.html#_setBodyLBS"><span class="hs-identifier">_setBodyLBS</span></a></a><span> </span><a name="local-6989586621679096720"><a href="#local-6989586621679096720"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679096721"><a href="#local-6989586621679096721"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||||
</span><a name="line-764"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096852"><a href="#local-6989586621679096852"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096850"><span class="hs-identifier hs-var">req</span></a><span>
|
</span><a name="line-764"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679096722"><a href="#local-6989586621679096722"><span class="hs-identifier">_params</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679096720"><span class="hs-identifier hs-var">req</span></a><span>
|
||||||
</span><a name="line-765"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096850"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096852"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a href="#local-6989586621679096851"><span class="hs-identifier hs-var">body</span></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-765"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679096720"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">params</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096722"><span class="hs-identifier hs-var">_params</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a href="#local-6989586621679096721"><span class="hs-identifier hs-var">body</span></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-766"></a><span>
|
</span><a name="line-766"></a><span>
|
||||||
</span><a name="line-767"></a><span>
|
</span><a name="line-767"></a><span>
|
||||||
</span><a name="line-768"></a><span class="hs-comment">-- ** Params Utils</span><span>
|
</span><a name="line-768"></a><span class="hs-comment">-- ** Params Utils</span><span>
|
||||||
</span><a name="line-769"></a><span>
|
</span><a name="line-769"></a><span>
|
||||||
</span><a name="line-770"></a><span class="hs-identifier">toPath</span><span>
|
</span><a name="line-770"></a><span class="hs-identifier">toPath</span><span>
|
||||||
</span><a name="line-771"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679096048"><span class="hs-identifier hs-type">a</span></a><span>
|
</span><a name="line-771"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679095918"><span class="hs-identifier hs-type">a</span></a><span>
|
||||||
</span><a name="line-772"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679096048"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
|
</span><a name="line-772"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679095918"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
|
||||||
</span><a name="line-773"></a><a name="toPath"><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier">toPath</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BB</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toLazyByteString</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toEncodedUrlPiece</span><span>
|
</span><a name="line-773"></a><a name="toPath"><a href="SwaggerPetstore.API.html#toPath"><span class="hs-identifier">toPath</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BB</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toLazyByteString</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toEncodedUrlPiece</span><span>
|
||||||
</span><a name="line-774"></a><span>
|
</span><a name="line-774"></a><span>
|
||||||
</span><a name="line-775"></a><span class="hs-identifier">toHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679096047"><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">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">HeaderName</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096047"><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-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Header</span><span class="hs-special">]</span><span>
|
</span><a name="line-775"></a><span class="hs-identifier">toHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679095917"><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">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">HeaderName</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679095917"><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-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Header</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-776"></a><a name="toHeader"><a href="SwaggerPetstore.API.html#toHeader"><span class="hs-identifier">toHeader</span></a></a><span> </span><a name="local-6989586621679096853"><a href="#local-6989586621679096853"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toHeader</span><span> </span><a href="#local-6989586621679096853"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-776"></a><a name="toHeader"><a href="SwaggerPetstore.API.html#toHeader"><span class="hs-identifier">toHeader</span></a></a><span> </span><a name="local-6989586621679096723"><a href="#local-6989586621679096723"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toHeader</span><span> </span><a href="#local-6989586621679096723"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-777"></a><span>
|
</span><a name="line-777"></a><span>
|
||||||
</span><a name="line-778"></a><span class="hs-identifier">toForm</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679096046"><span class="hs-identifier hs-type">v</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096046"><span class="hs-identifier hs-type">v</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Form</span><span>
|
</span><a name="line-778"></a><span class="hs-identifier">toForm</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679095916"><span class="hs-identifier hs-type">v</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679095916"><span class="hs-identifier hs-type">v</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Form</span><span>
|
||||||
</span><a name="line-779"></a><a name="toForm"><a href="SwaggerPetstore.API.html#toForm"><span class="hs-identifier">toForm</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679096854"><a href="#local-6989586621679096854"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679096855"><a href="#local-6989586621679096855"><span class="hs-identifier">v</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toForm</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><a href="#local-6989586621679096854"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><a href="#local-6989586621679096855"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
</span><a name="line-779"></a><a name="toForm"><a href="SwaggerPetstore.API.html#toForm"><span class="hs-identifier">toForm</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679096724"><a href="#local-6989586621679096724"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679096725"><a href="#local-6989586621679096725"><span class="hs-identifier">v</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toForm</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><a href="#local-6989586621679096724"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><a href="#local-6989586621679096725"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-780"></a><span>
|
</span><a name="line-780"></a><span>
|
||||||
</span><a name="line-781"></a><span class="hs-identifier">toQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679096045"><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">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="#local-6989586621679096045"><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-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">QueryItem</span><span class="hs-special">]</span><span>
|
</span><a name="line-781"></a><span class="hs-identifier">toQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679095915"><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">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="#local-6989586621679095915"><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-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">QueryItem</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-782"></a><a name="toQuery"><a href="SwaggerPetstore.API.html#toQuery"><span class="hs-identifier">toQuery</span></a></a><span> </span><a name="local-6989586621679096856"><a href="#local-6989586621679096856"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679096857"><span class="hs-identifier hs-var">toQueryParam</span></a><span> </span><a href="#local-6989586621679096856"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-782"></a><a name="toQuery"><a href="SwaggerPetstore.API.html#toQuery"><span class="hs-identifier">toQuery</span></a></a><span> </span><a name="local-6989586621679096726"><a href="#local-6989586621679096726"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">fmap</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679096727"><span class="hs-identifier hs-var">toQueryParam</span></a><span> </span><a href="#local-6989586621679096726"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-783"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679096857"><a href="#local-6989586621679096857"><span class="hs-identifier">toQueryParam</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encodeUtf8</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toQueryParam</span><span>
|
</span><a name="line-783"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679096727"><a href="#local-6989586621679096727"><span class="hs-identifier">toQueryParam</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encodeUtf8</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toQueryParam</span><span>
|
||||||
</span><a name="line-784"></a><span>
|
</span><a name="line-784"></a><span>
|
||||||
</span><a name="line-785"></a><span class="hs-comment">-- *** Swagger `CollectionFormat` Utils</span><span>
|
</span><a name="line-785"></a><span class="hs-comment">-- *** Swagger `CollectionFormat` Utils</span><span>
|
||||||
</span><a name="line-786"></a><span>
|
</span><a name="line-786"></a><span>
|
||||||
@@ -792,38 +792,38 @@ Module : SwaggerPetstore.API
|
|||||||
</span><a name="line-792"></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="PipeSeparated"><a href="SwaggerPetstore.API.html#PipeSeparated"><span class="hs-identifier">PipeSeparated</span></a></a><span> </span><span class="hs-comment">-- ^ `value1|value2|value2`</span><span>
|
</span><a name="line-792"></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="PipeSeparated"><a href="SwaggerPetstore.API.html#PipeSeparated"><span class="hs-identifier">PipeSeparated</span></a></a><span> </span><span class="hs-comment">-- ^ `value1|value2|value2`</span><span>
|
||||||
</span><a name="line-793"></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="MultiParamArray"><a href="SwaggerPetstore.API.html#MultiParamArray"><span class="hs-identifier">MultiParamArray</span></a></a><span> </span><span class="hs-comment">-- ^ Using multiple GET parameters, e.g. `foo=bar&foo=baz`. This is valid only for parameters in "query" ('NH.Query') or "formData" ('WH.Form')</span><span>
|
</span><a name="line-793"></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="MultiParamArray"><a href="SwaggerPetstore.API.html#MultiParamArray"><span class="hs-identifier">MultiParamArray</span></a></a><span> </span><span class="hs-comment">-- ^ Using multiple GET parameters, e.g. `foo=bar&foo=baz`. This is valid only for parameters in "query" ('NH.Query') or "formData" ('WH.Form')</span><span>
|
||||||
</span><a name="line-794"></a><span>
|
</span><a name="line-794"></a><span>
|
||||||
</span><a name="line-795"></a><span class="hs-identifier">toHeaderColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679096044"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">HeaderName</span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096044"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Header</span><span class="hs-special">]</span><span>
|
</span><a name="line-795"></a><span class="hs-identifier">toHeaderColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679095914"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">HeaderName</span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679095914"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Header</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-796"></a><a name="toHeaderColl"><a href="SwaggerPetstore.API.html#toHeaderColl"><span class="hs-identifier">toHeaderColl</span></a></a><span> </span><a name="local-6989586621679096858"><a href="#local-6989586621679096858"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096859"><a href="#local-6989586621679096859"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679096858"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.API.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><a href="#local-6989586621679096859"><span class="hs-identifier hs-var">xs</span></a><span>
|
</span><a name="line-796"></a><a name="toHeaderColl"><a href="SwaggerPetstore.API.html#toHeaderColl"><span class="hs-identifier">toHeaderColl</span></a></a><span> </span><a name="local-6989586621679096728"><a href="#local-6989586621679096728"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096729"><a href="#local-6989586621679096729"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679096728"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.API.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><a href="#local-6989586621679096729"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||||
</span><a name="line-797"></a><span>
|
</span><a name="line-797"></a><span>
|
||||||
</span><a name="line-798"></a><span class="hs-identifier">toFormColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679096043"><span class="hs-identifier hs-type">v</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096043"><span class="hs-identifier hs-type">v</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Form</span><span>
|
</span><a name="line-798"></a><span class="hs-identifier">toFormColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679095913"><span class="hs-identifier hs-type">v</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679095913"><span class="hs-identifier hs-type">v</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Form</span><span>
|
||||||
</span><a name="line-799"></a><a name="toFormColl"><a href="SwaggerPetstore.API.html#toFormColl"><span class="hs-identifier">toFormColl</span></a></a><span> </span><a name="local-6989586621679096860"><a href="#local-6989586621679096860"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096861"><a href="#local-6989586621679096861"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toForm</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><a href="#local-6989586621679096863"><span class="hs-identifier hs-var">unpack</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.API.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679096860"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.API.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679096862"><span class="hs-identifier hs-var">pack</span></a><span> </span><a href="#local-6989586621679096861"><span class="hs-identifier hs-var">xs</span></a><span>
|
</span><a name="line-799"></a><a name="toFormColl"><a href="SwaggerPetstore.API.html#toFormColl"><span class="hs-identifier">toFormColl</span></a></a><span> </span><a name="local-6989586621679096730"><a href="#local-6989586621679096730"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096731"><a href="#local-6989586621679096731"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toForm</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><a href="#local-6989586621679096733"><span class="hs-identifier hs-var">unpack</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.API.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679096730"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.API.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679096732"><span class="hs-identifier hs-var">pack</span></a><span> </span><a href="#local-6989586621679096731"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||||
</span><a name="line-800"></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-800"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-801"></a><span> </span><a name="local-6989586621679096862"><a href="#local-6989586621679096862"><span class="hs-identifier">pack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679096864"><a href="#local-6989586621679096864"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679096865"><a href="#local-6989586621679096865"><span class="hs-identifier">v</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">CI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mk</span><span> </span><a href="#local-6989586621679096864"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096865"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-801"></a><span> </span><a name="local-6989586621679096732"><a href="#local-6989586621679096732"><span class="hs-identifier">pack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679096734"><a href="#local-6989586621679096734"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679096735"><a href="#local-6989586621679096735"><span class="hs-identifier">v</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">CI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mk</span><span> </span><a href="#local-6989586621679096734"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096735"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-802"></a><span> </span><a name="local-6989586621679096863"><a href="#local-6989586621679096863"><span class="hs-identifier">unpack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679096866"><a href="#local-6989586621679096866"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679096867"><a href="#local-6989586621679096867"><span class="hs-identifier">v</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">CI</span><span class="hs-operator">.</span><span class="hs-identifier">original</span><span> </span><a href="#local-6989586621679096866"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><a href="#local-6989586621679096867"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-802"></a><span> </span><a name="local-6989586621679096733"><a href="#local-6989586621679096733"><span class="hs-identifier">unpack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679096736"><a href="#local-6989586621679096736"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679096737"><a href="#local-6989586621679096737"><span class="hs-identifier">v</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">CI</span><span class="hs-operator">.</span><span class="hs-identifier">original</span><span> </span><a href="#local-6989586621679096736"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">)</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><a href="#local-6989586621679096737"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-803"></a><span>
|
</span><a name="line-803"></a><span>
|
||||||
</span><a name="line-804"></a><span class="hs-identifier">toQueryColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679096042"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096042"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Query</span><span>
|
</span><a name="line-804"></a><span class="hs-identifier">toQueryColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToHttpApiData</span><span> </span><a href="#local-6989586621679095912"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679095912"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Query</span><span>
|
||||||
</span><a name="line-805"></a><a name="toQueryColl"><a href="SwaggerPetstore.API.html#toQueryColl"><span class="hs-identifier">toQueryColl</span></a></a><span> </span><a name="local-6989586621679096868"><a href="#local-6989586621679096868"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096869"><a href="#local-6989586621679096869"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_toCollA"><span class="hs-identifier hs-var">_toCollA</span></a><span> </span><a href="#local-6989586621679096868"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.API.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><a href="#local-6989586621679096869"><span class="hs-identifier hs-var">xs</span></a><span>
|
</span><a name="line-805"></a><a name="toQueryColl"><a href="SwaggerPetstore.API.html#toQueryColl"><span class="hs-identifier">toQueryColl</span></a></a><span> </span><a name="local-6989586621679096738"><a href="#local-6989586621679096738"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096739"><a href="#local-6989586621679096739"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_toCollA"><span class="hs-identifier hs-var">_toCollA</span></a><span> </span><a href="#local-6989586621679096738"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.API.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><a href="#local-6989586621679096739"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||||
</span><a name="line-806"></a><span>
|
</span><a name="line-806"></a><span>
|
||||||
</span><a name="line-807"></a><span class="hs-identifier">_toColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679096039"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096039"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679096040"><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-special">(</span><a href="#local-6989586621679096041"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096039"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096040"><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-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679096041"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
</span><a name="line-807"></a><span class="hs-identifier">_toColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679095909"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679095909"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679095910"><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-special">(</span><a href="#local-6989586621679095911"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679095909"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679095910"><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-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679095911"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-808"></a><a name="_toColl"><a href="SwaggerPetstore.API.html#_toColl"><span class="hs-identifier">_toColl</span></a></a><span> </span><a name="local-6989586621679096870"><a href="#local-6989586621679096870"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096871"><a href="#local-6989586621679096871"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679096872"><a href="#local-6989586621679096872"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromJust</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679096870"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679096873"><span class="hs-identifier hs-var">fencode</span></a><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">singleton</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679096872"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
</span><a name="line-808"></a><a name="_toColl"><a href="SwaggerPetstore.API.html#_toColl"><span class="hs-identifier">_toColl</span></a></a><span> </span><a name="local-6989586621679096740"><a href="#local-6989586621679096740"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096741"><a href="#local-6989586621679096741"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679096742"><a href="#local-6989586621679096742"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromJust</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.API.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679096740"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679096743"><span class="hs-identifier hs-var">fencode</span></a><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">singleton</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679096742"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-809"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679096873"><a href="#local-6989586621679096873"><span class="hs-identifier">fencode</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">Just</span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="#local-6989586621679096871"><span class="hs-identifier hs-var">encode</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromJust</span><span>
|
</span><a name="line-809"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679096743"><a href="#local-6989586621679096743"><span class="hs-identifier">fencode</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">Just</span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="#local-6989586621679096741"><span class="hs-identifier hs-var">encode</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromJust</span><span>
|
||||||
</span><a name="line-810"></a><span> </span><span class="hs-pragma">{-# INLINE fencode #-}</span><span>
|
</span><a name="line-810"></a><span> </span><span class="hs-pragma">{-# INLINE fencode #-}</span><span>
|
||||||
</span><a name="line-811"></a><span>
|
</span><a name="line-811"></a><span>
|
||||||
</span><a name="line-812"></a><span class="hs-identifier">_toCollA</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679096035"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679096036"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Alternative</span><span> </span><a href="#local-6989586621679096036"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096035"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096036"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679096037"><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-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679096038"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096036"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096035"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096036"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096037"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679096038"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096036"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
</span><a name="line-812"></a><span class="hs-identifier">_toCollA</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679095905"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679095906"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Alternative</span><span> </span><a href="#local-6989586621679095906"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679095905"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679095906"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679095907"><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-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679095908"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679095906"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679095905"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679095906"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679095907"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679095908"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679095906"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-identifier hs-type">BC</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-813"></a><a name="_toCollA"><a href="SwaggerPetstore.API.html#_toCollA"><span class="hs-identifier">_toCollA</span></a></a><span> </span><a name="local-6989586621679096874"><a href="#local-6989586621679096874"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096875"><a href="#local-6989586621679096875"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679096876"><a href="#local-6989586621679096876"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679096874"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679096875"><span class="hs-identifier hs-var">encode</span></a><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">singleton</span><span> </span><a href="#local-6989586621679096876"><span class="hs-identifier hs-var">xs</span></a><span>
|
</span><a name="line-813"></a><a name="_toCollA"><a href="SwaggerPetstore.API.html#_toCollA"><span class="hs-identifier">_toCollA</span></a></a><span> </span><a name="local-6989586621679096744"><a href="#local-6989586621679096744"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096745"><a href="#local-6989586621679096745"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679096746"><a href="#local-6989586621679096746"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679096744"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679096745"><span class="hs-identifier hs-var">encode</span></a><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">singleton</span><span> </span><a href="#local-6989586621679096746"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||||
</span><a name="line-814"></a><span>
|
</span><a name="line-814"></a><span>
|
||||||
</span><a name="line-815"></a><span class="hs-identifier">_toCollA'</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Monoid</span><span> </span><a href="#local-6989586621679096030"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679096031"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679096032"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Alternative</span><span> </span><a href="#local-6989586621679096032"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096031"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096032"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679096033"><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-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679096034"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096032"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679096030"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Char</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096030"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096031"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096032"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679096033"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679096034"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679096032"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679096030"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
</span><a name="line-815"></a><span class="hs-identifier">_toCollA'</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Monoid</span><span> </span><a href="#local-6989586621679095900"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679095901"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Traversable</span><span> </span><a href="#local-6989586621679095902"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Alternative</span><span> </span><a href="#local-6989586621679095902"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.API.html#CollectionFormat"><span class="hs-identifier hs-type">CollectionFormat</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679095901"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679095902"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679095903"><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-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679095904"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679095902"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679095900"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Char</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679095900"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679095901"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679095902"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679095903"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><a href="#local-6989586621679095904"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679095902"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679095900"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-816"></a><a name="_toCollA%27"><a href="SwaggerPetstore.API.html#_toCollA%27"><span class="hs-identifier">_toCollA'</span></a></a><span> </span><a name="local-6989586621679096877"><a href="#local-6989586621679096877"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096878"><a href="#local-6989586621679096878"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679096879"><a href="#local-6989586621679096879"><span class="hs-identifier">one</span></a></a><span> </span><a name="local-6989586621679096880"><a href="#local-6989586621679096880"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="#local-6989586621679096877"><span class="hs-identifier hs-var">c</span></a><span> </span><span class="hs-keyword">of</span><span>
|
</span><a name="line-816"></a><a name="_toCollA%27"><a href="SwaggerPetstore.API.html#_toCollA%27"><span class="hs-identifier">_toCollA'</span></a></a><span> </span><a name="local-6989586621679096747"><a href="#local-6989586621679096747"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679096748"><a href="#local-6989586621679096748"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679096749"><a href="#local-6989586621679096749"><span class="hs-identifier">one</span></a></a><span> </span><a name="local-6989586621679096750"><a href="#local-6989586621679096750"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="#local-6989586621679096747"><span class="hs-identifier hs-var">c</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||||
</span><a name="line-817"></a><span> </span><a href="SwaggerPetstore.API.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096881"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096879"><span class="hs-identifier hs-var">one</span></a><span> </span><span class="hs-char">','</span><span class="hs-special">)</span><span>
|
</span><a name="line-817"></a><span> </span><a href="SwaggerPetstore.API.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096751"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096749"><span class="hs-identifier hs-var">one</span></a><span> </span><span class="hs-char">','</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-818"></a><span> </span><a href="SwaggerPetstore.API.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096881"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096879"><span class="hs-identifier hs-var">one</span></a><span> </span><span class="hs-char">' '</span><span class="hs-special">)</span><span>
|
</span><a name="line-818"></a><span> </span><a href="SwaggerPetstore.API.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096751"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096749"><span class="hs-identifier hs-var">one</span></a><span> </span><span class="hs-char">' '</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-819"></a><span> </span><a href="SwaggerPetstore.API.html#TabSeparated"><span class="hs-identifier hs-var">TabSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096881"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096879"><span class="hs-identifier hs-var">one</span></a><span> </span><span class="hs-char">'\t'</span><span class="hs-special">)</span><span>
|
</span><a name="line-819"></a><span> </span><a href="SwaggerPetstore.API.html#TabSeparated"><span class="hs-identifier hs-var">TabSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096751"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096749"><span class="hs-identifier hs-var">one</span></a><span> </span><span class="hs-char">'\t'</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-820"></a><span> </span><a href="SwaggerPetstore.API.html#PipeSeparated"><span class="hs-identifier hs-var">PipeSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096881"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096879"><span class="hs-identifier hs-var">one</span></a><span> </span><span class="hs-char">'|'</span><span class="hs-special">)</span><span>
|
</span><a name="line-820"></a><span> </span><a href="SwaggerPetstore.API.html#PipeSeparated"><span class="hs-identifier hs-var">PipeSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096751"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096749"><span class="hs-identifier hs-var">one</span></a><span> </span><span class="hs-char">'|'</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-821"></a><span> </span><a href="SwaggerPetstore.API.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096883"><span class="hs-identifier hs-var">expandList</span></a><span>
|
</span><a name="line-821"></a><span> </span><a href="SwaggerPetstore.API.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679096753"><span class="hs-identifier hs-var">expandList</span></a><span>
|
||||||
</span><a name="line-822"></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-822"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-823"></a><span> </span><a name="local-6989586621679096881"><a href="#local-6989586621679096881"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679096884"><a href="#local-6989586621679096884"><span class="hs-identifier">sep</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-823"></a><span> </span><a name="local-6989586621679096751"><a href="#local-6989586621679096751"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679096754"><a href="#local-6989586621679096754"><span class="hs-identifier">sep</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-824"></a><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">foldl1</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679096885"><a href="#local-6989586621679096885"><span class="hs-identifier">sk</span></a></a><span class="hs-special">,</span><span> </span><a name="local-6989586621679096886"><a href="#local-6989586621679096886"><span class="hs-identifier">sv</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">_</span><span class="hs-special">,</span><span> </span><a name="local-6989586621679096887"><a href="#local-6989586621679096887"><span class="hs-identifier">v</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096885"><span class="hs-identifier hs-var">sk</span></a><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096882"><span class="hs-identifier hs-var">combine</span></a><span> </span><a href="#local-6989586621679096884"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679096886"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><*></span><span> </span><a href="#local-6989586621679096887"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><|></span><span> </span><a href="#local-6989586621679096886"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><|></span><span> </span><a href="#local-6989586621679096887"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679096883"><span class="hs-identifier hs-var">expandList</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-824"></a><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">foldl1</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679096755"><a href="#local-6989586621679096755"><span class="hs-identifier">sk</span></a></a><span class="hs-special">,</span><span> </span><a name="local-6989586621679096756"><a href="#local-6989586621679096756"><span class="hs-identifier">sv</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">_</span><span class="hs-special">,</span><span> </span><a name="local-6989586621679096757"><a href="#local-6989586621679096757"><span class="hs-identifier">v</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096755"><span class="hs-identifier hs-var">sk</span></a><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679096752"><span class="hs-identifier hs-var">combine</span></a><span> </span><a href="#local-6989586621679096754"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679096756"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><*></span><span> </span><a href="#local-6989586621679096757"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><|></span><span> </span><a href="#local-6989586621679096756"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><|></span><span> </span><a href="#local-6989586621679096757"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679096753"><span class="hs-identifier hs-var">expandList</span></a><span class="hs-special">]</span><span>
|
||||||
</span><a name="line-825"></a><span> </span><a name="local-6989586621679096882"><a href="#local-6989586621679096882"><span class="hs-identifier">combine</span></a></a><span> </span><a name="local-6989586621679096888"><a href="#local-6989586621679096888"><span class="hs-identifier">sep</span></a></a><span> </span><a name="local-6989586621679096889"><a href="#local-6989586621679096889"><span class="hs-identifier">x</span></a></a><span> </span><a name="local-6989586621679096890"><a href="#local-6989586621679096890"><span class="hs-identifier">y</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096889"><span class="hs-identifier hs-var">x</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679096888"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679096890"><span class="hs-identifier hs-var">y</span></a><span>
|
</span><a name="line-825"></a><span> </span><a name="local-6989586621679096752"><a href="#local-6989586621679096752"><span class="hs-identifier">combine</span></a></a><span> </span><a name="local-6989586621679096758"><a href="#local-6989586621679096758"><span class="hs-identifier">sep</span></a></a><span> </span><a name="local-6989586621679096759"><a href="#local-6989586621679096759"><span class="hs-identifier">x</span></a></a><span> </span><a name="local-6989586621679096760"><a href="#local-6989586621679096760"><span class="hs-identifier">y</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679096759"><span class="hs-identifier hs-var">x</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679096758"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679096760"><span class="hs-identifier hs-var">y</span></a><span>
|
||||||
</span><a name="line-826"></a><span> </span><a name="local-6989586621679096883"><a href="#local-6989586621679096883"><span class="hs-identifier">expandList</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">concatMap</span><span> </span><a href="#local-6989586621679096878"><span class="hs-identifier hs-var">encode</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">traverse</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">traverse</span><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toList</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679096880"><span class="hs-identifier hs-var">xs</span></a><span>
|
</span><a name="line-826"></a><span> </span><a name="local-6989586621679096753"><a href="#local-6989586621679096753"><span class="hs-identifier">expandList</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">concatMap</span><span> </span><a href="#local-6989586621679096748"><span class="hs-identifier hs-var">encode</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">traverse</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">traverse</span><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toList</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679096750"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||||
</span><a name="line-827"></a><span> </span><span class="hs-pragma">{-# INLINE go #-}</span><span>
|
</span><a name="line-827"></a><span> </span><span class="hs-pragma">{-# INLINE go #-}</span><span>
|
||||||
</span><a name="line-828"></a><span> </span><span class="hs-pragma">{-# INLINE expandList #-}</span><span>
|
</span><a name="line-828"></a><span> </span><span class="hs-pragma">{-# INLINE expandList #-}</span><span>
|
||||||
</span><a name="line-829"></a><span> </span><span class="hs-pragma">{-# INLINE combine #-}</span><span>
|
</span><a name="line-829"></a><span> </span><span class="hs-pragma">{-# INLINE combine #-}</span><span>
|
||||||
|
|||||||
@@ -63,11 +63,11 @@ Module : SwaggerPetstore.Client
|
|||||||
</span><a name="line-63"></a><span>
|
</span><a name="line-63"></a><span>
|
||||||
</span><a name="line-64"></a><span class="hs-comment">-- | display the config</span><span>
|
</span><a name="line-64"></a><span class="hs-comment">-- | display the config</span><span>
|
||||||
</span><a name="line-65"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-65"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-66"></a><span> </span><a name="local-8214565720323792628"><span class="hs-identifier">show</span></a><span> </span><a name="local-6989586621679133870"><a href="#local-6989586621679133870"><span class="hs-identifier">c</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-66"></a><span> </span><a name="local-8214565720323792628"><span class="hs-identifier">show</span></a><span> </span><a name="local-6989586621679133740"><a href="#local-6989586621679133740"><span class="hs-identifier">c</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-67"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">printf</span><span>
|
</span><a name="line-67"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">printf</span><span>
|
||||||
</span><a name="line-68"></a><span> </span><span class="hs-string">"{ configHost = %v, configUserAgent = %v, ..}"</span><span>
|
</span><a name="line-68"></a><span> </span><span class="hs-string">"{ configHost = %v, configUserAgent = %v, ..}"</span><span>
|
||||||
</span><a name="line-69"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679133870"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
</span><a name="line-69"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679133740"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-70"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679133870"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
</span><a name="line-70"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679133740"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-71"></a><span>
|
</span><a name="line-71"></a><span>
|
||||||
</span><a name="line-72"></a><span class="hs-comment">-- | constructs a default SwaggerPetstoreConfig</span><span>
|
</span><a name="line-72"></a><span class="hs-comment">-- | constructs a default SwaggerPetstoreConfig</span><span>
|
||||||
</span><a name="line-73"></a><span class="hs-comment">--</span><span>
|
</span><a name="line-73"></a><span class="hs-comment">--</span><span>
|
||||||
@@ -93,15 +93,15 @@ Module : SwaggerPetstore.Client
|
|||||||
</span><a name="line-93"></a><span>
|
</span><a name="line-93"></a><span>
|
||||||
</span><a name="line-94"></a><span class="hs-comment">-- | updates the config to use a MonadLogger instance which prints to stdout.</span><span>
|
</span><a name="line-94"></a><span class="hs-comment">-- | updates the config to use a MonadLogger instance which prints to stdout.</span><span>
|
||||||
</span><a name="line-95"></a><span class="hs-identifier">withStdoutLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
</span><a name="line-95"></a><span class="hs-identifier">withStdoutLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||||
</span><a name="line-96"></a><a name="withStdoutLogging"><a href="SwaggerPetstore.Client.html#withStdoutLogging"><span class="hs-identifier">withStdoutLogging</span></a></a><span> </span><a name="local-6989586621679133090"><a href="#local-6989586621679133090"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133090"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configExecLoggingT</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">runStdoutLoggingT</span><span class="hs-special">}</span><span>
|
</span><a name="line-96"></a><a name="withStdoutLogging"><a href="SwaggerPetstore.Client.html#withStdoutLogging"><span class="hs-identifier">withStdoutLogging</span></a></a><span> </span><a name="local-6989586621679132960"><a href="#local-6989586621679132960"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679132960"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configExecLoggingT</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">runStdoutLoggingT</span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-97"></a><span>
|
</span><a name="line-97"></a><span>
|
||||||
</span><a name="line-98"></a><span class="hs-comment">-- | updates the config to use a MonadLogger instance which prints to stderr.</span><span>
|
</span><a name="line-98"></a><span class="hs-comment">-- | updates the config to use a MonadLogger instance which prints to stderr.</span><span>
|
||||||
</span><a name="line-99"></a><span class="hs-identifier">withStderrLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
</span><a name="line-99"></a><span class="hs-identifier">withStderrLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||||
</span><a name="line-100"></a><a name="withStderrLogging"><a href="SwaggerPetstore.Client.html#withStderrLogging"><span class="hs-identifier">withStderrLogging</span></a></a><span> </span><a name="local-6989586621679133091"><a href="#local-6989586621679133091"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133091"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configExecLoggingT</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">runStderrLoggingT</span><span class="hs-special">}</span><span>
|
</span><a name="line-100"></a><a name="withStderrLogging"><a href="SwaggerPetstore.Client.html#withStderrLogging"><span class="hs-identifier">withStderrLogging</span></a></a><span> </span><a name="local-6989586621679132961"><a href="#local-6989586621679132961"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679132961"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configExecLoggingT</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">runStderrLoggingT</span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-101"></a><span>
|
</span><a name="line-101"></a><span>
|
||||||
</span><a name="line-102"></a><span class="hs-comment">-- | updates the config to disable logging</span><span>
|
</span><a name="line-102"></a><span class="hs-comment">-- | updates the config to disable logging</span><span>
|
||||||
</span><a name="line-103"></a><span class="hs-identifier">withNoLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
</span><a name="line-103"></a><span class="hs-identifier">withNoLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||||
</span><a name="line-104"></a><a name="withNoLogging"><a href="SwaggerPetstore.Client.html#withNoLogging"><span class="hs-identifier">withNoLogging</span></a></a><span> </span><a name="local-6989586621679133092"><a href="#local-6989586621679133092"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133092"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configExecLoggingT</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#runNullLoggingT"><span class="hs-identifier hs-var">runNullLoggingT</span></a><span class="hs-special">}</span><span>
|
</span><a name="line-104"></a><a name="withNoLogging"><a href="SwaggerPetstore.Client.html#withNoLogging"><span class="hs-identifier">withNoLogging</span></a></a><span> </span><a name="local-6989586621679132962"><a href="#local-6989586621679132962"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679132962"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configExecLoggingT</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#runNullLoggingT"><span class="hs-identifier hs-var">runNullLoggingT</span></a><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-105"></a><span>
|
</span><a name="line-105"></a><span>
|
||||||
</span><a name="line-106"></a><span class="hs-comment">-- * Dispatch</span><span>
|
</span><a name="line-106"></a><span class="hs-comment">-- * Dispatch</span><span>
|
||||||
</span><a name="line-107"></a><span>
|
</span><a name="line-107"></a><span>
|
||||||
@@ -109,21 +109,21 @@ Module : SwaggerPetstore.Client
|
|||||||
</span><a name="line-109"></a><span>
|
</span><a name="line-109"></a><span>
|
||||||
</span><a name="line-110"></a><span class="hs-comment">-- | send a request returning the raw http response</span><span>
|
</span><a name="line-110"></a><span class="hs-comment">-- | send a request returning the raw http response</span><span>
|
||||||
</span><a name="line-111"></a><span class="hs-identifier">dispatchLbs</span><span>
|
</span><a name="line-111"></a><span class="hs-identifier">dispatchLbs</span><span>
|
||||||
</span><a name="line-112"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679133086"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133087"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679133088"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-112"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679132956"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132957"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132958"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-113"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
</span><a name="line-113"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||||
</span><a name="line-114"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
</span><a name="line-114"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||||
</span><a name="line-115"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679133086"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133088"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133089"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
</span><a name="line-115"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132956"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132958"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132959"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||||
</span><a name="line-116"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679133087"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
</span><a name="line-116"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132957"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
||||||
</span><a name="line-117"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
</span><a name="line-117"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
||||||
</span><a name="line-118"></a><a name="dispatchLbs"><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier">dispatchLbs</span></a></a><span> </span><a name="local-6989586621679133093"><a href="#local-6989586621679133093"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679133094"><a href="#local-6989586621679133094"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133095"><a href="#local-6989586621679133095"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679133096"><a href="#local-6989586621679133096"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
</span><a name="line-118"></a><a name="dispatchLbs"><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier">dispatchLbs</span></a></a><span> </span><a name="local-6989586621679132963"><a href="#local-6989586621679132963"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679132964"><a href="#local-6989586621679132964"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679132965"><a href="#local-6989586621679132965"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679132966"><a href="#local-6989586621679132966"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||||
</span><a name="line-119"></a><span> </span><a name="local-6989586621679133097"><a href="#local-6989586621679133097"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679133094"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133095"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679133096"><span class="hs-identifier hs-var">accept</span></a><span> </span><span>
|
</span><a name="line-119"></a><span> </span><a name="local-6989586621679132967"><a href="#local-6989586621679132967"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679132964"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132965"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679132966"><span class="hs-identifier hs-var">accept</span></a><span> </span><span>
|
||||||
</span><a name="line-120"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679133093"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679133094"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133097"><span class="hs-identifier hs-var">initReq</span></a><span>
|
</span><a name="line-120"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679132963"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679132964"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132967"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||||
</span><a name="line-121"></a><span>
|
</span><a name="line-121"></a><span>
|
||||||
</span><a name="line-122"></a><span class="hs-comment">-- ** Mime</span><span>
|
</span><a name="line-122"></a><span class="hs-comment">-- ** Mime</span><span>
|
||||||
</span><a name="line-123"></a><span>
|
</span><a name="line-123"></a><span>
|
||||||
</span><a name="line-124"></a><span class="hs-comment">-- | pair of decoded http body and http response</span><span>
|
</span><a name="line-124"></a><span class="hs-comment">-- | pair of decoded http body and http response</span><span>
|
||||||
</span><a name="line-125"></a><span class="hs-keyword">data</span><span> </span><a name="MimeResult"><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><a name="local-6989586621679132958"><a href="#local-6989586621679132958"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-125"></a><span class="hs-keyword">data</span><span> </span><a name="MimeResult"><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><a name="local-6989586621679132828"><a href="#local-6989586621679132828"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-126"></a><span> </span><a name="MimeResult"><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="mimeResult"><a href="SwaggerPetstore.Client.html#mimeResult"><span class="hs-identifier">mimeResult</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Either</span><span> </span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679132958"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ decoded http body</span><span>
|
</span><a name="line-126"></a><span> </span><a name="MimeResult"><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="mimeResult"><a href="SwaggerPetstore.Client.html#mimeResult"><span class="hs-identifier">mimeResult</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Either</span><span> </span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679132828"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ decoded http body</span><span>
|
||||||
</span><a name="line-127"></a><span> </span><span class="hs-special">,</span><span> </span><a name="mimeResultResponse"><a href="SwaggerPetstore.Client.html#mimeResultResponse"><span class="hs-identifier">mimeResultResponse</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-comment">-- ^ http response </span><span>
|
</span><a name="line-127"></a><span> </span><span class="hs-special">,</span><span> </span><a name="mimeResultResponse"><a href="SwaggerPetstore.Client.html#mimeResultResponse"><span class="hs-identifier">mimeResultResponse</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span> </span><span class="hs-comment">-- ^ http response </span><span>
|
||||||
</span><a name="line-128"></a><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-128"></a><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-129"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Foldable</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Traversable</span><span class="hs-special">)</span><span>
|
</span><a name="line-129"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Functor</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Foldable</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Traversable</span><span class="hs-special">)</span><span>
|
||||||
@@ -137,124 +137,124 @@ Module : SwaggerPetstore.Client
|
|||||||
</span><a name="line-137"></a><span>
|
</span><a name="line-137"></a><span>
|
||||||
</span><a name="line-138"></a><span class="hs-comment">-- | send a request returning the 'MimeResult'</span><span>
|
</span><a name="line-138"></a><span class="hs-comment">-- | send a request returning the 'MimeResult'</span><span>
|
||||||
</span><a name="line-139"></a><span class="hs-identifier">dispatchMime</span><span>
|
</span><a name="line-139"></a><span class="hs-identifier">dispatchMime</span><span>
|
||||||
</span><a name="line-140"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679133082"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133083"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679133083"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679133084"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679133085"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-140"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679132952"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132953"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679132953"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679132954"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132955"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-141"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
</span><a name="line-141"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||||
</span><a name="line-142"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
</span><a name="line-142"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||||
</span><a name="line-143"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679133082"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133085"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133084"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
</span><a name="line-143"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132952"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132955"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132954"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||||
</span><a name="line-144"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679133083"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
</span><a name="line-144"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132953"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
||||||
</span><a name="line-145"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-type">MimeResult</span></a><span> </span><a href="#local-6989586621679133084"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
</span><a name="line-145"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-type">MimeResult</span></a><span> </span><a href="#local-6989586621679132954"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
||||||
</span><a name="line-146"></a><a name="dispatchMime"><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier">dispatchMime</span></a></a><span> </span><a name="local-6989586621679133098"><a href="#local-6989586621679133098"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679133099"><a href="#local-6989586621679133099"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133100"><a href="#local-6989586621679133100"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679133101"><a href="#local-6989586621679133101"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
</span><a name="line-146"></a><a name="dispatchMime"><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier">dispatchMime</span></a></a><span> </span><a name="local-6989586621679132968"><a href="#local-6989586621679132968"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679132969"><a href="#local-6989586621679132969"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679132970"><a href="#local-6989586621679132970"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679132971"><a href="#local-6989586621679132971"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||||
</span><a name="line-147"></a><span> </span><a name="local-6989586621679133102"><a href="#local-6989586621679133102"><span class="hs-identifier">httpResponse</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier hs-var">dispatchLbs</span></a><span> </span><a href="#local-6989586621679133098"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679133099"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133100"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679133101"><span class="hs-identifier hs-var">accept</span></a><span>
|
</span><a name="line-147"></a><span> </span><a name="local-6989586621679132972"><a href="#local-6989586621679132972"><span class="hs-identifier">httpResponse</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier hs-var">dispatchLbs</span></a><span> </span><a href="#local-6989586621679132968"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679132969"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132970"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679132971"><span class="hs-identifier hs-var">accept</span></a><span>
|
||||||
</span><a name="line-148"></a><span> </span><a name="local-6989586621679133105"><a href="#local-6989586621679133105"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-glyph"><-</span><span>
|
</span><a name="line-148"></a><span> </span><a name="local-6989586621679132975"><a href="#local-6989586621679132975"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-glyph"><-</span><span>
|
||||||
</span><a name="line-149"></a><span> </span><a href="SwaggerPetstore.Client.html#runExceptionLoggingT"><span class="hs-identifier hs-var">runExceptionLoggingT</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="#local-6989586621679133099"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
</span><a name="line-149"></a><span> </span><a href="SwaggerPetstore.Client.html#runExceptionLoggingT"><span class="hs-identifier hs-var">runExceptionLoggingT</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="#local-6989586621679132969"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||||
</span><a name="line-150"></a><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var">mimeUnrender'</span></a><span> </span><a href="#local-6989586621679133101"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">responseBody</span><span> </span><a href="#local-6989586621679133102"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
</span><a name="line-150"></a><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier hs-var">mimeUnrender'</span></a><span> </span><a href="#local-6989586621679132971"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">responseBody</span><span> </span><a href="#local-6989586621679132972"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||||
</span><a name="line-151"></a><span> </span><span class="hs-identifier hs-var">Left</span><span> </span><a name="local-6989586621679133103"><a href="#local-6989586621679133103"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span>
|
</span><a name="line-151"></a><span> </span><span class="hs-identifier hs-var">Left</span><span> </span><a name="local-6989586621679132973"><a href="#local-6989586621679132973"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span>
|
||||||
</span><a name="line-152"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelError</span><span> </span><span class="hs-string">"Client"</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><a href="#local-6989586621679133103"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-152"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelError</span><span> </span><span class="hs-string">"Client"</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><a href="#local-6989586621679132973"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-153"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Left</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-var">MimeError</span></a><span> </span><a href="#local-6989586621679133103"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679133102"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
</span><a name="line-153"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Left</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-var">MimeError</span></a><span> </span><a href="#local-6989586621679132973"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679132972"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-154"></a><span> </span><span class="hs-identifier hs-var">Right</span><span> </span><a name="local-6989586621679133104"><a href="#local-6989586621679133104"><span class="hs-identifier">r</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Right</span><span> </span><a href="#local-6989586621679133104"><span class="hs-identifier hs-var">r</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-154"></a><span> </span><span class="hs-identifier hs-var">Right</span><span> </span><a name="local-6989586621679132974"><a href="#local-6989586621679132974"><span class="hs-identifier">r</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Right</span><span> </span><a href="#local-6989586621679132974"><span class="hs-identifier hs-var">r</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-155"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a href="#local-6989586621679133105"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a href="#local-6989586621679133102"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-155"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a href="#local-6989586621679132975"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a href="#local-6989586621679132972"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-156"></a><span>
|
</span><a name="line-156"></a><span>
|
||||||
</span><a name="line-157"></a><span class="hs-comment">-- | like 'dispatchMime', but only returns the decoded http body</span><span>
|
</span><a name="line-157"></a><span class="hs-comment">-- | like 'dispatchMime', but only returns the decoded http body</span><span>
|
||||||
</span><a name="line-158"></a><span class="hs-identifier">dispatchMime'</span><span>
|
</span><a name="line-158"></a><span class="hs-identifier">dispatchMime'</span><span>
|
||||||
</span><a name="line-159"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679133078"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133079"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679133079"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679133080"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679133081"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-159"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679132948"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132949"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679132949"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679132950"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132951"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-160"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
</span><a name="line-160"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||||
</span><a name="line-161"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
</span><a name="line-161"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||||
</span><a name="line-162"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679133078"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133081"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133080"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
</span><a name="line-162"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132948"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132951"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132950"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||||
</span><a name="line-163"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679133079"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
</span><a name="line-163"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132949"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
||||||
</span><a name="line-164"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Either</span><span> </span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679133080"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
</span><a name="line-164"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Either</span><span> </span><a href="SwaggerPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679132950"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
||||||
</span><a name="line-165"></a><a name="dispatchMime%27"><a href="SwaggerPetstore.Client.html#dispatchMime%27"><span class="hs-identifier">dispatchMime'</span></a></a><span> </span><a name="local-6989586621679133106"><a href="#local-6989586621679133106"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679133107"><a href="#local-6989586621679133107"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133108"><a href="#local-6989586621679133108"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679133109"><a href="#local-6989586621679133109"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
</span><a name="line-165"></a><a name="dispatchMime%27"><a href="SwaggerPetstore.Client.html#dispatchMime%27"><span class="hs-identifier">dispatchMime'</span></a></a><span> </span><a name="local-6989586621679132976"><a href="#local-6989586621679132976"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679132977"><a href="#local-6989586621679132977"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679132978"><a href="#local-6989586621679132978"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679132979"><a href="#local-6989586621679132979"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||||
</span><a name="line-166"></a><span> </span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a name="local-6989586621679133110"><a href="#local-6989586621679133110"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier hs-var">dispatchMime</span></a><span> </span><a href="#local-6989586621679133106"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679133107"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133108"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679133109"><span class="hs-identifier hs-var">accept</span></a><span> </span><span>
|
</span><a name="line-166"></a><span> </span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a name="local-6989586621679132980"><a href="#local-6989586621679132980"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier hs-var">dispatchMime</span></a><span> </span><a href="#local-6989586621679132976"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679132977"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132978"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679132979"><span class="hs-identifier hs-var">accept</span></a><span> </span><span>
|
||||||
</span><a name="line-167"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679133110"><span class="hs-identifier hs-var">parsedResult</span></a><span>
|
</span><a name="line-167"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679132980"><span class="hs-identifier hs-var">parsedResult</span></a><span>
|
||||||
</span><a name="line-168"></a><span>
|
</span><a name="line-168"></a><span>
|
||||||
</span><a name="line-169"></a><span class="hs-comment">-- ** Unsafe</span><span>
|
</span><a name="line-169"></a><span class="hs-comment">-- ** Unsafe</span><span>
|
||||||
</span><a name="line-170"></a><span>
|
</span><a name="line-170"></a><span>
|
||||||
</span><a name="line-171"></a><span class="hs-comment">-- | like 'dispatchReqLbs', but does not validate the operation is a 'Producer' of the "accept" 'MimeType'. (Useful if the server's response is undocumented)</span><span>
|
</span><a name="line-171"></a><span class="hs-comment">-- | like 'dispatchReqLbs', but does not validate the operation is a 'Producer' of the "accept" 'MimeType'. (Useful if the server's response is undocumented)</span><span>
|
||||||
</span><a name="line-172"></a><span class="hs-identifier">dispatchLbsUnsafe</span><span>
|
</span><a name="line-172"></a><span class="hs-identifier">dispatchLbsUnsafe</span><span>
|
||||||
</span><a name="line-173"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679133074"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679133075"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-173"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132944"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132945"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-174"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
</span><a name="line-174"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||||
</span><a name="line-175"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
</span><a name="line-175"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||||
</span><a name="line-176"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679133076"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133075"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133077"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
</span><a name="line-176"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132946"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132945"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132947"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||||
</span><a name="line-177"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679133074"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
</span><a name="line-177"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132944"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
||||||
</span><a name="line-178"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
</span><a name="line-178"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
||||||
</span><a name="line-179"></a><a name="dispatchLbsUnsafe"><a href="SwaggerPetstore.Client.html#dispatchLbsUnsafe"><span class="hs-identifier">dispatchLbsUnsafe</span></a></a><span> </span><a name="local-6989586621679133111"><a href="#local-6989586621679133111"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679133112"><a href="#local-6989586621679133112"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133113"><a href="#local-6989586621679133113"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679133114"><a href="#local-6989586621679133114"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
</span><a name="line-179"></a><a name="dispatchLbsUnsafe"><a href="SwaggerPetstore.Client.html#dispatchLbsUnsafe"><span class="hs-identifier">dispatchLbsUnsafe</span></a></a><span> </span><a name="local-6989586621679132981"><a href="#local-6989586621679132981"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679132982"><a href="#local-6989586621679132982"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679132983"><a href="#local-6989586621679132983"><span class="hs-identifier">request</span></a></a><span> </span><a name="local-6989586621679132984"><a href="#local-6989586621679132984"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||||
</span><a name="line-180"></a><span> </span><a name="local-6989586621679133115"><a href="#local-6989586621679133115"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679133112"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133113"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679133114"><span class="hs-identifier hs-var">accept</span></a><span>
|
</span><a name="line-180"></a><span> </span><a name="local-6989586621679132985"><a href="#local-6989586621679132985"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679132982"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132983"><span class="hs-identifier hs-var">request</span></a><span> </span><a href="#local-6989586621679132984"><span class="hs-identifier hs-var">accept</span></a><span>
|
||||||
</span><a name="line-181"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679133111"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679133112"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133115"><span class="hs-identifier hs-var">initReq</span></a><span>
|
</span><a name="line-181"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679132981"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679132982"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132985"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||||
</span><a name="line-182"></a><span>
|
</span><a name="line-182"></a><span>
|
||||||
</span><a name="line-183"></a><span class="hs-comment">-- | dispatch an InitRequest</span><span>
|
</span><a name="line-183"></a><span class="hs-comment">-- | dispatch an InitRequest</span><span>
|
||||||
</span><a name="line-184"></a><span class="hs-identifier">dispatchInitUnsafe</span><span>
|
</span><a name="line-184"></a><span class="hs-identifier">dispatchInitUnsafe</span><span>
|
||||||
</span><a name="line-185"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
</span><a name="line-185"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||||
</span><a name="line-186"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
</span><a name="line-186"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||||
</span><a name="line-187"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679133070"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133071"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133072"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679133073"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ init request</span><span>
|
</span><a name="line-187"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132940"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132941"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132942"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132943"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ init request</span><span>
|
||||||
</span><a name="line-188"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
</span><a name="line-188"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Response</span><span> </span><span class="hs-identifier hs-type">BCL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
||||||
</span><a name="line-189"></a><a name="dispatchInitUnsafe"><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier">dispatchInitUnsafe</span></a></a><span> </span><a name="local-6989586621679133116"><a href="#local-6989586621679133116"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679133117"><a href="#local-6989586621679133117"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679133118"><a href="#local-6989586621679133118"><span class="hs-identifier">req</span></a></a><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-189"></a><a name="dispatchInitUnsafe"><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier">dispatchInitUnsafe</span></a></a><span> </span><a name="local-6989586621679132986"><a href="#local-6989586621679132986"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679132987"><a href="#local-6989586621679132987"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679132988"><a href="#local-6989586621679132988"><span class="hs-identifier">req</span></a></a><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-190"></a><span> </span><a href="SwaggerPetstore.Client.html#runExceptionLoggingT"><span class="hs-identifier hs-var">runExceptionLoggingT</span></a><span> </span><a href="#local-6989586621679133119"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><a href="#local-6989586621679133117"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
</span><a name="line-190"></a><span> </span><a href="SwaggerPetstore.Client.html#runExceptionLoggingT"><span class="hs-identifier hs-var">runExceptionLoggingT</span></a><span> </span><a href="#local-6989586621679132989"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><a href="#local-6989586621679132987"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||||
</span><a name="line-191"></a><span> </span><span class="hs-keyword">do</span><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelInfo</span><span> </span><a href="#local-6989586621679133119"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><a href="#local-6989586621679133121"><span class="hs-identifier hs-var">requestLogMsg</span></a><span>
|
</span><a name="line-191"></a><span> </span><span class="hs-keyword">do</span><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelInfo</span><span> </span><a href="#local-6989586621679132989"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><a href="#local-6989586621679132991"><span class="hs-identifier hs-var">requestLogMsg</span></a><span>
|
||||||
</span><a name="line-192"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelDebug</span><span> </span><a href="#local-6989586621679133119"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><a href="#local-6989586621679133122"><span class="hs-identifier hs-var">requestDbgLogMsg</span></a><span>
|
</span><a name="line-192"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelDebug</span><span> </span><a href="#local-6989586621679132989"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><a href="#local-6989586621679132992"><span class="hs-identifier hs-var">requestDbgLogMsg</span></a><span>
|
||||||
</span><a name="line-193"></a><span> </span><a name="local-6989586621679133554"><a href="#local-6989586621679133554"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">httpLbs</span><span> </span><a href="#local-6989586621679133118"><span class="hs-identifier hs-var">req</span></a><span> </span><a href="#local-6989586621679133116"><span class="hs-identifier hs-var">manager</span></a><span>
|
</span><a name="line-193"></a><span> </span><a name="local-6989586621679133424"><a href="#local-6989586621679133424"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">httpLbs</span><span> </span><a href="#local-6989586621679132988"><span class="hs-identifier hs-var">req</span></a><span> </span><a href="#local-6989586621679132986"><span class="hs-identifier hs-var">manager</span></a><span>
|
||||||
</span><a name="line-194"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelInfo</span><span> </span><a href="#local-6989586621679133119"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133124"><span class="hs-identifier hs-var">responseLogMsg</span></a><span> </span><a href="#local-6989586621679133554"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-194"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelInfo</span><span> </span><a href="#local-6989586621679132989"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679132994"><span class="hs-identifier hs-var">responseLogMsg</span></a><span> </span><a href="#local-6989586621679133424"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-195"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelDebug</span><span> </span><a href="#local-6989586621679133119"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">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-6989586621679133554"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-195"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelDebug</span><span> </span><a href="#local-6989586621679132989"><span class="hs-identifier hs-var">logSrc</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">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-6989586621679133424"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-196"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679133554"><span class="hs-identifier hs-var">res</span></a><span>
|
</span><a name="line-196"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679133424"><span class="hs-identifier hs-var">res</span></a><span>
|
||||||
</span><a name="line-197"></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-197"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-198"></a><span> </span><a name="local-6989586621679133119"><a href="#local-6989586621679133119"><span class="hs-identifier">logSrc</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"Client"</span><span>
|
</span><a name="line-198"></a><span> </span><a name="local-6989586621679132989"><a href="#local-6989586621679132989"><span class="hs-identifier">logSrc</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"Client"</span><span>
|
||||||
</span><a name="line-199"></a><span> </span><a name="local-6989586621679133120"><a href="#local-6989586621679133120"><span class="hs-identifier">endpoint</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-199"></a><span> </span><a name="local-6989586621679132990"><a href="#local-6989586621679132990"><span class="hs-identifier">endpoint</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-200"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">$</span><span>
|
</span><a name="line-200"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||||
</span><a name="line-201"></a><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">$</span><span>
|
</span><a name="line-201"></a><span> </span><span class="hs-identifier hs-var">BC</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||||
</span><a name="line-202"></a><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">method</span><span> </span><a href="#local-6989586621679133118"><span class="hs-identifier hs-var">req</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><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">host</span><span> </span><a href="#local-6989586621679133118"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">path</span><span> </span><a href="#local-6989586621679133118"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">queryString</span><span> </span><a href="#local-6989586621679133118"><span class="hs-identifier hs-var">req</span></a><span>
|
</span><a name="line-202"></a><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">method</span><span> </span><a href="#local-6989586621679132988"><span class="hs-identifier hs-var">req</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><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">host</span><span> </span><a href="#local-6989586621679132988"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">path</span><span> </span><a href="#local-6989586621679132988"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">queryString</span><span> </span><a href="#local-6989586621679132988"><span class="hs-identifier hs-var">req</span></a><span>
|
||||||
</span><a name="line-203"></a><span> </span><a name="local-6989586621679133121"><a href="#local-6989586621679133121"><span class="hs-identifier">requestLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"REQ:"</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679133120"><span class="hs-identifier hs-var">endpoint</span></a><span>
|
</span><a name="line-203"></a><span> </span><a name="local-6989586621679132991"><a href="#local-6989586621679132991"><span class="hs-identifier">requestLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"REQ:"</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679132990"><span class="hs-identifier hs-var">endpoint</span></a><span>
|
||||||
</span><a name="line-204"></a><span> </span><a name="local-6989586621679133122"><a href="#local-6989586621679133122"><span class="hs-identifier">requestDbgLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-204"></a><span> </span><a name="local-6989586621679132992"><a href="#local-6989586621679132992"><span class="hs-identifier">requestDbgLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-205"></a><span> </span><span class="hs-string">"Headers="</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">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><span class="hs-special">(</span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestHeaders</span><span> </span><a href="#local-6989586621679133118"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-string">" Body="</span><span> </span><span class="hs-operator hs-var"><></span><span>
|
</span><a name="line-205"></a><span> </span><span class="hs-string">"Headers="</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">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><span class="hs-special">(</span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestHeaders</span><span> </span><a href="#local-6989586621679132988"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-string">" Body="</span><span> </span><span class="hs-operator hs-var"><></span><span>
|
||||||
</span><a name="line-206"></a><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><a href="#local-6989586621679133118"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">of</span><span>
|
</span><a name="line-206"></a><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><a href="#local-6989586621679132988"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||||
</span><a name="line-207"></a><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><a name="local-6989586621679133125"><a href="#local-6989586621679133125"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decodeUtf8</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toStrict</span><span> </span><a href="#local-6989586621679133125"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-207"></a><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><a name="local-6989586621679132995"><a href="#local-6989586621679132995"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decodeUtf8</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toStrict</span><span> </span><a href="#local-6989586621679132995"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-208"></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-string">"<RequestBody>"</span><span class="hs-special">)</span><span>
|
</span><a name="line-208"></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-string">"<RequestBody>"</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-209"></a><span> </span><a name="local-6989586621679133123"><a href="#local-6989586621679133123"><span class="hs-identifier">responseStatusCode</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">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><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">statusCode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">responseStatus</span><span>
|
</span><a name="line-209"></a><span> </span><a name="local-6989586621679132993"><a href="#local-6989586621679132993"><span class="hs-identifier">responseStatusCode</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">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><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">statusCode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">responseStatus</span><span>
|
||||||
</span><a name="line-210"></a><span> </span><a name="local-6989586621679133124"><a href="#local-6989586621679133124"><span class="hs-identifier">responseLogMsg</span></a></a><span> </span><a name="local-6989586621679133500"><a href="#local-6989586621679133500"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-210"></a><span> </span><a name="local-6989586621679132994"><a href="#local-6989586621679132994"><span class="hs-identifier">responseLogMsg</span></a></a><span> </span><a name="local-6989586621679133370"><a href="#local-6989586621679133370"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-211"></a><span> </span><span class="hs-string">"RES:statusCode="</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679133123"><span class="hs-identifier hs-var">responseStatusCode</span></a><span> </span><a href="#local-6989586621679133500"><span class="hs-identifier hs-var">res</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-6989586621679133120"><span class="hs-identifier hs-var">endpoint</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-string">")"</span><span>
|
</span><a name="line-211"></a><span> </span><span class="hs-string">"RES:statusCode="</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679132993"><span class="hs-identifier hs-var">responseStatusCode</span></a><span> </span><a href="#local-6989586621679133370"><span class="hs-identifier hs-var">res</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-6989586621679132990"><span class="hs-identifier hs-var">endpoint</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-string">")"</span><span>
|
||||||
</span><a name="line-212"></a><span>
|
</span><a name="line-212"></a><span>
|
||||||
</span><a name="line-213"></a><span class="hs-comment">-- * InitRequest</span><span>
|
</span><a name="line-213"></a><span class="hs-comment">-- * InitRequest</span><span>
|
||||||
</span><a name="line-214"></a><span>
|
</span><a name="line-214"></a><span>
|
||||||
</span><a name="line-215"></a><span class="hs-comment">-- | wraps an http-client 'Request' with request/response type parameters</span><span>
|
</span><a name="line-215"></a><span class="hs-comment">-- | wraps an http-client 'Request' with request/response type parameters</span><span>
|
||||||
</span><a name="line-216"></a><span class="hs-keyword">newtype</span><span> </span><a name="InitRequest"><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span> </span><a name="local-6989586621679132954"><a href="#local-6989586621679132954"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679132955"><a href="#local-6989586621679132955"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679132956"><a href="#local-6989586621679132956"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679132957"><a href="#local-6989586621679132957"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="InitRequest"><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span>
|
</span><a name="line-216"></a><span class="hs-keyword">newtype</span><span> </span><a name="InitRequest"><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span> </span><a name="local-6989586621679132824"><a href="#local-6989586621679132824"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679132825"><a href="#local-6989586621679132825"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679132826"><a href="#local-6989586621679132826"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679132827"><a href="#local-6989586621679132827"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="InitRequest"><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span>
|
||||||
</span><a name="line-217"></a><span> </span><span class="hs-special">{</span><span> </span><a name="unInitRequest"><a href="SwaggerPetstore.Client.html#unInitRequest"><span class="hs-identifier">unInitRequest</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span>
|
</span><a name="line-217"></a><span> </span><span class="hs-special">{</span><span> </span><a name="unInitRequest"><a href="SwaggerPetstore.Client.html#unInitRequest"><span class="hs-identifier">unInitRequest</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span>
|
||||||
</span><a name="line-218"></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">)</span><span>
|
</span><a name="line-218"></a><span> </span><span class="hs-special">}</span><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Show</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-219"></a><span>
|
</span><a name="line-219"></a><span>
|
||||||
</span><a name="line-220"></a><span class="hs-comment">-- | Build an http-client 'Request' record from the supplied config and request</span><span>
|
</span><a name="line-220"></a><span class="hs-comment">-- | Build an http-client 'Request' record from the supplied config and request</span><span>
|
||||||
</span><a name="line-221"></a><span class="hs-identifier">_toInitRequest</span><span>
|
</span><a name="line-221"></a><span class="hs-identifier">_toInitRequest</span><span>
|
||||||
</span><a name="line-222"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679133066"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679133067"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-222"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132936"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132937"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-223"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
</span><a name="line-223"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||||
</span><a name="line-224"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679133068"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133067"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133069"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
</span><a name="line-224"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.API.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132938"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132937"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132939"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||||
</span><a name="line-225"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679133066"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
</span><a name="line-225"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132936"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ "accept" 'MimeType'</span><span>
|
||||||
</span><a name="line-226"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679133068"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133067"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133069"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679133066"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ initialized request</span><span>
|
</span><a name="line-226"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132938"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132937"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132939"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132936"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ initialized request</span><span>
|
||||||
</span><a name="line-227"></a><a name="_toInitRequest"><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier">_toInitRequest</span></a></a><span> </span><a name="local-6989586621679133555"><a href="#local-6989586621679133555"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133556"><a href="#local-6989586621679133556"><span class="hs-identifier">req0</span></a></a><span> </span><a name="local-6989586621679133557"><a href="#local-6989586621679133557"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
</span><a name="line-227"></a><a name="_toInitRequest"><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier">_toInitRequest</span></a></a><span> </span><a name="local-6989586621679133425"><a href="#local-6989586621679133425"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133426"><a href="#local-6989586621679133426"><span class="hs-identifier">req0</span></a></a><span> </span><a name="local-6989586621679133427"><a href="#local-6989586621679133427"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||||
</span><a name="line-228"></a><span> </span><a name="local-6989586621679133558"><a href="#local-6989586621679133558"><span class="hs-identifier">parsedReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">parseRequest</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">append</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679133555"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">concat</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">urlPath</span><span> </span><a href="#local-6989586621679133556"><span class="hs-identifier hs-var">req0</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
</span><a name="line-228"></a><span> </span><a name="local-6989586621679133428"><a href="#local-6989586621679133428"><span class="hs-identifier">parsedReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">parseRequest</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">append</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679133425"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">concat</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">urlPath</span><span> </span><a href="#local-6989586621679133426"><span class="hs-identifier hs-var">req0</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-229"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679133559"><a href="#local-6989586621679133559"><span class="hs-identifier">req1</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_setAcceptHeader"><span class="hs-identifier hs-var">_setAcceptHeader</span></a><span> </span><a href="#local-6989586621679133556"><span class="hs-identifier hs-var">req0</span></a><span> </span><a href="#local-6989586621679133557"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.API.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
|
</span><a name="line-229"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679133429"><a href="#local-6989586621679133429"><span class="hs-identifier">req1</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.API.html#_setAcceptHeader"><span class="hs-identifier hs-var">_setAcceptHeader</span></a><span> </span><a href="#local-6989586621679133426"><span class="hs-identifier hs-var">req0</span></a><span> </span><a href="#local-6989586621679133427"><span class="hs-identifier hs-var">accept</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.API.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
|
||||||
</span><a name="line-230"></a><span> </span><a name="local-6989586621679133560"><a href="#local-6989586621679133560"><span class="hs-identifier">reqHeaders</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-string">"User-Agent"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toHeader</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679133555"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">:</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679133559"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-230"></a><span> </span><a name="local-6989586621679133430"><a href="#local-6989586621679133430"><span class="hs-identifier">reqHeaders</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-string">"User-Agent"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toHeader</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679133425"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">:</span><span> </span><span class="hs-identifier">paramsHeaders</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679133429"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-231"></a><span> </span><a name="local-6989586621679133561"><a href="#local-6989586621679133561"><span class="hs-identifier">reqQuery</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">renderQuery</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">paramsQuery</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679133559"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
</span><a name="line-231"></a><span> </span><a name="local-6989586621679133431"><a href="#local-6989586621679133431"><span class="hs-identifier">reqQuery</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">renderQuery</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">paramsQuery</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679133429"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-232"></a><span> </span><a name="local-6989586621679133562"><a href="#local-6989586621679133562"><span class="hs-identifier">pReq</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133558"><span class="hs-identifier hs-var">parsedReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">method</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rMethod</span><span> </span><a href="#local-6989586621679133559"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-232"></a><span> </span><a name="local-6989586621679133432"><a href="#local-6989586621679133432"><span class="hs-identifier">pReq</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133428"><span class="hs-identifier hs-var">parsedReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">method</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rMethod</span><span> </span><a href="#local-6989586621679133429"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-233"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133560"><span class="hs-identifier hs-var">reqHeaders</span></a><span>
|
</span><a name="line-233"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133430"><span class="hs-identifier hs-var">reqHeaders</span></a><span>
|
||||||
</span><a name="line-234"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">queryString</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133561"><span class="hs-identifier hs-var">reqQuery</span></a><span>
|
</span><a name="line-234"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">queryString</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133431"><span class="hs-identifier hs-var">reqQuery</span></a><span>
|
||||||
</span><a name="line-235"></a><span> </span><span class="hs-special">}</span><span>
|
</span><a name="line-235"></a><span> </span><span class="hs-special">}</span><span>
|
||||||
</span><a name="line-236"></a><span> </span><a name="local-6989586621679133567"><a href="#local-6989586621679133567"><span class="hs-identifier">outReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679133559"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
</span><a name="line-236"></a><span> </span><a name="local-6989586621679133437"><a href="#local-6989586621679133437"><span class="hs-identifier">outReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">paramsBody</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">params</span><span> </span><a href="#local-6989586621679133429"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||||
</span><a name="line-237"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133562"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">mempty</span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
</span><a name="line-237"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133432"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">mempty</span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-238"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a name="local-6989586621679133563"><a href="#local-6989586621679133563"><span class="hs-identifier">bs</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133562"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyBS</span><span> </span><a href="#local-6989586621679133563"><span class="hs-identifier hs-var">bs</span></a><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
</span><a name="line-238"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a name="local-6989586621679133433"><a href="#local-6989586621679133433"><span class="hs-identifier">bs</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133432"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyBS</span><span> </span><a href="#local-6989586621679133433"><span class="hs-identifier hs-var">bs</span></a><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-239"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a name="local-6989586621679133564"><a href="#local-6989586621679133564"><span class="hs-identifier">bl</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133562"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><a href="#local-6989586621679133564"><span class="hs-identifier hs-var">bl</span></a><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
</span><a name="line-239"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a name="local-6989586621679133434"><a href="#local-6989586621679133434"><span class="hs-identifier">bl</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133432"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><a href="#local-6989586621679133434"><span class="hs-identifier hs-var">bl</span></a><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-240"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679133565"><a href="#local-6989586621679133565"><span class="hs-identifier">form</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133562"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlEncodeForm</span><span> </span><a href="#local-6989586621679133565"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
</span><a name="line-240"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679133435"><a href="#local-6989586621679133435"><span class="hs-identifier">form</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133432"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH</span><span class="hs-operator">.</span><span class="hs-identifier">requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">RequestBodyLBS</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlEncodeForm</span><span> </span><a href="#local-6989586621679133435"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">}</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-241"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679133566"><a href="#local-6989586621679133566"><span class="hs-identifier">parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formDataBody</span><span> </span><a href="#local-6989586621679133566"><span class="hs-identifier hs-var">parts</span></a><span> </span><a href="#local-6989586621679133562"><span class="hs-identifier hs-var">pReq</span></a><span>
|
</span><a name="line-241"></a><span> </span><a href="SwaggerPetstore.API.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679133436"><a href="#local-6989586621679133436"><span class="hs-identifier">parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">NH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formDataBody</span><span> </span><a href="#local-6989586621679133436"><span class="hs-identifier hs-var">parts</span></a><span> </span><a href="#local-6989586621679133432"><span class="hs-identifier hs-var">pReq</span></a><span>
|
||||||
</span><a name="line-242"></a><span>
|
</span><a name="line-242"></a><span>
|
||||||
</span><a name="line-243"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a href="#local-6989586621679133567"><span class="hs-identifier hs-var">outReq</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-243"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a href="#local-6989586621679133437"><span class="hs-identifier hs-var">outReq</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-244"></a><span>
|
</span><a name="line-244"></a><span>
|
||||||
</span><a name="line-245"></a><span class="hs-comment">-- | modify the underlying Request</span><span>
|
</span><a name="line-245"></a><span class="hs-comment">-- | modify the underlying Request</span><span>
|
||||||
</span><a name="line-246"></a><span class="hs-identifier">modifyInitRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679133062"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133063"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133064"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679133065"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679133062"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133063"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133064"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679133065"><span class="hs-identifier hs-type">accept</span></a><span> </span><span>
|
</span><a name="line-246"></a><span class="hs-identifier">modifyInitRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132932"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132933"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132934"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132935"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132932"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132933"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132934"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132935"><span class="hs-identifier hs-type">accept</span></a><span> </span><span>
|
||||||
</span><a name="line-247"></a><a name="modifyInitRequest"><a href="SwaggerPetstore.Client.html#modifyInitRequest"><span class="hs-identifier">modifyInitRequest</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679133568"><a href="#local-6989586621679133568"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679133569"><a href="#local-6989586621679133569"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133569"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679133568"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-247"></a><a name="modifyInitRequest"><a href="SwaggerPetstore.Client.html#modifyInitRequest"><span class="hs-identifier">modifyInitRequest</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679133438"><a href="#local-6989586621679133438"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679133439"><a href="#local-6989586621679133439"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133439"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679133438"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-248"></a><span>
|
</span><a name="line-248"></a><span>
|
||||||
</span><a name="line-249"></a><span class="hs-comment">-- | modify the underlying Request (monadic)</span><span>
|
</span><a name="line-249"></a><span class="hs-comment">-- | modify the underlying Request (monadic)</span><span>
|
||||||
</span><a name="line-250"></a><span class="hs-identifier">modifyInitRequestM</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679133057"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679133058"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133059"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133060"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679133061"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679133057"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679133057"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679133058"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679133059"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679133060"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679133061"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-250"></a><span class="hs-identifier">modifyInitRequestM</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679132927"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132928"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132929"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132930"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132931"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132927"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-identifier hs-type">NH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132927"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132928"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132929"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132930"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132931"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-251"></a><a name="modifyInitRequestM"><a href="SwaggerPetstore.Client.html#modifyInitRequestM"><span class="hs-identifier">modifyInitRequestM</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679133570"><a href="#local-6989586621679133570"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679133571"><a href="#local-6989586621679133571"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133571"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679133570"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-251"></a><a name="modifyInitRequestM"><a href="SwaggerPetstore.Client.html#modifyInitRequestM"><span class="hs-identifier">modifyInitRequestM</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679133440"><a href="#local-6989586621679133440"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679133441"><a href="#local-6989586621679133441"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">fmap</span><span> </span><a href="SwaggerPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133441"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679133440"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-252"></a><span>
|
</span><a name="line-252"></a><span>
|
||||||
</span><a name="line-253"></a><span class="hs-comment">-- * Logging</span><span>
|
</span><a name="line-253"></a><span class="hs-comment">-- * Logging</span><span>
|
||||||
</span><a name="line-254"></a><span>
|
</span><a name="line-254"></a><span>
|
||||||
</span><a name="line-255"></a><span class="hs-comment">-- | A block using a MonadLogger instance</span><span>
|
</span><a name="line-255"></a><span class="hs-comment">-- | A block using a MonadLogger instance</span><span>
|
||||||
</span><a name="line-256"></a><span class="hs-keyword">type</span><span> </span><a name="ExecLoggingT"><a href="SwaggerPetstore.Client.html#ExecLoggingT"><span class="hs-identifier">ExecLoggingT</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679132952"><a href="#local-6989586621679132952"><span class="hs-identifier">m</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679132952"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span>
|
</span><a name="line-256"></a><span class="hs-keyword">type</span><span> </span><a name="ExecLoggingT"><a href="SwaggerPetstore.Client.html#ExecLoggingT"><span class="hs-identifier">ExecLoggingT</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679132822"><a href="#local-6989586621679132822"><span class="hs-identifier">m</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679132822"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span>
|
||||||
</span><a name="line-257"></a><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679132953"><a href="#local-6989586621679132953"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LoggingT</span><span> </span><a href="#local-6989586621679132952"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132953"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132952"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132953"><span class="hs-identifier hs-type">a</span></a><span>
|
</span><a name="line-257"></a><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679132823"><a href="#local-6989586621679132823"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LoggingT</span><span> </span><a href="#local-6989586621679132822"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132823"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132822"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132823"><span class="hs-identifier hs-type">a</span></a><span>
|
||||||
</span><a name="line-258"></a><span>
|
</span><a name="line-258"></a><span>
|
||||||
</span><a name="line-259"></a><span class="hs-comment">-- ** Null Logger</span><span>
|
</span><a name="line-259"></a><span class="hs-comment">-- ** Null Logger</span><span>
|
||||||
</span><a name="line-260"></a><span>
|
</span><a name="line-260"></a><span>
|
||||||
@@ -263,7 +263,7 @@ Module : SwaggerPetstore.Client
|
|||||||
</span><a name="line-263"></a><a name="nullLogger"><a href="SwaggerPetstore.Client.html#nullLogger"><span class="hs-identifier">nullLogger</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </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><span class="hs-special">(</span><span class="hs-special">)</span><span>
|
</span><a name="line-263"></a><a name="nullLogger"><a href="SwaggerPetstore.Client.html#nullLogger"><span class="hs-identifier">nullLogger</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </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><span class="hs-special">(</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-264"></a><span>
|
</span><a name="line-264"></a><span>
|
||||||
</span><a name="line-265"></a><span class="hs-comment">-- | run the monad transformer that disables logging</span><span>
|
</span><a name="line-265"></a><span class="hs-comment">-- | run the monad transformer that disables logging</span><span>
|
||||||
</span><a name="line-266"></a><span class="hs-identifier">runNullLoggingT</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LoggingT</span><span> </span><a href="#local-6989586621679132964"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132965"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132964"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132965"><span class="hs-identifier hs-type">a</span></a><span>
|
</span><a name="line-266"></a><span class="hs-identifier">runNullLoggingT</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LoggingT</span><span> </span><a href="#local-6989586621679132834"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132835"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132834"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132835"><span class="hs-identifier hs-type">a</span></a><span>
|
||||||
</span><a name="line-267"></a><a name="runNullLoggingT"><a href="SwaggerPetstore.Client.html#runNullLoggingT"><span class="hs-identifier">runNullLoggingT</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-special">`</span><span class="hs-identifier">LG</span><span class="hs-operator">.</span><span class="hs-identifier">runLoggingT</span><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Client.html#nullLogger"><span class="hs-identifier hs-var">nullLogger</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-267"></a><a name="runNullLoggingT"><a href="SwaggerPetstore.Client.html#runNullLoggingT"><span class="hs-identifier">runNullLoggingT</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-special">`</span><span class="hs-identifier">LG</span><span class="hs-operator">.</span><span class="hs-identifier">runLoggingT</span><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Client.html#nullLogger"><span class="hs-identifier hs-var">nullLogger</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-268"></a><span>
|
</span><a name="line-268"></a><span>
|
||||||
</span><a name="line-269"></a><span class="hs-comment">-- ** Logging Filters</span><span>
|
</span><a name="line-269"></a><span class="hs-comment">-- ** Logging Filters</span><span>
|
||||||
@@ -281,38 +281,38 @@ Module : SwaggerPetstore.Client
|
|||||||
</span><a name="line-281"></a><a name="debugLevelFilter"><a href="SwaggerPetstore.Client.html#debugLevelFilter"><span class="hs-identifier">debugLevelFilter</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#minLevelFilter"><span class="hs-identifier hs-var">minLevelFilter</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelDebug</span><span>
|
</span><a name="line-281"></a><a name="debugLevelFilter"><a href="SwaggerPetstore.Client.html#debugLevelFilter"><span class="hs-identifier">debugLevelFilter</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#minLevelFilter"><span class="hs-identifier hs-var">minLevelFilter</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelDebug</span><span>
|
||||||
</span><a name="line-282"></a><span>
|
</span><a name="line-282"></a><span>
|
||||||
</span><a name="line-283"></a><span class="hs-identifier">minLevelFilter</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogSource</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Bool</span><span>
|
</span><a name="line-283"></a><span class="hs-identifier">minLevelFilter</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogSource</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Bool</span><span>
|
||||||
</span><a name="line-284"></a><a name="minLevelFilter"><a href="SwaggerPetstore.Client.html#minLevelFilter"><span class="hs-identifier">minLevelFilter</span></a></a><span> </span><a name="local-6989586621679133572"><a href="#local-6989586621679133572"><span class="hs-identifier">l</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679133573"><a href="#local-6989586621679133573"><span class="hs-identifier">l'</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133573"><span class="hs-identifier hs-var">l'</span></a><span> </span><span class="hs-operator hs-var">>=</span><span> </span><a href="#local-6989586621679133572"><span class="hs-identifier hs-var">l</span></a><span>
|
</span><a name="line-284"></a><a name="minLevelFilter"><a href="SwaggerPetstore.Client.html#minLevelFilter"><span class="hs-identifier">minLevelFilter</span></a></a><span> </span><a name="local-6989586621679133442"><a href="#local-6989586621679133442"><span class="hs-identifier">l</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679133443"><a href="#local-6989586621679133443"><span class="hs-identifier">l'</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133443"><span class="hs-identifier hs-var">l'</span></a><span> </span><span class="hs-operator hs-var">>=</span><span> </span><a href="#local-6989586621679133442"><span class="hs-identifier hs-var">l</span></a><span>
|
||||||
</span><a name="line-285"></a><span>
|
</span><a name="line-285"></a><span>
|
||||||
</span><a name="line-286"></a><span class="hs-comment">-- ** Logging </span><span>
|
</span><a name="line-286"></a><span class="hs-comment">-- ** Logging </span><span>
|
||||||
</span><a name="line-287"></a><span>
|
</span><a name="line-287"></a><span>
|
||||||
</span><a name="line-288"></a><span class="hs-comment">-- | Log a message using the current time</span><span>
|
</span><a name="line-288"></a><span class="hs-comment">-- | Log a message using the current time</span><span>
|
||||||
</span><a name="line-289"></a><span class="hs-identifier">logNST</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679132963"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadLogger</span><span> </span><a href="#local-6989586621679132963"><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">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogLevel</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><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132963"><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-289"></a><span class="hs-identifier">logNST</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679132833"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadLogger</span><span> </span><a href="#local-6989586621679132833"><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">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LogLevel</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><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132833"><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-290"></a><a name="logNST"><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier">logNST</span></a></a><span> </span><a name="local-6989586621679133574"><a href="#local-6989586621679133574"><span class="hs-identifier">level</span></a></a><span> </span><a name="local-6989586621679133575"><a href="#local-6989586621679133575"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679133576"><a href="#local-6989586621679133576"><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-290"></a><a name="logNST"><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier">logNST</span></a></a><span> </span><a name="local-6989586621679133444"><a href="#local-6989586621679133444"><span class="hs-identifier">level</span></a></a><span> </span><a name="local-6989586621679133445"><a href="#local-6989586621679133445"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679133446"><a href="#local-6989586621679133446"><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-291"></a><span> </span><a name="local-6989586621679133608"><a href="#local-6989586621679133608"><span class="hs-identifier">now</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">liftIO</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133578"><span class="hs-identifier hs-var">formatTimeLog</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">getCurrentTime</span><span class="hs-special">)</span><span>
|
</span><a name="line-291"></a><span> </span><a name="local-6989586621679133478"><a href="#local-6989586621679133478"><span class="hs-identifier">now</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">liftIO</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133448"><span class="hs-identifier hs-var">formatTimeLog</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">getCurrentTime</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-292"></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">logOtherNS</span><span> </span><a href="#local-6989586621679133577"><span class="hs-identifier hs-var">sourceLog</span></a><span> </span><a href="#local-6989586621679133574"><span class="hs-identifier hs-var">level</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133608"><span class="hs-identifier hs-var">now</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-6989586621679133576"><span class="hs-identifier hs-var">msg</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-292"></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">logOtherNS</span><span> </span><a href="#local-6989586621679133447"><span class="hs-identifier hs-var">sourceLog</span></a><span> </span><a href="#local-6989586621679133444"><span class="hs-identifier hs-var">level</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133478"><span class="hs-identifier hs-var">now</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-6989586621679133446"><span class="hs-identifier hs-var">msg</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-293"></a><span> </span><span class="hs-keyword">where</span><span>
|
</span><a name="line-293"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||||
</span><a name="line-294"></a><span> </span><a name="local-6989586621679133577"><a href="#local-6989586621679133577"><span class="hs-identifier">sourceLog</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"SwaggerPetstore/"</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679133575"><span class="hs-identifier hs-var">src</span></a><span>
|
</span><a name="line-294"></a><span> </span><a name="local-6989586621679133447"><a href="#local-6989586621679133447"><span class="hs-identifier">sourceLog</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"SwaggerPetstore/"</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679133445"><span class="hs-identifier hs-var">src</span></a><span>
|
||||||
</span><a name="line-295"></a><span> </span><a name="local-6989586621679133578"><a href="#local-6989586621679133578"><span class="hs-identifier">formatTimeLog</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-295"></a><span> </span><a name="local-6989586621679133448"><a href="#local-6989586621679133448"><span class="hs-identifier">formatTimeLog</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-296"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formatTime</span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultTimeLocale</span><span> </span><span class="hs-string">"%Y-%m-%dT%H:%M:%S%Z"</span><span>
|
</span><a name="line-296"></a><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formatTime</span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultTimeLocale</span><span> </span><span class="hs-string">"%Y-%m-%dT%H:%M:%S%Z"</span><span>
|
||||||
</span><a name="line-297"></a><span>
|
</span><a name="line-297"></a><span>
|
||||||
</span><a name="line-298"></a><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
|
</span><a name="line-298"></a><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
|
||||||
</span><a name="line-299"></a><span class="hs-identifier">logExceptions</span><span>
|
</span><a name="line-299"></a><span class="hs-identifier">logExceptions</span><span>
|
||||||
</span><a name="line-300"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadLogger</span><span> </span><a href="#local-6989586621679132961"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadCatch</span><span> </span><a href="#local-6989586621679132961"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679132961"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-300"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadLogger</span><span> </span><a href="#local-6989586621679132831"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadCatch</span><span> </span><a href="#local-6989586621679132831"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679132831"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-301"></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-6989586621679132961"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132962"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132961"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132962"><span class="hs-identifier hs-type">a</span></a><span>
|
</span><a name="line-301"></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-6989586621679132831"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132832"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132831"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132832"><span class="hs-identifier hs-type">a</span></a><span>
|
||||||
</span><a name="line-302"></a><a name="logExceptions"><a href="SwaggerPetstore.Client.html#logExceptions"><span class="hs-identifier">logExceptions</span></a></a><span> </span><a name="local-6989586621679133609"><a href="#local-6989586621679133609"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-302"></a><a name="logExceptions"><a href="SwaggerPetstore.Client.html#logExceptions"><span class="hs-identifier">logExceptions</span></a></a><span> </span><a name="local-6989586621679133479"><a href="#local-6989586621679133479"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-303"></a><span> </span><span class="hs-identifier hs-var">E</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">handle</span><span>
|
</span><a name="line-303"></a><span> </span><span class="hs-identifier hs-var">E</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">handle</span><span>
|
||||||
</span><a name="line-304"></a><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679133866"><a href="#local-6989586621679133866"><span class="hs-identifier">e</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">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-304"></a><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679133736"><a href="#local-6989586621679133736"><span class="hs-identifier">e</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">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-305"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelError</span><span> </span><a href="#local-6989586621679133609"><span class="hs-identifier hs-var">src</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">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-6989586621679133866"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-305"></a><span> </span><a href="SwaggerPetstore.Client.html#logNST"><span class="hs-identifier hs-var">logNST</span></a><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">LevelError</span><span> </span><a href="#local-6989586621679133479"><span class="hs-identifier hs-var">src</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">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-6989586621679133736"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-306"></a><span> </span><span class="hs-identifier hs-var">E</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">throw</span><span> </span><a href="#local-6989586621679133866"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-306"></a><span> </span><span class="hs-identifier hs-var">E</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">throw</span><span> </span><a href="#local-6989586621679133736"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-307"></a><span>
|
</span><a name="line-307"></a><span>
|
||||||
</span><a name="line-308"></a><span class="hs-comment">-- | Run a block using the configured MonadLogger instance</span><span>
|
</span><a name="line-308"></a><span class="hs-comment">-- | Run a block using the configured MonadLogger instance</span><span>
|
||||||
</span><a name="line-309"></a><span class="hs-identifier">runLoggingT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#ExecLoggingT"><span class="hs-identifier hs-type">ExecLoggingT</span></a><span>
|
</span><a name="line-309"></a><span class="hs-identifier">runLoggingT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#ExecLoggingT"><span class="hs-identifier hs-type">ExecLoggingT</span></a><span>
|
||||||
</span><a name="line-310"></a><a name="runLoggingT"><a href="SwaggerPetstore.Client.html#runLoggingT"><span class="hs-identifier">runLoggingT</span></a></a><span> </span><a name="local-6989586621679133867"><a href="#local-6989586621679133867"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-310"></a><a name="runLoggingT"><a href="SwaggerPetstore.Client.html#runLoggingT"><span class="hs-identifier">runLoggingT</span></a></a><span> </span><a name="local-6989586621679133737"><a href="#local-6989586621679133737"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-311"></a><span> </span><span class="hs-identifier">configExecLoggingT</span><span> </span><a href="#local-6989586621679133867"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">filterLogger</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLoggingFilter</span><span> </span><a href="#local-6989586621679133867"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-311"></a><span> </span><span class="hs-identifier">configExecLoggingT</span><span> </span><a href="#local-6989586621679133737"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">LG</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">filterLogger</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLoggingFilter</span><span> </span><a href="#local-6989586621679133737"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-312"></a><span>
|
</span><a name="line-312"></a><span>
|
||||||
</span><a name="line-313"></a><span class="hs-comment">-- | Run a block using the configured MonadLogger instance (logs exceptions)</span><span>
|
</span><a name="line-313"></a><span class="hs-comment">-- | Run a block using the configured MonadLogger instance (logs exceptions)</span><span>
|
||||||
</span><a name="line-314"></a><span class="hs-identifier">runExceptionLoggingT</span><span>
|
</span><a name="line-314"></a><span class="hs-identifier">runExceptionLoggingT</span><span>
|
||||||
</span><a name="line-315"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadCatch</span><span> </span><a href="#local-6989586621679132959"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679132959"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
</span><a name="line-315"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">E</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadCatch</span><span> </span><a href="#local-6989586621679132829"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MonadIO</span><span> </span><a href="#local-6989586621679132829"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-316"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LoggingT</span><span> </span><a href="#local-6989586621679132959"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132960"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132959"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132960"><span class="hs-identifier hs-type">a</span></a><span>
|
</span><a name="line-316"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">T</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Client.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">LoggingT</span><span> </span><a href="#local-6989586621679132829"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132830"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132829"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679132830"><span class="hs-identifier hs-type">a</span></a><span>
|
||||||
</span><a name="line-317"></a><a name="runExceptionLoggingT"><a href="SwaggerPetstore.Client.html#runExceptionLoggingT"><span class="hs-identifier">runExceptionLoggingT</span></a></a><span> </span><a name="local-6989586621679133868"><a href="#local-6989586621679133868"><span class="hs-identifier">logSrc</span></a></a><span> </span><a name="local-6989586621679133869"><a href="#local-6989586621679133869"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#runLoggingT"><span class="hs-identifier hs-var">runLoggingT</span></a><span> </span><a href="#local-6989586621679133869"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Client.html#logExceptions"><span class="hs-identifier hs-var">logExceptions</span></a><span> </span><a href="#local-6989586621679133868"><span class="hs-identifier hs-var">logSrc</span></a><span>
|
</span><a name="line-317"></a><a name="runExceptionLoggingT"><a href="SwaggerPetstore.Client.html#runExceptionLoggingT"><span class="hs-identifier">runExceptionLoggingT</span></a></a><span> </span><a name="local-6989586621679133738"><a href="#local-6989586621679133738"><span class="hs-identifier">logSrc</span></a></a><span> </span><a name="local-6989586621679133739"><a href="#local-6989586621679133739"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#runLoggingT"><span class="hs-identifier hs-var">runLoggingT</span></a><span> </span><a href="#local-6989586621679133739"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Client.html#logExceptions"><span class="hs-identifier hs-var">logExceptions</span></a><span> </span><a href="#local-6989586621679133738"><span class="hs-identifier hs-var">logSrc</span></a><span>
|
||||||
</span><a name="line-318"></a></pre></body></html>
|
</span><a name="line-318"></a></pre></body></html>
|
||||||
@@ -29,175 +29,166 @@ Module : SwaggerPetstore.Lens
|
|||||||
</span><a name="line-29"></a><span>
|
</span><a name="line-29"></a><span>
|
||||||
</span><a name="line-30"></a><span class="hs-comment">-- * Type Aliases</span><span>
|
</span><a name="line-30"></a><span class="hs-comment">-- * Type Aliases</span><span>
|
||||||
</span><a name="line-31"></a><span>
|
</span><a name="line-31"></a><span>
|
||||||
</span><a name="line-32"></a><span class="hs-keyword">type</span><span> </span><a name="Traversal_%27"><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier">Traversal_'</span></a></a><span> </span><a name="local-6989586621679079377"><a href="#local-6989586621679079377"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679079378"><a href="#local-6989586621679079378"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_"><span class="hs-identifier hs-type">Traversal_</span></a><span> </span><a href="#local-6989586621679079377"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679079377"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679079378"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679079378"><span class="hs-identifier hs-type">a</span></a><span>
|
</span><a name="line-32"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_%27"><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier">Lens_'</span></a></a><span> </span><a name="local-6989586621679079367"><a href="#local-6989586621679079367"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679079368"><a href="#local-6989586621679079368"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a><span> </span><a href="#local-6989586621679079367"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679079367"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679079368"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679079368"><span class="hs-identifier hs-type">a</span></a><span>
|
||||||
</span><a name="line-33"></a><span class="hs-keyword">type</span><span> </span><a name="Traversal_"><a href="SwaggerPetstore.Lens.html#Traversal_"><span class="hs-identifier">Traversal_</span></a></a><span> </span><a name="local-6989586621679079372"><a href="#local-6989586621679079372"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679079373"><a href="#local-6989586621679079373"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679079374"><a href="#local-6989586621679079374"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679079375"><a href="#local-6989586621679079375"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span class="hs-special">(</span><a name="local-6989586621679079376"><a href="#local-6989586621679079376"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-operator hs-type">*</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-operator hs-type">*</span><span class="hs-special">)</span><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679079376"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679079374"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079376"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679079375"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079372"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079376"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679079373"><span class="hs-identifier hs-type">t</span></a><span>
|
</span><a name="line-33"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_"><a href="SwaggerPetstore.Lens.html#Lens_"><span class="hs-identifier">Lens_</span></a></a><span> </span><a name="local-6989586621679079362"><a href="#local-6989586621679079362"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679079363"><a href="#local-6989586621679079363"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679079364"><a href="#local-6989586621679079364"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679079365"><a href="#local-6989586621679079365"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span class="hs-special">(</span><a name="local-6989586621679079366"><a href="#local-6989586621679079366"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-operator hs-type">*</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-operator hs-type">*</span><span class="hs-special">)</span><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">Functor</span><span> </span><a href="#local-6989586621679079366"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679079364"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079366"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679079365"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079362"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079366"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679079363"><span class="hs-identifier hs-type">t</span></a><span>
|
||||||
</span><a name="line-34"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_%27"><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier">Lens_'</span></a></a><span> </span><a name="local-6989586621679079370"><a href="#local-6989586621679079370"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679079371"><a href="#local-6989586621679079371"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a><span> </span><a href="#local-6989586621679079370"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679079370"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679079371"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679079371"><span class="hs-identifier hs-type">a</span></a><span>
|
</span><a name="line-34"></a><span>
|
||||||
</span><a name="line-35"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_"><a href="SwaggerPetstore.Lens.html#Lens_"><span class="hs-identifier">Lens_</span></a></a><span> </span><a name="local-6989586621679079365"><a href="#local-6989586621679079365"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679079366"><a href="#local-6989586621679079366"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679079367"><a href="#local-6989586621679079367"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679079368"><a href="#local-6989586621679079368"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><span class="hs-special">(</span><a name="local-6989586621679079369"><a href="#local-6989586621679079369"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-operator hs-type">*</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-operator hs-type">*</span><span class="hs-special">)</span><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">Functor</span><span> </span><a href="#local-6989586621679079369"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679079367"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079369"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679079368"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079365"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079369"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679079366"><span class="hs-identifier hs-type">t</span></a><span>
|
</span><a name="line-35"></a><span>
|
||||||
</span><a name="line-36"></a><span>
|
</span><a name="line-36"></a><span class="hs-comment">-- * ApiResponse</span><span>
|
||||||
</span><a name="line-37"></a><span>
|
</span><a name="line-37"></a><span>
|
||||||
</span><a name="line-38"></a><span class="hs-comment">-- * ApiResponse</span><span>
|
</span><a name="line-38"></a><span class="hs-comment">-- | 'apiResponseCode' Lens</span><span>
|
||||||
</span><a name="line-39"></a><span>
|
</span><a name="line-39"></a><span class="hs-identifier">apiResponseCodeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-40"></a><span class="hs-comment">-- | 'apiResponseCode' Traversal</span><span>
|
</span><a name="line-40"></a><a name="apiResponseCodeL"><a href="SwaggerPetstore.Lens.html#apiResponseCodeL"><span class="hs-identifier">apiResponseCodeL</span></a></a><span> </span><a name="local-6989586621679079369"><a href="#local-6989586621679079369"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079373"><a href="#local-6989586621679079373"><span class="hs-identifier">apiResponseCode</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079373"><span class="hs-identifier hs-var">apiResponseCode</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079369"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079370"><span class="hs-identifier hs-var">apiResponseCode</span></a><span>
|
||||||
</span><a name="line-41"></a><span class="hs-identifier">apiResponseCodeT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span>
|
</span><a name="line-41"></a><span class="hs-pragma">{-# INLINE apiResponseCodeL #-}</span><span>
|
||||||
</span><a name="line-42"></a><a name="apiResponseCodeT"><a href="SwaggerPetstore.Lens.html#apiResponseCodeT"><span class="hs-identifier">apiResponseCodeT</span></a></a><span> </span><a name="local-6989586621679079383"><a href="#local-6989586621679079383"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079384"><a href="#local-6989586621679079384"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">apiResponseCode</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079385"><a href="#local-6989586621679079385"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079384"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">apiResponseCode</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079385"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079383"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079384"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-42"></a><span>
|
||||||
</span><a name="line-43"></a><span class="hs-pragma">{-# INLINE apiResponseCodeT #-}</span><span>
|
</span><a name="line-43"></a><span class="hs-comment">-- | 'apiResponseType' Lens</span><span>
|
||||||
</span><a name="line-44"></a><span>
|
</span><a name="line-44"></a><span class="hs-identifier">apiResponseTypeL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-45"></a><span class="hs-comment">-- | 'apiResponseType' Traversal</span><span>
|
</span><a name="line-45"></a><a name="apiResponseTypeL"><a href="SwaggerPetstore.Lens.html#apiResponseTypeL"><span class="hs-identifier">apiResponseTypeL</span></a></a><span> </span><a name="local-6989586621679079374"><a href="#local-6989586621679079374"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079378"><a href="#local-6989586621679079378"><span class="hs-identifier">apiResponseType</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079378"><span class="hs-identifier hs-var">apiResponseType</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079374"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079376"><span class="hs-identifier hs-var">apiResponseType</span></a><span>
|
||||||
</span><a name="line-46"></a><span class="hs-identifier">apiResponseTypeT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-46"></a><span class="hs-pragma">{-# INLINE apiResponseTypeL #-}</span><span>
|
||||||
</span><a name="line-47"></a><a name="apiResponseTypeT"><a href="SwaggerPetstore.Lens.html#apiResponseTypeT"><span class="hs-identifier">apiResponseTypeT</span></a></a><span> </span><a name="local-6989586621679079386"><a href="#local-6989586621679079386"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079387"><a href="#local-6989586621679079387"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">apiResponseType</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079388"><a href="#local-6989586621679079388"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079387"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">apiResponseType</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079388"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079386"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079387"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-47"></a><span>
|
||||||
</span><a name="line-48"></a><span class="hs-pragma">{-# INLINE apiResponseTypeT #-}</span><span>
|
</span><a name="line-48"></a><span class="hs-comment">-- | 'apiResponseMessage' Lens</span><span>
|
||||||
</span><a name="line-49"></a><span>
|
</span><a name="line-49"></a><span class="hs-identifier">apiResponseMessageL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-50"></a><span class="hs-comment">-- | 'apiResponseMessage' Traversal</span><span>
|
</span><a name="line-50"></a><a name="apiResponseMessageL"><a href="SwaggerPetstore.Lens.html#apiResponseMessageL"><span class="hs-identifier">apiResponseMessageL</span></a></a><span> </span><a name="local-6989586621679079379"><a href="#local-6989586621679079379"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079383"><a href="#local-6989586621679079383"><span class="hs-identifier">apiResponseMessage</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-var">ApiResponse</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079383"><span class="hs-identifier hs-var">apiResponseMessage</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079379"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079382"><span class="hs-identifier hs-var">apiResponseMessage</span></a><span>
|
||||||
</span><a name="line-51"></a><span class="hs-identifier">apiResponseMessageT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-51"></a><span class="hs-pragma">{-# INLINE apiResponseMessageL #-}</span><span>
|
||||||
</span><a name="line-52"></a><a name="apiResponseMessageT"><a href="SwaggerPetstore.Lens.html#apiResponseMessageT"><span class="hs-identifier">apiResponseMessageT</span></a></a><span> </span><a name="local-6989586621679079389"><a href="#local-6989586621679079389"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079390"><a href="#local-6989586621679079390"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">apiResponseMessage</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079391"><a href="#local-6989586621679079391"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079390"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">apiResponseMessage</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079391"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079389"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079390"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-52"></a><span>
|
||||||
</span><a name="line-53"></a><span class="hs-pragma">{-# INLINE apiResponseMessageT #-}</span><span>
|
</span><a name="line-53"></a><span>
|
||||||
</span><a name="line-54"></a><span>
|
</span><a name="line-54"></a><span>
|
||||||
</span><a name="line-55"></a><span>
|
</span><a name="line-55"></a><span class="hs-comment">-- * Category</span><span>
|
||||||
</span><a name="line-56"></a><span>
|
</span><a name="line-56"></a><span>
|
||||||
</span><a name="line-57"></a><span class="hs-comment">-- * Category</span><span>
|
</span><a name="line-57"></a><span class="hs-comment">-- | 'categoryId' Lens</span><span>
|
||||||
</span><a name="line-58"></a><span>
|
</span><a name="line-58"></a><span class="hs-identifier">categoryIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-59"></a><span class="hs-comment">-- | 'categoryId' Traversal</span><span>
|
</span><a name="line-59"></a><a name="categoryIdL"><a href="SwaggerPetstore.Lens.html#categoryIdL"><span class="hs-identifier">categoryIdL</span></a></a><span> </span><a name="local-6989586621679079384"><a href="#local-6989586621679079384"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079387"><a href="#local-6989586621679079387"><span class="hs-identifier">categoryId</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079387"><span class="hs-identifier hs-var">categoryId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079384"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079385"><span class="hs-identifier hs-var">categoryId</span></a><span>
|
||||||
</span><a name="line-60"></a><span class="hs-identifier">categoryIdT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span>
|
</span><a name="line-60"></a><span class="hs-pragma">{-# INLINE categoryIdL #-}</span><span>
|
||||||
</span><a name="line-61"></a><a name="categoryIdT"><a href="SwaggerPetstore.Lens.html#categoryIdT"><span class="hs-identifier">categoryIdT</span></a></a><span> </span><a name="local-6989586621679079392"><a href="#local-6989586621679079392"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079393"><a href="#local-6989586621679079393"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">categoryId</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079394"><a href="#local-6989586621679079394"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079393"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">categoryId</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079394"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079392"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079393"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-61"></a><span>
|
||||||
</span><a name="line-62"></a><span class="hs-pragma">{-# INLINE categoryIdT #-}</span><span>
|
</span><a name="line-62"></a><span class="hs-comment">-- | 'categoryName' Lens</span><span>
|
||||||
</span><a name="line-63"></a><span>
|
</span><a name="line-63"></a><span class="hs-identifier">categoryNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-64"></a><span class="hs-comment">-- | 'categoryName' Traversal</span><span>
|
</span><a name="line-64"></a><a name="categoryNameL"><a href="SwaggerPetstore.Lens.html#categoryNameL"><span class="hs-identifier">categoryNameL</span></a></a><span> </span><a name="local-6989586621679079388"><a href="#local-6989586621679079388"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079391"><a href="#local-6989586621679079391"><span class="hs-identifier">categoryName</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-var">Category</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079391"><span class="hs-identifier hs-var">categoryName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079388"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079390"><span class="hs-identifier hs-var">categoryName</span></a><span>
|
||||||
</span><a name="line-65"></a><span class="hs-identifier">categoryNameT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-65"></a><span class="hs-pragma">{-# INLINE categoryNameL #-}</span><span>
|
||||||
</span><a name="line-66"></a><a name="categoryNameT"><a href="SwaggerPetstore.Lens.html#categoryNameT"><span class="hs-identifier">categoryNameT</span></a></a><span> </span><a name="local-6989586621679079395"><a href="#local-6989586621679079395"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079396"><a href="#local-6989586621679079396"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">categoryName</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079397"><a href="#local-6989586621679079397"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079396"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">categoryName</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079397"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079395"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079396"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-66"></a><span>
|
||||||
</span><a name="line-67"></a><span class="hs-pragma">{-# INLINE categoryNameT #-}</span><span>
|
</span><a name="line-67"></a><span>
|
||||||
</span><a name="line-68"></a><span>
|
</span><a name="line-68"></a><span>
|
||||||
</span><a name="line-69"></a><span>
|
</span><a name="line-69"></a><span class="hs-comment">-- * Order</span><span>
|
||||||
</span><a name="line-70"></a><span>
|
</span><a name="line-70"></a><span>
|
||||||
</span><a name="line-71"></a><span class="hs-comment">-- * Order</span><span>
|
</span><a name="line-71"></a><span class="hs-comment">-- | 'orderId' Lens</span><span>
|
||||||
</span><a name="line-72"></a><span>
|
</span><a name="line-72"></a><span class="hs-identifier">orderIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-73"></a><span class="hs-comment">-- | 'orderId' Traversal</span><span>
|
</span><a name="line-73"></a><a name="orderIdL"><a href="SwaggerPetstore.Lens.html#orderIdL"><span class="hs-identifier">orderIdL</span></a></a><span> </span><a name="local-6989586621679079392"><a href="#local-6989586621679079392"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079399"><a href="#local-6989586621679079399"><span class="hs-identifier">orderId</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079399"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079392"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079393"><span class="hs-identifier hs-var">orderId</span></a><span>
|
||||||
</span><a name="line-74"></a><span class="hs-identifier">orderIdT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span>
|
</span><a name="line-74"></a><span class="hs-pragma">{-# INLINE orderIdL #-}</span><span>
|
||||||
</span><a name="line-75"></a><a name="orderIdT"><a href="SwaggerPetstore.Lens.html#orderIdT"><span class="hs-identifier">orderIdT</span></a></a><span> </span><a name="local-6989586621679079398"><a href="#local-6989586621679079398"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079399"><a href="#local-6989586621679079399"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">orderId</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079400"><a href="#local-6989586621679079400"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079399"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">orderId</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079400"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079398"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079399"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-75"></a><span>
|
||||||
</span><a name="line-76"></a><span class="hs-pragma">{-# INLINE orderIdT #-}</span><span>
|
</span><a name="line-76"></a><span class="hs-comment">-- | 'orderPetId' Lens</span><span>
|
||||||
</span><a name="line-77"></a><span>
|
</span><a name="line-77"></a><span class="hs-identifier">orderPetIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-78"></a><span class="hs-comment">-- | 'orderPetId' Traversal</span><span>
|
</span><a name="line-78"></a><a name="orderPetIdL"><a href="SwaggerPetstore.Lens.html#orderPetIdL"><span class="hs-identifier">orderPetIdL</span></a></a><span> </span><a name="local-6989586621679079400"><a href="#local-6989586621679079400"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079407"><a href="#local-6989586621679079407"><span class="hs-identifier">orderPetId</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079407"><span class="hs-identifier hs-var">orderPetId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079400"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079402"><span class="hs-identifier hs-var">orderPetId</span></a><span>
|
||||||
</span><a name="line-79"></a><span class="hs-identifier">orderPetIdT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span>
|
</span><a name="line-79"></a><span class="hs-pragma">{-# INLINE orderPetIdL #-}</span><span>
|
||||||
</span><a name="line-80"></a><a name="orderPetIdT"><a href="SwaggerPetstore.Lens.html#orderPetIdT"><span class="hs-identifier">orderPetIdT</span></a></a><span> </span><a name="local-6989586621679079401"><a href="#local-6989586621679079401"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079402"><a href="#local-6989586621679079402"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">orderPetId</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079403"><a href="#local-6989586621679079403"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079402"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">orderPetId</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079403"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079401"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079402"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-80"></a><span>
|
||||||
</span><a name="line-81"></a><span class="hs-pragma">{-# INLINE orderPetIdT #-}</span><span>
|
</span><a name="line-81"></a><span class="hs-comment">-- | 'orderQuantity' Lens</span><span>
|
||||||
</span><a name="line-82"></a><span>
|
</span><a name="line-82"></a><span class="hs-identifier">orderQuantityL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-83"></a><span class="hs-comment">-- | 'orderQuantity' Traversal</span><span>
|
</span><a name="line-83"></a><a name="orderQuantityL"><a href="SwaggerPetstore.Lens.html#orderQuantityL"><span class="hs-identifier">orderQuantityL</span></a></a><span> </span><a name="local-6989586621679079408"><a href="#local-6989586621679079408"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079415"><a href="#local-6989586621679079415"><span class="hs-identifier">orderQuantity</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079415"><span class="hs-identifier hs-var">orderQuantity</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079408"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079411"><span class="hs-identifier hs-var">orderQuantity</span></a><span>
|
||||||
</span><a name="line-84"></a><span class="hs-identifier">orderQuantityT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span>
|
</span><a name="line-84"></a><span class="hs-pragma">{-# INLINE orderQuantityL #-}</span><span>
|
||||||
</span><a name="line-85"></a><a name="orderQuantityT"><a href="SwaggerPetstore.Lens.html#orderQuantityT"><span class="hs-identifier">orderQuantityT</span></a></a><span> </span><a name="local-6989586621679079404"><a href="#local-6989586621679079404"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079405"><a href="#local-6989586621679079405"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">orderQuantity</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079406"><a href="#local-6989586621679079406"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079405"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">orderQuantity</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079406"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079404"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079405"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-85"></a><span>
|
||||||
</span><a name="line-86"></a><span class="hs-pragma">{-# INLINE orderQuantityT #-}</span><span>
|
</span><a name="line-86"></a><span class="hs-comment">-- | 'orderShipDate' Lens</span><span>
|
||||||
</span><a name="line-87"></a><span>
|
</span><a name="line-87"></a><span class="hs-identifier">orderShipDateL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">UTCTime</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-88"></a><span class="hs-comment">-- | 'orderShipDate' Traversal</span><span>
|
</span><a name="line-88"></a><a name="orderShipDateL"><a href="SwaggerPetstore.Lens.html#orderShipDateL"><span class="hs-identifier">orderShipDateL</span></a></a><span> </span><a name="local-6989586621679079416"><a href="#local-6989586621679079416"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079423"><a href="#local-6989586621679079423"><span class="hs-identifier">orderShipDate</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079423"><span class="hs-identifier hs-var">orderShipDate</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079416"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079420"><span class="hs-identifier hs-var">orderShipDate</span></a><span>
|
||||||
</span><a name="line-89"></a><span class="hs-identifier">orderShipDateT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-identifier hs-type">UTCTime</span><span>
|
</span><a name="line-89"></a><span class="hs-pragma">{-# INLINE orderShipDateL #-}</span><span>
|
||||||
</span><a name="line-90"></a><a name="orderShipDateT"><a href="SwaggerPetstore.Lens.html#orderShipDateT"><span class="hs-identifier">orderShipDateT</span></a></a><span> </span><a name="local-6989586621679079407"><a href="#local-6989586621679079407"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079408"><a href="#local-6989586621679079408"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">orderShipDate</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079409"><a href="#local-6989586621679079409"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079408"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">orderShipDate</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079409"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079407"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079408"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-90"></a><span>
|
||||||
</span><a name="line-91"></a><span class="hs-pragma">{-# INLINE orderShipDateT #-}</span><span>
|
</span><a name="line-91"></a><span class="hs-comment">-- | 'orderStatus' Lens</span><span>
|
||||||
</span><a name="line-92"></a><span>
|
</span><a name="line-92"></a><span class="hs-identifier">orderStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-93"></a><span class="hs-comment">-- | 'orderStatus' Traversal</span><span>
|
</span><a name="line-93"></a><a name="orderStatusL"><a href="SwaggerPetstore.Lens.html#orderStatusL"><span class="hs-identifier">orderStatusL</span></a></a><span> </span><a name="local-6989586621679079424"><a href="#local-6989586621679079424"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079431"><a href="#local-6989586621679079431"><span class="hs-identifier">orderStatus</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079431"><span class="hs-identifier hs-var">orderStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079424"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079429"><span class="hs-identifier hs-var">orderStatus</span></a><span>
|
||||||
</span><a name="line-94"></a><span class="hs-identifier">orderStatusT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-94"></a><span class="hs-pragma">{-# INLINE orderStatusL #-}</span><span>
|
||||||
</span><a name="line-95"></a><a name="orderStatusT"><a href="SwaggerPetstore.Lens.html#orderStatusT"><span class="hs-identifier">orderStatusT</span></a></a><span> </span><a name="local-6989586621679079410"><a href="#local-6989586621679079410"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079411"><a href="#local-6989586621679079411"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">orderStatus</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079412"><a href="#local-6989586621679079412"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079411"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">orderStatus</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079412"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079410"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079411"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-95"></a><span>
|
||||||
</span><a name="line-96"></a><span class="hs-pragma">{-# INLINE orderStatusT #-}</span><span>
|
</span><a name="line-96"></a><span class="hs-comment">-- | 'orderComplete' Lens</span><span>
|
||||||
</span><a name="line-97"></a><span>
|
</span><a name="line-97"></a><span class="hs-identifier">orderCompleteL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Bool</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-98"></a><span class="hs-comment">-- | 'orderComplete' Traversal</span><span>
|
</span><a name="line-98"></a><a name="orderCompleteL"><a href="SwaggerPetstore.Lens.html#orderCompleteL"><span class="hs-identifier">orderCompleteL</span></a></a><span> </span><a name="local-6989586621679079432"><a href="#local-6989586621679079432"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079439"><a href="#local-6989586621679079439"><span class="hs-identifier">orderComplete</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-var">Order</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079439"><span class="hs-identifier hs-var">orderComplete</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079432"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079438"><span class="hs-identifier hs-var">orderComplete</span></a><span>
|
||||||
</span><a name="line-99"></a><span class="hs-identifier">orderCompleteT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span>
|
</span><a name="line-99"></a><span class="hs-pragma">{-# INLINE orderCompleteL #-}</span><span>
|
||||||
</span><a name="line-100"></a><a name="orderCompleteT"><a href="SwaggerPetstore.Lens.html#orderCompleteT"><span class="hs-identifier">orderCompleteT</span></a></a><span> </span><a name="local-6989586621679079413"><a href="#local-6989586621679079413"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079414"><a href="#local-6989586621679079414"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">orderComplete</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079415"><a href="#local-6989586621679079415"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079414"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">orderComplete</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079415"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079413"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079414"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-100"></a><span>
|
||||||
</span><a name="line-101"></a><span class="hs-pragma">{-# INLINE orderCompleteT #-}</span><span>
|
</span><a name="line-101"></a><span>
|
||||||
</span><a name="line-102"></a><span>
|
</span><a name="line-102"></a><span>
|
||||||
</span><a name="line-103"></a><span>
|
</span><a name="line-103"></a><span class="hs-comment">-- * Pet</span><span>
|
||||||
</span><a name="line-104"></a><span>
|
</span><a name="line-104"></a><span>
|
||||||
</span><a name="line-105"></a><span class="hs-comment">-- * Pet</span><span>
|
</span><a name="line-105"></a><span class="hs-comment">-- | 'petId' Lens</span><span>
|
||||||
</span><a name="line-106"></a><span>
|
</span><a name="line-106"></a><span class="hs-identifier">petIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-107"></a><span class="hs-comment">-- | 'petId' Traversal</span><span>
|
</span><a name="line-107"></a><a name="petIdL"><a href="SwaggerPetstore.Lens.html#petIdL"><span class="hs-identifier">petIdL</span></a></a><span> </span><a name="local-6989586621679079440"><a href="#local-6989586621679079440"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079447"><a href="#local-6989586621679079447"><span class="hs-identifier">petId</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079447"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079440"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079441"><span class="hs-identifier hs-var">petId</span></a><span>
|
||||||
</span><a name="line-108"></a><span class="hs-identifier">petIdT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span>
|
</span><a name="line-108"></a><span class="hs-pragma">{-# INLINE petIdL #-}</span><span>
|
||||||
</span><a name="line-109"></a><a name="petIdT"><a href="SwaggerPetstore.Lens.html#petIdT"><span class="hs-identifier">petIdT</span></a></a><span> </span><a name="local-6989586621679079416"><a href="#local-6989586621679079416"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079417"><a href="#local-6989586621679079417"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">petId</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079418"><a href="#local-6989586621679079418"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079417"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">petId</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079418"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079416"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079417"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-109"></a><span>
|
||||||
</span><a name="line-110"></a><span class="hs-pragma">{-# INLINE petIdT #-}</span><span>
|
</span><a name="line-110"></a><span class="hs-comment">-- | 'petCategory' Lens</span><span>
|
||||||
</span><a name="line-111"></a><span>
|
</span><a name="line-111"></a><span class="hs-identifier">petCategoryL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-112"></a><span class="hs-comment">-- | 'petCategory' Traversal</span><span>
|
</span><a name="line-112"></a><a name="petCategoryL"><a href="SwaggerPetstore.Lens.html#petCategoryL"><span class="hs-identifier">petCategoryL</span></a></a><span> </span><a name="local-6989586621679079448"><a href="#local-6989586621679079448"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079455"><a href="#local-6989586621679079455"><span class="hs-identifier">petCategory</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079455"><span class="hs-identifier hs-var">petCategory</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079448"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079450"><span class="hs-identifier hs-var">petCategory</span></a><span>
|
||||||
</span><a name="line-113"></a><span class="hs-identifier">petCategoryT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><a href="SwaggerPetstore.Model.html#Category"><span class="hs-identifier hs-type">Category</span></a><span>
|
</span><a name="line-113"></a><span class="hs-pragma">{-# INLINE petCategoryL #-}</span><span>
|
||||||
</span><a name="line-114"></a><a name="petCategoryT"><a href="SwaggerPetstore.Lens.html#petCategoryT"><span class="hs-identifier">petCategoryT</span></a></a><span> </span><a name="local-6989586621679079419"><a href="#local-6989586621679079419"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079420"><a href="#local-6989586621679079420"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">petCategory</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079421"><a href="#local-6989586621679079421"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079420"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">petCategory</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079421"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079419"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079420"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-114"></a><span>
|
||||||
</span><a name="line-115"></a><span class="hs-pragma">{-# INLINE petCategoryT #-}</span><span>
|
</span><a name="line-115"></a><span class="hs-comment">-- | 'petName' Lens</span><span>
|
||||||
</span><a name="line-116"></a><span>
|
</span><a name="line-116"></a><span class="hs-identifier">petNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><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-117"></a><span class="hs-comment">-- | 'petName' Lens</span><span>
|
</span><a name="line-117"></a><a name="petNameL"><a href="SwaggerPetstore.Lens.html#petNameL"><span class="hs-identifier">petNameL</span></a></a><span> </span><a name="local-6989586621679079456"><a href="#local-6989586621679079456"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079463"><a href="#local-6989586621679079463"><span class="hs-identifier">petName</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079463"><span class="hs-identifier hs-var">petName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079456"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079459"><span class="hs-identifier hs-var">petName</span></a><span>
|
||||||
</span><a name="line-118"></a><span class="hs-identifier">petNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-118"></a><span class="hs-pragma">{-# INLINE petNameL #-}</span><span>
|
||||||
</span><a name="line-119"></a><a name="petNameL"><a href="SwaggerPetstore.Lens.html#petNameL"><span class="hs-identifier">petNameL</span></a></a><span> </span><a name="local-6989586621679079422"><a href="#local-6989586621679079422"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079429"><a href="#local-6989586621679079429"><span class="hs-identifier">petName</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079429"><span class="hs-identifier hs-var">petName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079422"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079425"><span class="hs-identifier hs-var">petName</span></a><span>
|
</span><a name="line-119"></a><span>
|
||||||
</span><a name="line-120"></a><span class="hs-pragma">{-# INLINE petNameL #-}</span><span>
|
</span><a name="line-120"></a><span class="hs-comment">-- | 'petPhotoUrls' Lens</span><span>
|
||||||
</span><a name="line-121"></a><span>
|
</span><a name="line-121"></a><span class="hs-identifier">petPhotoUrlsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">[</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">]</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-122"></a><span class="hs-comment">-- | 'petPhotoUrls' Lens</span><span>
|
</span><a name="line-122"></a><a name="petPhotoUrlsL"><a href="SwaggerPetstore.Lens.html#petPhotoUrlsL"><span class="hs-identifier">petPhotoUrlsL</span></a></a><span> </span><a name="local-6989586621679079464"><a href="#local-6989586621679079464"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079471"><a href="#local-6989586621679079471"><span class="hs-identifier">petPhotoUrls</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079471"><span class="hs-identifier hs-var">petPhotoUrls</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079464"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079468"><span class="hs-identifier hs-var">petPhotoUrls</span></a><span>
|
||||||
</span><a name="line-123"></a><span class="hs-identifier">petPhotoUrlsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><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-123"></a><span class="hs-pragma">{-# INLINE petPhotoUrlsL #-}</span><span>
|
||||||
</span><a name="line-124"></a><a name="petPhotoUrlsL"><a href="SwaggerPetstore.Lens.html#petPhotoUrlsL"><span class="hs-identifier">petPhotoUrlsL</span></a></a><span> </span><a name="local-6989586621679079430"><a href="#local-6989586621679079430"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079437"><a href="#local-6989586621679079437"><span class="hs-identifier">petPhotoUrls</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079437"><span class="hs-identifier hs-var">petPhotoUrls</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079430"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079434"><span class="hs-identifier hs-var">petPhotoUrls</span></a><span>
|
</span><a name="line-124"></a><span>
|
||||||
</span><a name="line-125"></a><span class="hs-pragma">{-# INLINE petPhotoUrlsL #-}</span><span>
|
</span><a name="line-125"></a><span class="hs-comment">-- | 'petTags' Lens</span><span>
|
||||||
</span><a name="line-126"></a><span>
|
</span><a name="line-126"></a><span class="hs-identifier">petTagsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span class="hs-special">]</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-127"></a><span class="hs-comment">-- | 'petTags' Traversal</span><span>
|
</span><a name="line-127"></a><a name="petTagsL"><a href="SwaggerPetstore.Lens.html#petTagsL"><span class="hs-identifier">petTagsL</span></a></a><span> </span><a name="local-6989586621679079472"><a href="#local-6989586621679079472"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079479"><a href="#local-6989586621679079479"><span class="hs-identifier">petTags</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079479"><span class="hs-identifier hs-var">petTags</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079472"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079477"><span class="hs-identifier hs-var">petTags</span></a><span>
|
||||||
</span><a name="line-128"></a><span class="hs-identifier">petTagsT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">[</span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span class="hs-special">]</span><span>
|
</span><a name="line-128"></a><span class="hs-pragma">{-# INLINE petTagsL #-}</span><span>
|
||||||
</span><a name="line-129"></a><a name="petTagsT"><a href="SwaggerPetstore.Lens.html#petTagsT"><span class="hs-identifier">petTagsT</span></a></a><span> </span><a name="local-6989586621679079438"><a href="#local-6989586621679079438"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079439"><a href="#local-6989586621679079439"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">petTags</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079440"><a href="#local-6989586621679079440"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079439"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">petTags</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079440"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079438"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079439"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-129"></a><span>
|
||||||
</span><a name="line-130"></a><span class="hs-pragma">{-# INLINE petTagsT #-}</span><span>
|
</span><a name="line-130"></a><span class="hs-comment">-- | 'petStatus' Lens</span><span>
|
||||||
</span><a name="line-131"></a><span>
|
</span><a name="line-131"></a><span class="hs-identifier">petStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-132"></a><span class="hs-comment">-- | 'petStatus' Traversal</span><span>
|
</span><a name="line-132"></a><a name="petStatusL"><a href="SwaggerPetstore.Lens.html#petStatusL"><span class="hs-identifier">petStatusL</span></a></a><span> </span><a name="local-6989586621679079480"><a href="#local-6989586621679079480"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079487"><a href="#local-6989586621679079487"><span class="hs-identifier">petStatus</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-var">Pet</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079487"><span class="hs-identifier hs-var">petStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079480"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079486"><span class="hs-identifier hs-var">petStatus</span></a><span>
|
||||||
</span><a name="line-133"></a><span class="hs-identifier">petStatusT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-133"></a><span class="hs-pragma">{-# INLINE petStatusL #-}</span><span>
|
||||||
</span><a name="line-134"></a><a name="petStatusT"><a href="SwaggerPetstore.Lens.html#petStatusT"><span class="hs-identifier">petStatusT</span></a></a><span> </span><a name="local-6989586621679079441"><a href="#local-6989586621679079441"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079442"><a href="#local-6989586621679079442"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">petStatus</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079443"><a href="#local-6989586621679079443"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079442"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">petStatus</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079443"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079441"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079442"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-134"></a><span>
|
||||||
</span><a name="line-135"></a><span class="hs-pragma">{-# INLINE petStatusT #-}</span><span>
|
</span><a name="line-135"></a><span>
|
||||||
</span><a name="line-136"></a><span>
|
</span><a name="line-136"></a><span>
|
||||||
</span><a name="line-137"></a><span>
|
</span><a name="line-137"></a><span class="hs-comment">-- * Tag</span><span>
|
||||||
</span><a name="line-138"></a><span>
|
</span><a name="line-138"></a><span>
|
||||||
</span><a name="line-139"></a><span class="hs-comment">-- * Tag</span><span>
|
</span><a name="line-139"></a><span class="hs-comment">-- | 'tagId' Lens</span><span>
|
||||||
</span><a name="line-140"></a><span>
|
</span><a name="line-140"></a><span class="hs-identifier">tagIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-141"></a><span class="hs-comment">-- | 'tagId' Traversal</span><span>
|
</span><a name="line-141"></a><a name="tagIdL"><a href="SwaggerPetstore.Lens.html#tagIdL"><span class="hs-identifier">tagIdL</span></a></a><span> </span><a name="local-6989586621679079488"><a href="#local-6989586621679079488"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079491"><a href="#local-6989586621679079491"><span class="hs-identifier">tagId</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079491"><span class="hs-identifier hs-var">tagId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079488"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079489"><span class="hs-identifier hs-var">tagId</span></a><span>
|
||||||
</span><a name="line-142"></a><span class="hs-identifier">tagIdT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span>
|
</span><a name="line-142"></a><span class="hs-pragma">{-# INLINE tagIdL #-}</span><span>
|
||||||
</span><a name="line-143"></a><a name="tagIdT"><a href="SwaggerPetstore.Lens.html#tagIdT"><span class="hs-identifier">tagIdT</span></a></a><span> </span><a name="local-6989586621679079444"><a href="#local-6989586621679079444"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079445"><a href="#local-6989586621679079445"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">tagId</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079446"><a href="#local-6989586621679079446"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079445"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">tagId</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079446"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079444"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079445"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-143"></a><span>
|
||||||
</span><a name="line-144"></a><span class="hs-pragma">{-# INLINE tagIdT #-}</span><span>
|
</span><a name="line-144"></a><span class="hs-comment">-- | 'tagName' Lens</span><span>
|
||||||
</span><a name="line-145"></a><span>
|
</span><a name="line-145"></a><span class="hs-identifier">tagNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-146"></a><span class="hs-comment">-- | 'tagName' Traversal</span><span>
|
</span><a name="line-146"></a><a name="tagNameL"><a href="SwaggerPetstore.Lens.html#tagNameL"><span class="hs-identifier">tagNameL</span></a></a><span> </span><a name="local-6989586621679079492"><a href="#local-6989586621679079492"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079495"><a href="#local-6989586621679079495"><span class="hs-identifier">tagName</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-var">Tag</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079495"><span class="hs-identifier hs-var">tagName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079492"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079494"><span class="hs-identifier hs-var">tagName</span></a><span>
|
||||||
</span><a name="line-147"></a><span class="hs-identifier">tagNameT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#Tag"><span class="hs-identifier hs-type">Tag</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-147"></a><span class="hs-pragma">{-# INLINE tagNameL #-}</span><span>
|
||||||
</span><a name="line-148"></a><a name="tagNameT"><a href="SwaggerPetstore.Lens.html#tagNameT"><span class="hs-identifier">tagNameT</span></a></a><span> </span><a name="local-6989586621679079447"><a href="#local-6989586621679079447"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079448"><a href="#local-6989586621679079448"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">tagName</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079449"><a href="#local-6989586621679079449"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079448"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">tagName</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079449"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079447"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079448"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-148"></a><span>
|
||||||
</span><a name="line-149"></a><span class="hs-pragma">{-# INLINE tagNameT #-}</span><span>
|
</span><a name="line-149"></a><span>
|
||||||
</span><a name="line-150"></a><span>
|
</span><a name="line-150"></a><span>
|
||||||
</span><a name="line-151"></a><span>
|
</span><a name="line-151"></a><span class="hs-comment">-- * User</span><span>
|
||||||
</span><a name="line-152"></a><span>
|
</span><a name="line-152"></a><span>
|
||||||
</span><a name="line-153"></a><span class="hs-comment">-- * User</span><span>
|
</span><a name="line-153"></a><span class="hs-comment">-- | 'userId' Lens</span><span>
|
||||||
</span><a name="line-154"></a><span>
|
</span><a name="line-154"></a><span class="hs-identifier">userIdL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Integer</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-155"></a><span class="hs-comment">-- | 'userId' Traversal</span><span>
|
</span><a name="line-155"></a><a name="userIdL"><a href="SwaggerPetstore.Lens.html#userIdL"><span class="hs-identifier">userIdL</span></a></a><span> </span><a name="local-6989586621679079496"><a href="#local-6989586621679079496"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079505"><a href="#local-6989586621679079505"><span class="hs-identifier">userId</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079505"><span class="hs-identifier hs-var">userId</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079496"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079497"><span class="hs-identifier hs-var">userId</span></a><span>
|
||||||
</span><a name="line-156"></a><span class="hs-identifier">userIdT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span>
|
</span><a name="line-156"></a><span class="hs-pragma">{-# INLINE userIdL #-}</span><span>
|
||||||
</span><a name="line-157"></a><a name="userIdT"><a href="SwaggerPetstore.Lens.html#userIdT"><span class="hs-identifier">userIdT</span></a></a><span> </span><a name="local-6989586621679079450"><a href="#local-6989586621679079450"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079451"><a href="#local-6989586621679079451"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">userId</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079452"><a href="#local-6989586621679079452"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079451"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">userId</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079452"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079450"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079451"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-157"></a><span>
|
||||||
</span><a name="line-158"></a><span class="hs-pragma">{-# INLINE userIdT #-}</span><span>
|
</span><a name="line-158"></a><span class="hs-comment">-- | 'userUsername' Lens</span><span>
|
||||||
</span><a name="line-159"></a><span>
|
</span><a name="line-159"></a><span class="hs-identifier">userUsernameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-160"></a><span class="hs-comment">-- | 'userUsername' Traversal</span><span>
|
</span><a name="line-160"></a><a name="userUsernameL"><a href="SwaggerPetstore.Lens.html#userUsernameL"><span class="hs-identifier">userUsernameL</span></a></a><span> </span><a name="local-6989586621679079506"><a href="#local-6989586621679079506"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079515"><a href="#local-6989586621679079515"><span class="hs-identifier">userUsername</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079515"><span class="hs-identifier hs-var">userUsername</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079506"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079508"><span class="hs-identifier hs-var">userUsername</span></a><span>
|
||||||
</span><a name="line-161"></a><span class="hs-identifier">userUsernameT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-161"></a><span class="hs-pragma">{-# INLINE userUsernameL #-}</span><span>
|
||||||
</span><a name="line-162"></a><a name="userUsernameT"><a href="SwaggerPetstore.Lens.html#userUsernameT"><span class="hs-identifier">userUsernameT</span></a></a><span> </span><a name="local-6989586621679079453"><a href="#local-6989586621679079453"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079454"><a href="#local-6989586621679079454"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">userUsername</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079455"><a href="#local-6989586621679079455"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079454"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">userUsername</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079455"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079453"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079454"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-162"></a><span>
|
||||||
</span><a name="line-163"></a><span class="hs-pragma">{-# INLINE userUsernameT #-}</span><span>
|
</span><a name="line-163"></a><span class="hs-comment">-- | 'userFirstName' Lens</span><span>
|
||||||
</span><a name="line-164"></a><span>
|
</span><a name="line-164"></a><span class="hs-identifier">userFirstNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-165"></a><span class="hs-comment">-- | 'userFirstName' Traversal</span><span>
|
</span><a name="line-165"></a><a name="userFirstNameL"><a href="SwaggerPetstore.Lens.html#userFirstNameL"><span class="hs-identifier">userFirstNameL</span></a></a><span> </span><a name="local-6989586621679079516"><a href="#local-6989586621679079516"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079525"><a href="#local-6989586621679079525"><span class="hs-identifier">userFirstName</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079525"><span class="hs-identifier hs-var">userFirstName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079516"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079519"><span class="hs-identifier hs-var">userFirstName</span></a><span>
|
||||||
</span><a name="line-166"></a><span class="hs-identifier">userFirstNameT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-166"></a><span class="hs-pragma">{-# INLINE userFirstNameL #-}</span><span>
|
||||||
</span><a name="line-167"></a><a name="userFirstNameT"><a href="SwaggerPetstore.Lens.html#userFirstNameT"><span class="hs-identifier">userFirstNameT</span></a></a><span> </span><a name="local-6989586621679079456"><a href="#local-6989586621679079456"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079457"><a href="#local-6989586621679079457"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">userFirstName</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079458"><a href="#local-6989586621679079458"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079457"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">userFirstName</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079458"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079456"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079457"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-167"></a><span>
|
||||||
</span><a name="line-168"></a><span class="hs-pragma">{-# INLINE userFirstNameT #-}</span><span>
|
</span><a name="line-168"></a><span class="hs-comment">-- | 'userLastName' Lens</span><span>
|
||||||
</span><a name="line-169"></a><span>
|
</span><a name="line-169"></a><span class="hs-identifier">userLastNameL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-170"></a><span class="hs-comment">-- | 'userLastName' Traversal</span><span>
|
</span><a name="line-170"></a><a name="userLastNameL"><a href="SwaggerPetstore.Lens.html#userLastNameL"><span class="hs-identifier">userLastNameL</span></a></a><span> </span><a name="local-6989586621679079526"><a href="#local-6989586621679079526"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079535"><a href="#local-6989586621679079535"><span class="hs-identifier">userLastName</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079535"><span class="hs-identifier hs-var">userLastName</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079526"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079530"><span class="hs-identifier hs-var">userLastName</span></a><span>
|
||||||
</span><a name="line-171"></a><span class="hs-identifier">userLastNameT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-171"></a><span class="hs-pragma">{-# INLINE userLastNameL #-}</span><span>
|
||||||
</span><a name="line-172"></a><a name="userLastNameT"><a href="SwaggerPetstore.Lens.html#userLastNameT"><span class="hs-identifier">userLastNameT</span></a></a><span> </span><a name="local-6989586621679079459"><a href="#local-6989586621679079459"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079460"><a href="#local-6989586621679079460"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">userLastName</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079461"><a href="#local-6989586621679079461"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079460"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">userLastName</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079461"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079459"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079460"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-172"></a><span>
|
||||||
</span><a name="line-173"></a><span class="hs-pragma">{-# INLINE userLastNameT #-}</span><span>
|
</span><a name="line-173"></a><span class="hs-comment">-- | 'userEmail' Lens</span><span>
|
||||||
</span><a name="line-174"></a><span>
|
</span><a name="line-174"></a><span class="hs-identifier">userEmailL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-175"></a><span class="hs-comment">-- | 'userEmail' Traversal</span><span>
|
</span><a name="line-175"></a><a name="userEmailL"><a href="SwaggerPetstore.Lens.html#userEmailL"><span class="hs-identifier">userEmailL</span></a></a><span> </span><a name="local-6989586621679079536"><a href="#local-6989586621679079536"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079545"><a href="#local-6989586621679079545"><span class="hs-identifier">userEmail</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079545"><span class="hs-identifier hs-var">userEmail</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079536"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079541"><span class="hs-identifier hs-var">userEmail</span></a><span>
|
||||||
</span><a name="line-176"></a><span class="hs-identifier">userEmailT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-176"></a><span class="hs-pragma">{-# INLINE userEmailL #-}</span><span>
|
||||||
</span><a name="line-177"></a><a name="userEmailT"><a href="SwaggerPetstore.Lens.html#userEmailT"><span class="hs-identifier">userEmailT</span></a></a><span> </span><a name="local-6989586621679079462"><a href="#local-6989586621679079462"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079463"><a href="#local-6989586621679079463"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">userEmail</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079464"><a href="#local-6989586621679079464"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079463"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">userEmail</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079464"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079462"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079463"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-177"></a><span>
|
||||||
</span><a name="line-178"></a><span class="hs-pragma">{-# INLINE userEmailT #-}</span><span>
|
</span><a name="line-178"></a><span class="hs-comment">-- | 'userPassword' Lens</span><span>
|
||||||
</span><a name="line-179"></a><span>
|
</span><a name="line-179"></a><span class="hs-identifier">userPasswordL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-180"></a><span class="hs-comment">-- | 'userPassword' Traversal</span><span>
|
</span><a name="line-180"></a><a name="userPasswordL"><a href="SwaggerPetstore.Lens.html#userPasswordL"><span class="hs-identifier">userPasswordL</span></a></a><span> </span><a name="local-6989586621679079546"><a href="#local-6989586621679079546"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079555"><a href="#local-6989586621679079555"><span class="hs-identifier">userPassword</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079555"><span class="hs-identifier hs-var">userPassword</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079546"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079552"><span class="hs-identifier hs-var">userPassword</span></a><span>
|
||||||
</span><a name="line-181"></a><span class="hs-identifier">userPasswordT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-181"></a><span class="hs-pragma">{-# INLINE userPasswordL #-}</span><span>
|
||||||
</span><a name="line-182"></a><a name="userPasswordT"><a href="SwaggerPetstore.Lens.html#userPasswordT"><span class="hs-identifier">userPasswordT</span></a></a><span> </span><a name="local-6989586621679079465"><a href="#local-6989586621679079465"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079466"><a href="#local-6989586621679079466"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">userPassword</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079467"><a href="#local-6989586621679079467"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079466"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">userPassword</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079467"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079465"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079466"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-182"></a><span>
|
||||||
</span><a name="line-183"></a><span class="hs-pragma">{-# INLINE userPasswordT #-}</span><span>
|
</span><a name="line-183"></a><span class="hs-comment">-- | 'userPhone' Lens</span><span>
|
||||||
</span><a name="line-184"></a><span>
|
</span><a name="line-184"></a><span class="hs-identifier">userPhoneL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-185"></a><span class="hs-comment">-- | 'userPhone' Traversal</span><span>
|
</span><a name="line-185"></a><a name="userPhoneL"><a href="SwaggerPetstore.Lens.html#userPhoneL"><span class="hs-identifier">userPhoneL</span></a></a><span> </span><a name="local-6989586621679079556"><a href="#local-6989586621679079556"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079565"><a href="#local-6989586621679079565"><span class="hs-identifier">userPhone</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079565"><span class="hs-identifier hs-var">userPhone</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079556"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079563"><span class="hs-identifier hs-var">userPhone</span></a><span>
|
||||||
</span><a name="line-186"></a><span class="hs-identifier">userPhoneT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span>
|
</span><a name="line-186"></a><span class="hs-pragma">{-# INLINE userPhoneL #-}</span><span>
|
||||||
</span><a name="line-187"></a><a name="userPhoneT"><a href="SwaggerPetstore.Lens.html#userPhoneT"><span class="hs-identifier">userPhoneT</span></a></a><span> </span><a name="local-6989586621679079468"><a href="#local-6989586621679079468"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079469"><a href="#local-6989586621679079469"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">userPhone</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079470"><a href="#local-6989586621679079470"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079469"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">userPhone</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079470"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079468"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079469"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-187"></a><span>
|
||||||
</span><a name="line-188"></a><span class="hs-pragma">{-# INLINE userPhoneT #-}</span><span>
|
</span><a name="line-188"></a><span class="hs-comment">-- | 'userUserStatus' Lens</span><span>
|
||||||
</span><a name="line-189"></a><span>
|
</span><a name="line-189"></a><span class="hs-identifier">userUserStatusL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span>
|
||||||
</span><a name="line-190"></a><span class="hs-comment">-- | 'userUserStatus' Traversal</span><span>
|
</span><a name="line-190"></a><a name="userUserStatusL"><a href="SwaggerPetstore.Lens.html#userUserStatusL"><span class="hs-identifier">userUserStatusL</span></a></a><span> </span><a name="local-6989586621679079566"><a href="#local-6989586621679079566"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span class="hs-special">{</span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079575"><a href="#local-6989586621679079575"><span class="hs-identifier">userUserStatus</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-var">User</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679079575"><span class="hs-identifier hs-var">userUserStatus</span></a><span class="hs-special">,</span><span> </span><span class="hs-glyph">..</span><span class="hs-special">}</span><span> </span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079566"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079574"><span class="hs-identifier hs-var">userUserStatus</span></a><span>
|
||||||
</span><a name="line-191"></a><span class="hs-identifier">userUserStatusT</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Lens.html#Traversal_%27"><span class="hs-identifier hs-type">Traversal_'</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span>
|
</span><a name="line-191"></a><span class="hs-pragma">{-# INLINE userUserStatusL #-}</span><span>
|
||||||
</span><a name="line-192"></a><a name="userUserStatusT"><a href="SwaggerPetstore.Lens.html#userUserStatusT"><span class="hs-identifier">userUserStatusT</span></a></a><span> </span><a name="local-6989586621679079471"><a href="#local-6989586621679079471"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079472"><a href="#local-6989586621679079472"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier hs-var">_mtraversal</span></a><span> </span><span class="hs-identifier">userUserStatus</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079473"><a href="#local-6989586621679079473"><span class="hs-identifier">b</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079472"><span class="hs-identifier hs-var">s</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">userUserStatus</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679079473"><span class="hs-identifier hs-var">b</span></a><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679079471"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079472"><span class="hs-identifier hs-var">s</span></a><span>
|
</span><a name="line-192"></a><span>
|
||||||
</span><a name="line-193"></a><span class="hs-pragma">{-# INLINE userUserStatusT #-}</span><span>
|
</span><a name="line-193"></a><span>
|
||||||
</span><a name="line-194"></a><span>
|
</span><a name="line-194"></a></pre></body></html>
|
||||||
</span><a name="line-195"></a><span>
|
|
||||||
</span><a name="line-196"></a><span>
|
|
||||||
</span><a name="line-197"></a><span>
|
|
||||||
</span><a name="line-198"></a><span class="hs-comment">-- * Helpers</span><span>
|
|
||||||
</span><a name="line-199"></a><span>
|
|
||||||
</span><a name="line-200"></a><span class="hs-identifier">_mtraversal</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679079379"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679079380"><span class="hs-identifier hs-type">b</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="#local-6989586621679079381"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679079382"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079380"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679079381"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079379"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679079382"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079380"><span class="hs-identifier hs-type">b</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079379"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679079380"><span class="hs-identifier hs-type">b</span></a><span>
|
|
||||||
</span><a name="line-201"></a><a name="_mtraversal"><a href="SwaggerPetstore.Lens.html#_mtraversal"><span class="hs-identifier">_mtraversal</span></a></a><span> </span><a name="local-6989586621679079474"><a href="#local-6989586621679079474"><span class="hs-identifier">x</span></a></a><span> </span><a name="local-6989586621679079475"><a href="#local-6989586621679079475"><span class="hs-identifier">fsb</span></a></a><span> </span><a name="local-6989586621679079476"><a href="#local-6989586621679079476"><span class="hs-identifier">f</span></a></a><span> </span><a name="local-6989586621679079477"><a href="#local-6989586621679079477"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">maybe</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">pure</span><span> </span><a href="#local-6989586621679079477"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679079478"><a href="#local-6989586621679079478"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679079475"><span class="hs-identifier hs-var">fsb</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679079476"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679079478"><span class="hs-identifier hs-var">a</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679079474"><span class="hs-identifier hs-var">x</span></a><span> </span><a href="#local-6989586621679079477"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
|
||||||
</span><a name="line-202"></a><span class="hs-pragma">{-# INLINE _mtraversal #-}</span><span>
|
|
||||||
</span><a name="line-203"></a></pre></body></html>
|
|
||||||
@@ -365,14 +365,14 @@ Module : SwaggerPetstore.Model
|
|||||||
</span><a name="line-365"></a><span>
|
</span><a name="line-365"></a><span>
|
||||||
</span><a name="line-366"></a><span class="hs-comment">-- * Date Formatting</span><span>
|
</span><a name="line-366"></a><span class="hs-comment">-- * Date Formatting</span><span>
|
||||||
</span><a name="line-367"></a><span>
|
</span><a name="line-367"></a><span>
|
||||||
</span><a name="line-368"></a><span class="hs-comment">-- | @TI.parseTimeM True TI.defaultTimeLocale ""@</span><span>
|
</span><a name="line-368"></a><span class="hs-comment">-- | @TI.parseTimeM True TI.defaultTimeLocale "%Y-%m-%d"@</span><span>
|
||||||
</span><a name="line-369"></a><span class="hs-identifier">_readDate</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">TI</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ParseTime</span><span> </span><a href="#local-6989586621679069135"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679069136"><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">String</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679069136"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679069135"><span class="hs-identifier hs-type">t</span></a><span>
|
</span><a name="line-369"></a><span class="hs-identifier">_readDate</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">TI</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ParseTime</span><span> </span><a href="#local-6989586621679069135"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679069136"><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">String</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679069136"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679069135"><span class="hs-identifier hs-type">t</span></a><span>
|
||||||
</span><a name="line-370"></a><a name="_readDate"><a href="SwaggerPetstore.Model.html#_readDate"><span class="hs-identifier">_readDate</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-370"></a><a name="_readDate"><a href="SwaggerPetstore.Model.html#_readDate"><span class="hs-identifier">_readDate</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-371"></a><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">parseTimeM</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultTimeLocale</span><span> </span><span class="hs-string">""</span><span>
|
</span><a name="line-371"></a><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">parseTimeM</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultTimeLocale</span><span> </span><span class="hs-string">"%Y-%m-%d"</span><span>
|
||||||
</span><a name="line-372"></a><span class="hs-pragma">{-# INLINE _readDate #-}</span><span>
|
</span><a name="line-372"></a><span class="hs-pragma">{-# INLINE _readDate #-}</span><span>
|
||||||
</span><a name="line-373"></a><span>
|
</span><a name="line-373"></a><span>
|
||||||
</span><a name="line-374"></a><span class="hs-comment">-- | @TI.formatTime TI.defaultTimeLocale ""@</span><span>
|
</span><a name="line-374"></a><span class="hs-comment">-- | @TI.formatTime TI.defaultTimeLocale "%Y-%m-%d"@</span><span>
|
||||||
</span><a name="line-375"></a><span class="hs-identifier">_showDate</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">TI</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FormatTime</span><span> </span><a href="#local-6989586621679068678"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679068678"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">String</span><span>
|
</span><a name="line-375"></a><span class="hs-identifier">_showDate</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">TI</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FormatTime</span><span> </span><a href="#local-6989586621679068678"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679068678"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">String</span><span>
|
||||||
</span><a name="line-376"></a><a name="_showDate"><a href="SwaggerPetstore.Model.html#_showDate"><span class="hs-identifier">_showDate</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
</span><a name="line-376"></a><a name="_showDate"><a href="SwaggerPetstore.Model.html#_showDate"><span class="hs-identifier">_showDate</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||||
</span><a name="line-377"></a><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formatTime</span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultTimeLocale</span><span> </span><span class="hs-string">""</span><span>
|
</span><a name="line-377"></a><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formatTime</span><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">defaultTimeLocale</span><span> </span><span class="hs-string">"%Y-%m-%d"</span><span>
|
||||||
</span><a name="line-378"></a><span class="hs-pragma">{-# INLINE _showDate #-}</span></pre></body></html>
|
</span><a name="line-378"></a><span class="hs-pragma">{-# INLINE _showDate #-}</span></pre></body></html>
|
||||||
@@ -200,8 +200,8 @@ runUser mgr config = do
|
|||||||
let createUserRequest = S.createUser S.MimeJSON user
|
let createUserRequest = S.createUser S.MimeJSON user
|
||||||
_ <- S.dispatchLbs mgr config createUserRequest S.MimeJSON
|
_ <- S.dispatchLbs mgr config createUserRequest S.MimeJSON
|
||||||
|
|
||||||
-- can use traversals or lenses (model record names are appended with T or L) to view or modify records
|
-- can use lenses (model record names are appended L) to view or modify records
|
||||||
let users = take 8 $ drop 1 $ iterate (L.over S.userUsernameT (<> "*") . L.over S.userIdT (+1)) user
|
let users = take 8 $ drop 1 $ iterate (L.over S.userUsernameL (fmap (<> "*")) . L.over S.userIdL (fmap (+ 1))) user
|
||||||
let createUsersWithArrayInputRequest = S.createUsersWithArrayInput S.MimeJSON users
|
let createUsersWithArrayInputRequest = S.createUsersWithArrayInput S.MimeJSON users
|
||||||
_ <- S.dispatchLbs mgr config createUsersWithArrayInputRequest S.MimeNoContent
|
_ <- S.dispatchLbs mgr config createUsersWithArrayInputRequest S.MimeNoContent
|
||||||
|
|
||||||
|
|||||||
@@ -29,174 +29,165 @@ import SwaggerPetstore.Model
|
|||||||
|
|
||||||
-- * Type Aliases
|
-- * Type Aliases
|
||||||
|
|
||||||
type Traversal_' s a = Traversal_ s s a a
|
|
||||||
type Traversal_ s t a b = forall (f :: * -> *). Applicative f => (a -> f b) -> s -> f t
|
|
||||||
type Lens_' s a = Lens_ s s a a
|
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 :: * -> *). Functor f => (a -> f b) -> s -> f t
|
||||||
|
|
||||||
|
|
||||||
-- * ApiResponse
|
-- * ApiResponse
|
||||||
|
|
||||||
-- | 'apiResponseCode' Traversal
|
-- | 'apiResponseCode' Lens
|
||||||
apiResponseCodeT :: Traversal_' ApiResponse Int
|
apiResponseCodeL :: Lens_' ApiResponse (Maybe Int)
|
||||||
apiResponseCodeT f s = _mtraversal apiResponseCode (\b -> s { apiResponseCode = Just b}) f s
|
apiResponseCodeL f ApiResponse{..} = (\apiResponseCode -> ApiResponse { apiResponseCode, ..} ) <$> f apiResponseCode
|
||||||
{-# INLINE apiResponseCodeT #-}
|
{-# INLINE apiResponseCodeL #-}
|
||||||
|
|
||||||
-- | 'apiResponseType' Traversal
|
-- | 'apiResponseType' Lens
|
||||||
apiResponseTypeT :: Traversal_' ApiResponse Text
|
apiResponseTypeL :: Lens_' ApiResponse (Maybe Text)
|
||||||
apiResponseTypeT f s = _mtraversal apiResponseType (\b -> s { apiResponseType = Just b}) f s
|
apiResponseTypeL f ApiResponse{..} = (\apiResponseType -> ApiResponse { apiResponseType, ..} ) <$> f apiResponseType
|
||||||
{-# INLINE apiResponseTypeT #-}
|
{-# INLINE apiResponseTypeL #-}
|
||||||
|
|
||||||
-- | 'apiResponseMessage' Traversal
|
-- | 'apiResponseMessage' Lens
|
||||||
apiResponseMessageT :: Traversal_' ApiResponse Text
|
apiResponseMessageL :: Lens_' ApiResponse (Maybe Text)
|
||||||
apiResponseMessageT f s = _mtraversal apiResponseMessage (\b -> s { apiResponseMessage = Just b}) f s
|
apiResponseMessageL f ApiResponse{..} = (\apiResponseMessage -> ApiResponse { apiResponseMessage, ..} ) <$> f apiResponseMessage
|
||||||
{-# INLINE apiResponseMessageT #-}
|
{-# INLINE apiResponseMessageL #-}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
-- * Category
|
-- * Category
|
||||||
|
|
||||||
-- | 'categoryId' Traversal
|
-- | 'categoryId' Lens
|
||||||
categoryIdT :: Traversal_' Category Integer
|
categoryIdL :: Lens_' Category (Maybe Integer)
|
||||||
categoryIdT f s = _mtraversal categoryId (\b -> s { categoryId = Just b}) f s
|
categoryIdL f Category{..} = (\categoryId -> Category { categoryId, ..} ) <$> f categoryId
|
||||||
{-# INLINE categoryIdT #-}
|
{-# INLINE categoryIdL #-}
|
||||||
|
|
||||||
-- | 'categoryName' Traversal
|
-- | 'categoryName' Lens
|
||||||
categoryNameT :: Traversal_' Category Text
|
categoryNameL :: Lens_' Category (Maybe Text)
|
||||||
categoryNameT f s = _mtraversal categoryName (\b -> s { categoryName = Just b}) f s
|
categoryNameL f Category{..} = (\categoryName -> Category { categoryName, ..} ) <$> f categoryName
|
||||||
{-# INLINE categoryNameT #-}
|
{-# INLINE categoryNameL #-}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
-- * Order
|
-- * Order
|
||||||
|
|
||||||
-- | 'orderId' Traversal
|
-- | 'orderId' Lens
|
||||||
orderIdT :: Traversal_' Order Integer
|
orderIdL :: Lens_' Order (Maybe Integer)
|
||||||
orderIdT f s = _mtraversal orderId (\b -> s { orderId = Just b}) f s
|
orderIdL f Order{..} = (\orderId -> Order { orderId, ..} ) <$> f orderId
|
||||||
{-# INLINE orderIdT #-}
|
{-# INLINE orderIdL #-}
|
||||||
|
|
||||||
-- | 'orderPetId' Traversal
|
-- | 'orderPetId' Lens
|
||||||
orderPetIdT :: Traversal_' Order Integer
|
orderPetIdL :: Lens_' Order (Maybe Integer)
|
||||||
orderPetIdT f s = _mtraversal orderPetId (\b -> s { orderPetId = Just b}) f s
|
orderPetIdL f Order{..} = (\orderPetId -> Order { orderPetId, ..} ) <$> f orderPetId
|
||||||
{-# INLINE orderPetIdT #-}
|
{-# INLINE orderPetIdL #-}
|
||||||
|
|
||||||
-- | 'orderQuantity' Traversal
|
-- | 'orderQuantity' Lens
|
||||||
orderQuantityT :: Traversal_' Order Int
|
orderQuantityL :: Lens_' Order (Maybe Int)
|
||||||
orderQuantityT f s = _mtraversal orderQuantity (\b -> s { orderQuantity = Just b}) f s
|
orderQuantityL f Order{..} = (\orderQuantity -> Order { orderQuantity, ..} ) <$> f orderQuantity
|
||||||
{-# INLINE orderQuantityT #-}
|
{-# INLINE orderQuantityL #-}
|
||||||
|
|
||||||
-- | 'orderShipDate' Traversal
|
-- | 'orderShipDate' Lens
|
||||||
orderShipDateT :: Traversal_' Order UTCTime
|
orderShipDateL :: Lens_' Order (Maybe UTCTime)
|
||||||
orderShipDateT f s = _mtraversal orderShipDate (\b -> s { orderShipDate = Just b}) f s
|
orderShipDateL f Order{..} = (\orderShipDate -> Order { orderShipDate, ..} ) <$> f orderShipDate
|
||||||
{-# INLINE orderShipDateT #-}
|
{-# INLINE orderShipDateL #-}
|
||||||
|
|
||||||
-- | 'orderStatus' Traversal
|
-- | 'orderStatus' Lens
|
||||||
orderStatusT :: Traversal_' Order Text
|
orderStatusL :: Lens_' Order (Maybe Text)
|
||||||
orderStatusT f s = _mtraversal orderStatus (\b -> s { orderStatus = Just b}) f s
|
orderStatusL f Order{..} = (\orderStatus -> Order { orderStatus, ..} ) <$> f orderStatus
|
||||||
{-# INLINE orderStatusT #-}
|
{-# INLINE orderStatusL #-}
|
||||||
|
|
||||||
-- | 'orderComplete' Traversal
|
-- | 'orderComplete' Lens
|
||||||
orderCompleteT :: Traversal_' Order Bool
|
orderCompleteL :: Lens_' Order (Maybe Bool)
|
||||||
orderCompleteT f s = _mtraversal orderComplete (\b -> s { orderComplete = Just b}) f s
|
orderCompleteL f Order{..} = (\orderComplete -> Order { orderComplete, ..} ) <$> f orderComplete
|
||||||
{-# INLINE orderCompleteT #-}
|
{-# INLINE orderCompleteL #-}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
-- * Pet
|
-- * Pet
|
||||||
|
|
||||||
-- | 'petId' Traversal
|
-- | 'petId' Lens
|
||||||
petIdT :: Traversal_' Pet Integer
|
petIdL :: Lens_' Pet (Maybe Integer)
|
||||||
petIdT f s = _mtraversal petId (\b -> s { petId = Just b}) f s
|
petIdL f Pet{..} = (\petId -> Pet { petId, ..} ) <$> f petId
|
||||||
{-# INLINE petIdT #-}
|
{-# INLINE petIdL #-}
|
||||||
|
|
||||||
-- | 'petCategory' Traversal
|
-- | 'petCategory' Lens
|
||||||
petCategoryT :: Traversal_' Pet Category
|
petCategoryL :: Lens_' Pet (Maybe Category)
|
||||||
petCategoryT f s = _mtraversal petCategory (\b -> s { petCategory = Just b}) f s
|
petCategoryL f Pet{..} = (\petCategory -> Pet { petCategory, ..} ) <$> f petCategory
|
||||||
{-# INLINE petCategoryT #-}
|
{-# INLINE petCategoryL #-}
|
||||||
|
|
||||||
-- | 'petName' Lens
|
-- | 'petName' Lens
|
||||||
petNameL :: Lens_' Pet Text
|
petNameL :: Lens_' Pet (Text)
|
||||||
petNameL f Pet{..} = (\petName -> Pet { petName, ..} ) <$> f petName
|
petNameL f Pet{..} = (\petName -> Pet { petName, ..} ) <$> f petName
|
||||||
{-# INLINE petNameL #-}
|
{-# INLINE petNameL #-}
|
||||||
|
|
||||||
-- | 'petPhotoUrls' Lens
|
-- | 'petPhotoUrls' Lens
|
||||||
petPhotoUrlsL :: Lens_' Pet [Text]
|
petPhotoUrlsL :: Lens_' Pet ([Text])
|
||||||
petPhotoUrlsL f Pet{..} = (\petPhotoUrls -> Pet { petPhotoUrls, ..} ) <$> f petPhotoUrls
|
petPhotoUrlsL f Pet{..} = (\petPhotoUrls -> Pet { petPhotoUrls, ..} ) <$> f petPhotoUrls
|
||||||
{-# INLINE petPhotoUrlsL #-}
|
{-# INLINE petPhotoUrlsL #-}
|
||||||
|
|
||||||
-- | 'petTags' Traversal
|
-- | 'petTags' Lens
|
||||||
petTagsT :: Traversal_' Pet [Tag]
|
petTagsL :: Lens_' Pet (Maybe [Tag])
|
||||||
petTagsT f s = _mtraversal petTags (\b -> s { petTags = Just b}) f s
|
petTagsL f Pet{..} = (\petTags -> Pet { petTags, ..} ) <$> f petTags
|
||||||
{-# INLINE petTagsT #-}
|
{-# INLINE petTagsL #-}
|
||||||
|
|
||||||
-- | 'petStatus' Traversal
|
-- | 'petStatus' Lens
|
||||||
petStatusT :: Traversal_' Pet Text
|
petStatusL :: Lens_' Pet (Maybe Text)
|
||||||
petStatusT f s = _mtraversal petStatus (\b -> s { petStatus = Just b}) f s
|
petStatusL f Pet{..} = (\petStatus -> Pet { petStatus, ..} ) <$> f petStatus
|
||||||
{-# INLINE petStatusT #-}
|
{-# INLINE petStatusL #-}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
-- * Tag
|
-- * Tag
|
||||||
|
|
||||||
-- | 'tagId' Traversal
|
-- | 'tagId' Lens
|
||||||
tagIdT :: Traversal_' Tag Integer
|
tagIdL :: Lens_' Tag (Maybe Integer)
|
||||||
tagIdT f s = _mtraversal tagId (\b -> s { tagId = Just b}) f s
|
tagIdL f Tag{..} = (\tagId -> Tag { tagId, ..} ) <$> f tagId
|
||||||
{-# INLINE tagIdT #-}
|
{-# INLINE tagIdL #-}
|
||||||
|
|
||||||
-- | 'tagName' Traversal
|
-- | 'tagName' Lens
|
||||||
tagNameT :: Traversal_' Tag Text
|
tagNameL :: Lens_' Tag (Maybe Text)
|
||||||
tagNameT f s = _mtraversal tagName (\b -> s { tagName = Just b}) f s
|
tagNameL f Tag{..} = (\tagName -> Tag { tagName, ..} ) <$> f tagName
|
||||||
{-# INLINE tagNameT #-}
|
{-# INLINE tagNameL #-}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
-- * User
|
-- * User
|
||||||
|
|
||||||
-- | 'userId' Traversal
|
-- | 'userId' Lens
|
||||||
userIdT :: Traversal_' User Integer
|
userIdL :: Lens_' User (Maybe Integer)
|
||||||
userIdT f s = _mtraversal userId (\b -> s { userId = Just b}) f s
|
userIdL f User{..} = (\userId -> User { userId, ..} ) <$> f userId
|
||||||
{-# INLINE userIdT #-}
|
{-# INLINE userIdL #-}
|
||||||
|
|
||||||
-- | 'userUsername' Traversal
|
-- | 'userUsername' Lens
|
||||||
userUsernameT :: Traversal_' User Text
|
userUsernameL :: Lens_' User (Maybe Text)
|
||||||
userUsernameT f s = _mtraversal userUsername (\b -> s { userUsername = Just b}) f s
|
userUsernameL f User{..} = (\userUsername -> User { userUsername, ..} ) <$> f userUsername
|
||||||
{-# INLINE userUsernameT #-}
|
{-# INLINE userUsernameL #-}
|
||||||
|
|
||||||
-- | 'userFirstName' Traversal
|
-- | 'userFirstName' Lens
|
||||||
userFirstNameT :: Traversal_' User Text
|
userFirstNameL :: Lens_' User (Maybe Text)
|
||||||
userFirstNameT f s = _mtraversal userFirstName (\b -> s { userFirstName = Just b}) f s
|
userFirstNameL f User{..} = (\userFirstName -> User { userFirstName, ..} ) <$> f userFirstName
|
||||||
{-# INLINE userFirstNameT #-}
|
{-# INLINE userFirstNameL #-}
|
||||||
|
|
||||||
-- | 'userLastName' Traversal
|
-- | 'userLastName' Lens
|
||||||
userLastNameT :: Traversal_' User Text
|
userLastNameL :: Lens_' User (Maybe Text)
|
||||||
userLastNameT f s = _mtraversal userLastName (\b -> s { userLastName = Just b}) f s
|
userLastNameL f User{..} = (\userLastName -> User { userLastName, ..} ) <$> f userLastName
|
||||||
{-# INLINE userLastNameT #-}
|
{-# INLINE userLastNameL #-}
|
||||||
|
|
||||||
-- | 'userEmail' Traversal
|
-- | 'userEmail' Lens
|
||||||
userEmailT :: Traversal_' User Text
|
userEmailL :: Lens_' User (Maybe Text)
|
||||||
userEmailT f s = _mtraversal userEmail (\b -> s { userEmail = Just b}) f s
|
userEmailL f User{..} = (\userEmail -> User { userEmail, ..} ) <$> f userEmail
|
||||||
{-# INLINE userEmailT #-}
|
{-# INLINE userEmailL #-}
|
||||||
|
|
||||||
-- | 'userPassword' Traversal
|
-- | 'userPassword' Lens
|
||||||
userPasswordT :: Traversal_' User Text
|
userPasswordL :: Lens_' User (Maybe Text)
|
||||||
userPasswordT f s = _mtraversal userPassword (\b -> s { userPassword = Just b}) f s
|
userPasswordL f User{..} = (\userPassword -> User { userPassword, ..} ) <$> f userPassword
|
||||||
{-# INLINE userPasswordT #-}
|
{-# INLINE userPasswordL #-}
|
||||||
|
|
||||||
-- | 'userPhone' Traversal
|
-- | 'userPhone' Lens
|
||||||
userPhoneT :: Traversal_' User Text
|
userPhoneL :: Lens_' User (Maybe Text)
|
||||||
userPhoneT f s = _mtraversal userPhone (\b -> s { userPhone = Just b}) f s
|
userPhoneL f User{..} = (\userPhone -> User { userPhone, ..} ) <$> f userPhone
|
||||||
{-# INLINE userPhoneT #-}
|
{-# INLINE userPhoneL #-}
|
||||||
|
|
||||||
-- | 'userUserStatus' Traversal
|
-- | 'userUserStatus' Lens
|
||||||
userUserStatusT :: Traversal_' User Int
|
userUserStatusL :: Lens_' User (Maybe Int)
|
||||||
userUserStatusT f s = _mtraversal userUserStatus (\b -> s { userUserStatus = Just b}) f s
|
userUserStatusL f User{..} = (\userUserStatus -> User { userUserStatus, ..} ) <$> f userUserStatus
|
||||||
{-# INLINE userUserStatusT #-}
|
{-# INLINE userUserStatusL #-}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
-- * Helpers
|
|
||||||
|
|
||||||
_mtraversal :: Applicative f => (b -> Maybe t) -> (a -> b) -> (t -> f a) -> b -> f b
|
|
||||||
_mtraversal x fsb f s = maybe (pure s) (\a -> fsb <$> f a) (x s)
|
|
||||||
{-# INLINE _mtraversal #-}
|
|
||||||
|
|||||||
@@ -365,14 +365,14 @@ _parseISO8601 t =
|
|||||||
|
|
||||||
-- * Date Formatting
|
-- * Date Formatting
|
||||||
|
|
||||||
-- | @TI.parseTimeM True TI.defaultTimeLocale ""@
|
-- | @TI.parseTimeM True TI.defaultTimeLocale "%Y-%m-%d"@
|
||||||
_readDate :: (TI.ParseTime t, Monad m) => String -> m t
|
_readDate :: (TI.ParseTime t, Monad m) => String -> m t
|
||||||
_readDate =
|
_readDate =
|
||||||
TI.parseTimeM True TI.defaultTimeLocale ""
|
TI.parseTimeM True TI.defaultTimeLocale "%Y-%m-%d"
|
||||||
{-# INLINE _readDate #-}
|
{-# INLINE _readDate #-}
|
||||||
|
|
||||||
-- | @TI.formatTime TI.defaultTimeLocale ""@
|
-- | @TI.formatTime TI.defaultTimeLocale "%Y-%m-%d"@
|
||||||
_showDate :: TI.FormatTime t => t -> String
|
_showDate :: TI.FormatTime t => t -> String
|
||||||
_showDate =
|
_showDate =
|
||||||
TI.formatTime TI.defaultTimeLocale ""
|
TI.formatTime TI.defaultTimeLocale "%Y-%m-%d"
|
||||||
{-# INLINE _showDate #-}
|
{-# INLINE _showDate #-}
|
||||||
@@ -7,6 +7,7 @@ version: 0.1.0.0
|
|||||||
synopsis: Auto-generated swagger-petstore API Client
|
synopsis: Auto-generated swagger-petstore API Client
|
||||||
description: .
|
description: .
|
||||||
Client library for calling the swagger-petstore API based on http-client.
|
Client library for calling the swagger-petstore API based on http-client.
|
||||||
|
host: petstore.swagger.io
|
||||||
.
|
.
|
||||||
base path: http://petstore.swagger.io/v2
|
base path: http://petstore.swagger.io/v2
|
||||||
.
|
.
|
||||||
|
|||||||
@@ -29,9 +29,12 @@ dependencies:
|
|||||||
- text >=0.11 && <1.3
|
- text >=0.11 && <1.3
|
||||||
- time >=1.5 && <1.9
|
- time >=1.5 && <1.9
|
||||||
- vector >=0.10.9 && <0.13
|
- vector >=0.10.9 && <0.13
|
||||||
|
- monad-logger >=0.3 && <0.4
|
||||||
|
- exceptions >= 0.4
|
||||||
- case-insensitive
|
- case-insensitive
|
||||||
- swagger-petstore
|
- safe-exceptions <0.2
|
||||||
- microlens
|
- microlens
|
||||||
|
- swagger-petstore
|
||||||
tests:
|
tests:
|
||||||
tests:
|
tests:
|
||||||
main: Test.hs
|
main: Test.hs
|
||||||
|
|||||||
@@ -40,10 +40,13 @@ test-suite tests
|
|||||||
, text >=0.11 && <1.3
|
, text >=0.11 && <1.3
|
||||||
, time >=1.5 && <1.9
|
, time >=1.5 && <1.9
|
||||||
, vector >=0.10.9 && <0.13
|
, vector >=0.10.9 && <0.13
|
||||||
|
, monad-logger >=0.3 && <0.4
|
||||||
|
, exceptions >= 0.4
|
||||||
, case-insensitive
|
, case-insensitive
|
||||||
, swagger-petstore
|
, safe-exceptions <0.2
|
||||||
, microlens
|
, microlens
|
||||||
, swagger-petstore
|
, swagger-petstore
|
||||||
|
, swagger-petstore
|
||||||
, bytestring >=0.10.0 && <0.11
|
, bytestring >=0.10.0 && <0.11
|
||||||
, containers
|
, containers
|
||||||
, hspec >=1.8
|
, hspec >=1.8
|
||||||
|
|||||||
@@ -237,7 +237,11 @@ testUserOps mgr config = do
|
|||||||
}
|
}
|
||||||
_users =
|
_users =
|
||||||
take 8 $
|
take 8 $
|
||||||
drop 1 $ iterate (L.over S.userUsernameT (<> "*") . L.over S.userIdT (+ 1)) _user
|
drop 1 $
|
||||||
|
iterate
|
||||||
|
(L.over (S.userUsernameL . L._Just) (<> "*") .
|
||||||
|
L.over (S.userIdL . L._Just) (+ 1))
|
||||||
|
_user
|
||||||
|
|
||||||
before (pure _user) $
|
before (pure _user) $
|
||||||
it "createUser" $ \user -> do
|
it "createUser" $ \user -> do
|
||||||
|
|||||||
Reference in New Issue
Block a user