mirror of
https://github.com/OpenAPITools/openapi-generator.git
synced 2025-12-08 04:56:11 +00:00
[haskell-http-client] resolve oas 2.0 regressions (#198)
* [haskell-http-client] fix codegen issues * ensure datatypeWithEnum is set on codegenParameter when is enum * [haskell-http-client] fix isAlias + arrayModelType missing "datatype" * [haskell-http-client] param.isListContainer is sometimes false for list types * [haskell-http-client] gen MimeNoContent instances automatically * [haskell-http-client] fix example-app and integration tests * [haskell-http-client] update docs
This commit is contained in:
committed by
William Cheng
parent
019b0dca1c
commit
db02cc2ac9
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
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 - -)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-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 - -</p><table><tr><td class="src">-&-</td><td class="module"><a href="SwaggerPetstore-Core.html#v:-45--38--45-">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - -</p><table><tr><td class="src">-&-</td><td class="module"><a href="SwaggerPetstore-Core.html#v:-45--38--45-">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@@ -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 - B)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-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 - B</p><table><tr><td class="src">Binary</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Core.html#t:Binary">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Core.html#v:Binary">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">Body</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Body">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Body">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">Byte</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Byte">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Byte">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">ByteArray</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Core.html#t:ByteArray">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Core.html#v:ByteArray">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-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 - B</p><table><tr><td class="src">Binary</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Core.html#t:Binary">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Core.html#v:Binary">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">Body</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Body">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Body">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">BodyText</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:BodyText">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:BodyText">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">BooleanPostBody</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:BooleanPostBody">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:BooleanPostBody">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">Byte</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Byte">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Byte">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">ByteArray</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Core.html#t:ByteArray">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Core.html#v:ByteArray">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@@ -1,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 - G)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-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 - G</p><table><tr><td class="src">GetInventory</td><td class="module"><a href="SwaggerPetstore-API-Store.html#t:GetInventory">SwaggerPetstore.API.Store</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">getInventory</td><td class="module"><a href="SwaggerPetstore-API-Store.html#v:getInventory">SwaggerPetstore.API.Store</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">GetOrderById</td><td class="module"><a href="SwaggerPetstore-API-Store.html#t:GetOrderById">SwaggerPetstore.API.Store</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">getOrderById</td><td class="module"><a href="SwaggerPetstore-API-Store.html#v:getOrderById">SwaggerPetstore.API.Store</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">GetPetById</td><td class="module"><a href="SwaggerPetstore-API-Pet.html#t:GetPetById">SwaggerPetstore.API.Pet</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">getPetById</td><td class="module"><a href="SwaggerPetstore-API-Pet.html#v:getPetById">SwaggerPetstore.API.Pet</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">GetUserByName</td><td class="module"><a href="SwaggerPetstore-API-User.html#t:GetUserByName">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">getUserByName</td><td class="module"><a href="SwaggerPetstore-API-User.html#v:getUserByName">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - G</p><table><tr><td class="src">GetInventory</td><td class="module"><a href="SwaggerPetstore-API-Store.html#t:GetInventory">SwaggerPetstore.API.Store</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">getInventory</td><td class="module"><a href="SwaggerPetstore-API-Store.html#v:getInventory">SwaggerPetstore.API.Store</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">GetOrderById</td><td class="module"><a href="SwaggerPetstore-API-Store.html#t:GetOrderById">SwaggerPetstore.API.Store</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">getOrderById</td><td class="module"><a href="SwaggerPetstore-API-Store.html#v:getOrderById">SwaggerPetstore.API.Store</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">GetPetById</td><td class="module"><a href="SwaggerPetstore-API-Pet.html#t:GetPetById">SwaggerPetstore.API.Pet</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">getPetById</td><td class="module"><a href="SwaggerPetstore-API-Pet.html#v:getPetById">SwaggerPetstore.API.Pet</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">GetUserByName</td><td class="module"><a href="SwaggerPetstore-API-User.html#t:GetUserByName">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">getUserByName</td><td class="module"><a href="SwaggerPetstore-API-User.html#v:getUserByName">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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 - H)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-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 - H</p><table><tr><td class="src">HasBodyParam</td><td class="module"><a href="SwaggerPetstore-Core.html#t:HasBodyParam">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">HasOnlyReadOnly</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:HasOnlyReadOnly">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:HasOnlyReadOnly">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBar</td><td class="module"><a href="SwaggerPetstore-Model.html#v:hasOnlyReadOnlyBar">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBarL</td><td class="module"><a href="SwaggerPetstore-ModelLens.html#v:hasOnlyReadOnlyBarL">SwaggerPetstore.ModelLens</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFoo</td><td class="module"><a href="SwaggerPetstore-Model.html#v:hasOnlyReadOnlyFoo">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFooL</td><td class="module"><a href="SwaggerPetstore-ModelLens.html#v:hasOnlyReadOnlyFooL">SwaggerPetstore.ModelLens</a>, SwaggerPetstore</td></tr><tr><td class="src">HasOptionalParam</td><td class="module"><a href="SwaggerPetstore-Core.html#t:HasOptionalParam">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - H</p><table><tr><td class="src">HasBodyParam</td><td class="module"><a href="SwaggerPetstore-Core.html#t:HasBodyParam">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">HasOnlyReadOnly</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:HasOnlyReadOnly">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:HasOnlyReadOnly">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBar</td><td class="module"><a href="SwaggerPetstore-Model.html#v:hasOnlyReadOnlyBar">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyBarL</td><td class="module"><a href="SwaggerPetstore-ModelLens.html#v:hasOnlyReadOnlyBarL">SwaggerPetstore.ModelLens</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFoo</td><td class="module"><a href="SwaggerPetstore-Model.html#v:hasOnlyReadOnlyFoo">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">hasOnlyReadOnlyFooL</td><td class="module"><a href="SwaggerPetstore-ModelLens.html#v:hasOnlyReadOnlyFooL">SwaggerPetstore.ModelLens</a>, SwaggerPetstore</td></tr><tr><td class="src">HasOptionalParam</td><td class="module"><a href="SwaggerPetstore-Core.html#t:HasOptionalParam">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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 - I)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-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 - I</p><table><tr><td class="src">initLogContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:initLogContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">InitRequest</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Client.html#t:InitRequest">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Client.html#v:InitRequest">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">Int32</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Int32">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Int32">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">Int64</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Int64">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Int64">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - I</p><table><tr><td class="src">initLogContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:initLogContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">InitRequest</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Client.html#t:InitRequest">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Client.html#v:InitRequest">SwaggerPetstore.Client</a>, SwaggerPetstore</td></tr><tr><td class="src">Int32</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Int32">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Int32">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="src">Int64</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Int64">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Int64">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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 - L)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-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 - L</p><table><tr><td class="src">Lens_</td><td class="module"><a href="SwaggerPetstore-Core.html#t:Lens_">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">Lens_'</td><td class="module"><a href="SwaggerPetstore-Core.html#t:Lens_-39-">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">levelDebug</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelDebug">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">levelError</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelError">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">levelInfo</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelInfo">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">logExceptions</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:logExceptions">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogExecWithContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogExecWithContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LoginUser</td><td class="module"><a href="SwaggerPetstore-API-User.html#t:LoginUser">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">loginUser</td><td class="module"><a href="SwaggerPetstore-API-User.html#v:loginUser">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">LogLevel</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogLevel">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogoutUser</td><td class="module"><a href="SwaggerPetstore-API-User.html#t:LogoutUser">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">logoutUser</td><td class="module"><a href="SwaggerPetstore-API-User.html#v:logoutUser">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-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 - L</p><table><tr><td class="src">Lens_</td><td class="module"><a href="SwaggerPetstore-Core.html#t:Lens_">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">Lens_'</td><td class="module"><a href="SwaggerPetstore-Core.html#t:Lens_-39-">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">levelDebug</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelDebug">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">levelError</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelError">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">levelInfo</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:levelInfo">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">logExceptions</td><td class="module"><a href="SwaggerPetstore-Logging.html#v:logExceptions">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogExec</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogExec">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogExecWithContext</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogExecWithContext">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LoginUser</td><td class="module"><a href="SwaggerPetstore-API-User.html#t:LoginUser">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">loginUser</td><td class="module"><a href="SwaggerPetstore-API-User.html#v:loginUser">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">LogLevel</td><td class="module"><a href="SwaggerPetstore-Logging.html#t:LogLevel">SwaggerPetstore.Logging</a>, SwaggerPetstore</td></tr><tr><td class="src">LogoutUser</td><td class="module"><a href="SwaggerPetstore-API-User.html#t:LogoutUser">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr><tr><td class="src">logoutUser</td><td class="module"><a href="SwaggerPetstore-API-User.html#v:logoutUser">SwaggerPetstore.API.User</a>, SwaggerPetstore.API, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@@ -0,0 +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 - Q)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - Q</p><table><tr><td class="src">Query</td><td> </td></tr><tr><td class="alt">1 (Type/Class)</td><td class="module"><a href="SwaggerPetstore-Model.html#t:Query">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr><tr><td class="alt">2 (Data Constructor)</td><td class="module"><a href="SwaggerPetstore-Model.html#v:Query">SwaggerPetstore.Model</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</p></div></body></html>
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@@ -1,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 - W)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-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 - W</p><table><tr><td class="src">withNoLogging</td><td class="module"><a href="SwaggerPetstore-Core.html#v:withNoLogging">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">withStderrLogging</td><td class="module"><a href="SwaggerPetstore-Core.html#v:withStderrLogging">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">withStdoutLogging</td><td class="module"><a href="SwaggerPetstore-Core.html#v:withStdoutLogging">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div><div id="index"><p class="caption">Index - W</p><table><tr><td class="src">withNoLogging</td><td class="module"><a href="SwaggerPetstore-Core.html#v:withNoLogging">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">withStderrLogging</td><td class="module"><a href="SwaggerPetstore-Core.html#v:withStderrLogging">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr><tr><td class="src">withStdoutLogging</td><td class="module"><a href="SwaggerPetstore-Core.html#v:withStdoutLogging">SwaggerPetstore.Core</a>, SwaggerPetstore</td></tr></table></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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)</title><link href="ocean.css" rel="stylesheet" type="text/css" title="Ocean" /><script src="haddock-util.js" type="text/javascript"></script><script src="https://cdnjs.cloudflare.com/ajax/libs/mathjax/2.7.0/MathJax.js?config=TeX-AMS-MML_HTMLorMML" type="text/javascript"></script><script type="text/javascript">//<![CDATA[
|
||||
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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-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><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</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-B.html">B</a></li><li><a href="doc-index-C.html">C</a></li><li><a href="doc-index-D.html">D</a></li><li><a href="doc-index-E.html">E</a></li><li><a href="doc-index-F.html">F</a></li><li><a href="doc-index-G.html">G</a></li><li><a href="doc-index-H.html">H</a></li><li><a href="doc-index-I.html">I</a></li><li><a href="doc-index-L.html">L</a></li><li><a href="doc-index-M.html">M</a></li><li><a href="doc-index-N.html">N</a></li><li><a href="doc-index-O.html">O</a></li><li><a href="doc-index-P.html">P</a></li><li><a href="doc-index-Q.html">Q</a></li><li><a href="doc-index-R.html">R</a></li><li><a href="doc-index-S.html">S</a></li><li><a href="doc-index-T.html">T</a></li><li><a href="doc-index-U.html">U</a></li><li><a href="doc-index-W.html">W</a></li><li><a href="doc-index-45.html">-</a></li><li><a href="doc-index-95.html">_</a></li><li><a href="doc-index-All.html">All</a></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</p></div></body></html>
|
||||
@@ -2,4 +2,4 @@
|
||||
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="description"><h1>swagger-petstore-0.1.0.0: Auto-generated swagger-petstore API Client</h1><div class="doc"><p>.
|
||||
Client library for calling the Swagger Petstore API based on http-client.</p><p>host: petstore.swagger.io:80</p><p>base path: <a href="http://petstore.swagger.io:80/v2">http://petstore.swagger.io:80/v2</a></p><p>Swagger Petstore API version: 1.0.0</p><p>OpenAPI spec version: 2.0</p><p>OpenAPI-Specification: <a href="https://github.com/OAI/OpenAPI-Specification/blob/master/versions/2.0.md">https://github.com/OAI/OpenAPI-Specification/blob/master/versions/2.0.md</a></p></div></div><div id="module-list"><p class="caption">Signatures</p></div><div id="module-list"><p class="caption">Modules</p><ul><li><span class="module"><span id="control.n.1" class="collapser" onclick="toggleSection('n.1')"> </span><a href="SwaggerPetstore.html">SwaggerPetstore</a></span><ul id="section.n.1" class="show"><li><span class="module"><span id="control.n.1.1" class="collapser" onclick="toggleSection('n.1.1')"> </span><a href="SwaggerPetstore-API.html">SwaggerPetstore.API</a></span><ul id="section.n.1.1" class="show"><li><span class="module"><a href="SwaggerPetstore-API-AnotherFake.html">SwaggerPetstore.API.AnotherFake</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-Fake.html">SwaggerPetstore.API.Fake</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-FakeClassnameTags123.html">SwaggerPetstore.API.FakeClassnameTags123</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-Pet.html">SwaggerPetstore.API.Pet</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-Store.html">SwaggerPetstore.API.Store</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-User.html">SwaggerPetstore.API.User</a></span></li></ul></li><li><span class="module"><a href="SwaggerPetstore-Client.html">SwaggerPetstore.Client</a></span></li><li><span class="module"><a href="SwaggerPetstore-Core.html">SwaggerPetstore.Core</a></span></li><li><span class="module"><a href="SwaggerPetstore-Logging.html">SwaggerPetstore.Logging</a></span></li><li><span class="module"><a href="SwaggerPetstore-MimeTypes.html">SwaggerPetstore.MimeTypes</a></span></li><li><span class="module"><a href="SwaggerPetstore-Model.html">SwaggerPetstore.Model</a></span></li><li><span class="module"><a href="SwaggerPetstore-ModelLens.html">SwaggerPetstore.ModelLens</a></span></li></ul></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</p></div></body></html>
|
||||
Client library for calling the Swagger Petstore API based on http-client.</p><p>host: petstore.swagger.io</p><p>base path: <a href="http://petstore.swagger.io:80/v2">http://petstore.swagger.io:80/v2</a></p><p>Swagger Petstore API version: 1.0.0</p><p>OpenAPI version: 3.0.1</p><p>category: Web</p></div></div><div id="module-list"><p class="caption">Signatures</p></div><div id="module-list"><p class="caption">Modules</p><ul><li><span class="module"><span id="control.n.1" class="collapser" onclick="toggleSection('n.1')"> </span><a href="SwaggerPetstore.html">SwaggerPetstore</a></span><ul id="section.n.1" class="show"><li><span class="module"><span id="control.n.1.1" class="collapser" onclick="toggleSection('n.1.1')"> </span><a href="SwaggerPetstore-API.html">SwaggerPetstore.API</a></span><ul id="section.n.1.1" class="show"><li><span class="module"><a href="SwaggerPetstore-API-AnotherFake.html">SwaggerPetstore.API.AnotherFake</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-Fake.html">SwaggerPetstore.API.Fake</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-FakeClassnameTags123.html">SwaggerPetstore.API.FakeClassnameTags123</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-Pet.html">SwaggerPetstore.API.Pet</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-Store.html">SwaggerPetstore.API.Store</a></span></li><li><span class="module"><a href="SwaggerPetstore-API-User.html">SwaggerPetstore.API.User</a></span></li></ul></li><li><span class="module"><a href="SwaggerPetstore-Client.html">SwaggerPetstore.Client</a></span></li><li><span class="module"><a href="SwaggerPetstore-Core.html">SwaggerPetstore.Core</a></span></li><li><span class="module"><a href="SwaggerPetstore-Logging.html">SwaggerPetstore.Logging</a></span></li><li><span class="module"><a href="SwaggerPetstore-MimeTypes.html">SwaggerPetstore.MimeTypes</a></span></li><li><span class="module"><a href="SwaggerPetstore-Model.html">SwaggerPetstore.Model</a></span></li><li><span class="module"><a href="SwaggerPetstore-ModelLens.html">SwaggerPetstore.ModelLens</a></span></li></ul></li></ul></div></div><div id="footer"><p>Produced by <a href="http://www.haskell.org/haddock/">Haddock</a> version 2.18.1</p></div></body></html>
|
||||
@@ -29,12 +29,12 @@
|
||||
</span><a name="line-29"></a><a name="version"><a href="Paths_swagger_petstore.html#version"><span class="hs-identifier">version</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Version</span><span> </span><span class="hs-special">[</span><span class="hs-number">0</span><span class="hs-special">,</span><span class="hs-number">1</span><span class="hs-special">,</span><span class="hs-number">0</span><span class="hs-special">,</span><span class="hs-number">0</span><span class="hs-special">]</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-identifier">bindir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">dynlibdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">datadir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libexecdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">sysconfdir</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
|
||||
</span><a name="line-31"></a><span>
|
||||
</span><a name="line-32"></a><a name="bindir"><a href="Paths_swagger_petstore.html#bindir"><span class="hs-identifier">bindir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/bin"</span><span>
|
||||
</span><a name="line-33"></a><a name="libdir"><a href="Paths_swagger_petstore.html#libdir"><span class="hs-identifier">libdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/lib/x86_64-linux-ghc-8.2.2/swagger-petstore-0.1.0.0-9Pk0KlchkM5tXgZZX1kZB"</span><span>
|
||||
</span><a name="line-34"></a><a name="dynlibdir"><a href="Paths_swagger_petstore.html#dynlibdir"><span class="hs-identifier">dynlibdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/lib/x86_64-linux-ghc-8.2.2"</span><span>
|
||||
</span><a name="line-35"></a><a name="datadir"><a href="Paths_swagger_petstore.html#datadir"><span class="hs-identifier">datadir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/share/x86_64-linux-ghc-8.2.2/swagger-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-36"></a><a name="libexecdir"><a href="Paths_swagger_petstore.html#libexecdir"><span class="hs-identifier">libexecdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/libexec/x86_64-linux-ghc-8.2.2/swagger-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-37"></a><a name="sysconfdir"><a href="Paths_swagger_petstore.html#sysconfdir"><span class="hs-identifier">sysconfdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/swagger-codegen/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/etc"</span><span>
|
||||
</span><a name="line-32"></a><a name="bindir"><a href="Paths_swagger_petstore.html#bindir"><span class="hs-identifier">bindir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/bin"</span><span>
|
||||
</span><a name="line-33"></a><a name="libdir"><a href="Paths_swagger_petstore.html#libdir"><span class="hs-identifier">libdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/lib/x86_64-linux-ghc-8.2.2/swagger-petstore-0.1.0.0-9Pk0KlchkM5tXgZZX1kZB"</span><span>
|
||||
</span><a name="line-34"></a><a name="dynlibdir"><a href="Paths_swagger_petstore.html#dynlibdir"><span class="hs-identifier">dynlibdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/lib/x86_64-linux-ghc-8.2.2"</span><span>
|
||||
</span><a name="line-35"></a><a name="datadir"><a href="Paths_swagger_petstore.html#datadir"><span class="hs-identifier">datadir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/share/x86_64-linux-ghc-8.2.2/swagger-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-36"></a><a name="libexecdir"><a href="Paths_swagger_petstore.html#libexecdir"><span class="hs-identifier">libexecdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/libexec/x86_64-linux-ghc-8.2.2/swagger-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-37"></a><a name="sysconfdir"><a href="Paths_swagger_petstore.html#sysconfdir"><span class="hs-identifier">sysconfdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-nopie/lts-10.0/8.2.2/etc"</span><span>
|
||||
</span><a name="line-38"></a><span>
|
||||
</span><a name="line-39"></a><span class="hs-identifier">getBinDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getLibDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getDynLibDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getDataDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getLibexecDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getSysconfDir</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
|
||||
</span><a name="line-40"></a><a name="getBinDir"><a href="Paths_swagger_petstore.html#getBinDir"><span class="hs-identifier">getBinDir</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_bindir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_swagger_petstore.html#bindir"><span class="hs-identifier hs-var">bindir</span></a><span class="hs-special">)</span><span>
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -68,15 +68,15 @@ Module : SwaggerPetstore.API.AnotherFake
|
||||
</span><a name="line-68"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-69"></a><span class="hs-identifier">testSpecialTags</span><span> </span><span>
|
||||
</span><a name="line-70"></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.AnotherFake.html#TestSpecialTags"><span class="hs-identifier hs-type">TestSpecialTags</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "client" - client model</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.AnotherFake.html#TestSpecialTags"><span class="hs-identifier hs-type">TestSpecialTags</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-73"></a><a name="testSpecialTags"><a href="SwaggerPetstore.API.AnotherFake.html#testSpecialTags"><span class="hs-identifier">testSpecialTags</span></a></a><span> </span><a name="local-6989586621679157258"><a href="#local-6989586621679157258"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-73"></a><a name="testSpecialTags"><a href="SwaggerPetstore.API.AnotherFake.html#testSpecialTags"><span class="hs-identifier">testSpecialTags</span></a></a><span> </span><a name="local-6989586621679157729"><a href="#local-6989586621679157729"><span class="hs-identifier">client</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-74"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/another-fake/dummy"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679157258"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679157729"><span class="hs-identifier hs-var">client</span></a><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-keyword">data</span><span> </span><a name="TestSpecialTags"><a href="SwaggerPetstore.API.AnotherFake.html#TestSpecialTags"><span class="hs-identifier">TestSpecialTags</span></a></a><span> </span><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span class="hs-comment">-- | /Body Param/ "body" - client model</span><span>
|
||||
</span><a name="line-79"></a><span class="hs-comment">-- | /Body Param/ "Client" - client model</span><span>
|
||||
</span><a name="line-80"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.AnotherFake.html#TestSpecialTags"><span class="hs-identifier hs-type">TestSpecialTags</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -65,308 +65,333 @@ Module : SwaggerPetstore.API.Fake
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- Test serialization of outer boolean types</span><span>
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-67"></a><span class="hs-identifier">fakeOuterBooleanSerialize</span><span> </span><span>
|
||||
</span><a name="line-68"></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.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679155811"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679155811"><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-70"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155812"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679155811"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterBoolean"><span class="hs-identifier hs-type">OuterBoolean</span></a><span> </span><a href="#local-6989586621679155812"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-68"></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.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679156159"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679156159"><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-70"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679156160"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679156159"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterBoolean"><span class="hs-identifier hs-type">OuterBoolean</span></a><span> </span><a href="#local-6989586621679156160"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-72"></a><a name="fakeOuterBooleanSerialize"><a href="SwaggerPetstore.API.Fake.html#fakeOuterBooleanSerialize"><span class="hs-identifier">fakeOuterBooleanSerialize</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-73"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/boolean"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-74"></a><span>
|
||||
</span><a name="line-75"></a><span class="hs-keyword">data</span><span> </span><a name="FakeOuterBooleanSerialize"><a href="SwaggerPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier">FakeOuterBooleanSerialize</span></a></a><span> </span><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-comment">-- | /Body Param/ "body" - Input boolean as post body</span><span>
|
||||
</span><a name="line-78"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterBoolean"><span class="hs-identifier hs-type">OuterBoolean</span></a><span> </span><span>
|
||||
</span><a name="line-77"></a><span class="hs-comment">-- | /Body Param/ "boolean_post_body" - Input boolean as post body</span><span>
|
||||
</span><a name="line-78"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="SwaggerPetstore.Model.html#BooleanPostBody"><span class="hs-identifier hs-type">BooleanPostBody</span></a><span> </span><span>
|
||||
</span><a name="line-79"></a><span>
|
||||
</span><a name="line-80"></a><span class="hs-comment">-- *** fakeOuterCompositeSerialize</span><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- | @POST \/fake\/outer\/composite@</span><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- Test serialization of object with outer number type</span><span>
|
||||
</span><a name="line-85"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-86"></a><span class="hs-identifier">fakeOuterCompositeSerialize</span><span> </span><span>
|
||||
</span><a name="line-87"></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.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679155809"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-88"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679155809"><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-89"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155810"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-90"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679155809"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><a href="#local-6989586621679155810"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-91"></a><a name="fakeOuterCompositeSerialize"><a href="SwaggerPetstore.API.Fake.html#fakeOuterCompositeSerialize"><span class="hs-identifier">fakeOuterCompositeSerialize</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-92"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/composite"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-93"></a><span>
|
||||
</span><a name="line-94"></a><span class="hs-keyword">data</span><span> </span><a name="FakeOuterCompositeSerialize"><a href="SwaggerPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier">FakeOuterCompositeSerialize</span></a></a><span> </span><span>
|
||||
</span><a name="line-95"></a><span>
|
||||
</span><a name="line-96"></a><span class="hs-comment">-- | /Body Param/ "body" - Input composite as post body</span><span>
|
||||
</span><a name="line-97"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><span>
|
||||
</span><a name="line-98"></a><span>
|
||||
</span><a name="line-99"></a><span class="hs-comment">-- *** fakeOuterNumberSerialize</span><span>
|
||||
</span><a name="line-100"></a><span>
|
||||
</span><a name="line-101"></a><span class="hs-comment">-- | @POST \/fake\/outer\/number@</span><span>
|
||||
</span><a name="line-102"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-103"></a><span class="hs-comment">-- Test serialization of outer number types</span><span>
|
||||
</span><a name="line-104"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-105"></a><span class="hs-identifier">fakeOuterNumberSerialize</span><span> </span><span>
|
||||
</span><a name="line-106"></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.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679155807"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-107"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679155807"><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-108"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155808"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-109"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679155807"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterNumber"><span class="hs-identifier hs-type">OuterNumber</span></a><span> </span><a href="#local-6989586621679155808"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-110"></a><a name="fakeOuterNumberSerialize"><a href="SwaggerPetstore.API.Fake.html#fakeOuterNumberSerialize"><span class="hs-identifier">fakeOuterNumberSerialize</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-111"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/number"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-112"></a><span>
|
||||
</span><a name="line-113"></a><span class="hs-keyword">data</span><span> </span><a name="FakeOuterNumberSerialize"><a href="SwaggerPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier">FakeOuterNumberSerialize</span></a></a><span> </span><span>
|
||||
</span><a name="line-114"></a><span>
|
||||
</span><a name="line-115"></a><span class="hs-comment">-- | /Body Param/ "body" - Input number as post body</span><span>
|
||||
</span><a name="line-116"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterNumber"><span class="hs-identifier hs-type">OuterNumber</span></a><span> </span><span>
|
||||
</span><a name="line-117"></a><span>
|
||||
</span><a name="line-118"></a><span class="hs-comment">-- *** fakeOuterStringSerialize</span><span>
|
||||
</span><a name="line-119"></a><span>
|
||||
</span><a name="line-120"></a><span class="hs-comment">-- | @POST \/fake\/outer\/string@</span><span>
|
||||
</span><a name="line-121"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-122"></a><span class="hs-comment">-- Test serialization of outer string types</span><span>
|
||||
</span><a name="line-123"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-124"></a><span class="hs-identifier">fakeOuterStringSerialize</span><span> </span><span>
|
||||
</span><a name="line-125"></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.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679155805"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-126"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679155805"><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-127"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155806"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-128"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679155805"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterString"><span class="hs-identifier hs-type">OuterString</span></a><span> </span><a href="#local-6989586621679155806"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-129"></a><a name="fakeOuterStringSerialize"><a href="SwaggerPetstore.API.Fake.html#fakeOuterStringSerialize"><span class="hs-identifier">fakeOuterStringSerialize</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-130"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/string"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-80"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-81"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679156152"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679156152"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- *** fakeOuterCompositeSerialize</span><span>
|
||||
</span><a name="line-85"></a><span>
|
||||
</span><a name="line-86"></a><span class="hs-comment">-- | @POST \/fake\/outer\/composite@</span><span>
|
||||
</span><a name="line-87"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-88"></a><span class="hs-comment">-- Test serialization of object with outer number type</span><span>
|
||||
</span><a name="line-89"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-90"></a><span class="hs-identifier">fakeOuterCompositeSerialize</span><span> </span><span>
|
||||
</span><a name="line-91"></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.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679156157"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-92"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679156157"><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-93"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679156158"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-94"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679156157"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><a href="#local-6989586621679156158"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-95"></a><a name="fakeOuterCompositeSerialize"><a href="SwaggerPetstore.API.Fake.html#fakeOuterCompositeSerialize"><span class="hs-identifier">fakeOuterCompositeSerialize</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-96"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/composite"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-97"></a><span>
|
||||
</span><a name="line-98"></a><span class="hs-keyword">data</span><span> </span><a name="FakeOuterCompositeSerialize"><a href="SwaggerPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier">FakeOuterCompositeSerialize</span></a></a><span> </span><span>
|
||||
</span><a name="line-99"></a><span>
|
||||
</span><a name="line-100"></a><span class="hs-comment">-- | /Body Param/ "OuterComposite" - Input composite as post body</span><span>
|
||||
</span><a name="line-101"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><span>
|
||||
</span><a name="line-102"></a><span>
|
||||
</span><a name="line-103"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-104"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679156151"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679156151"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-105"></a><span>
|
||||
</span><a name="line-106"></a><span>
|
||||
</span><a name="line-107"></a><span class="hs-comment">-- *** fakeOuterNumberSerialize</span><span>
|
||||
</span><a name="line-108"></a><span>
|
||||
</span><a name="line-109"></a><span class="hs-comment">-- | @POST \/fake\/outer\/number@</span><span>
|
||||
</span><a name="line-110"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-111"></a><span class="hs-comment">-- Test serialization of outer number types</span><span>
|
||||
</span><a name="line-112"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-113"></a><span class="hs-identifier">fakeOuterNumberSerialize</span><span> </span><span>
|
||||
</span><a name="line-114"></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.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679156155"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-115"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679156155"><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-116"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679156156"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-117"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679156155"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterNumber"><span class="hs-identifier hs-type">OuterNumber</span></a><span> </span><a href="#local-6989586621679156156"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-118"></a><a name="fakeOuterNumberSerialize"><a href="SwaggerPetstore.API.Fake.html#fakeOuterNumberSerialize"><span class="hs-identifier">fakeOuterNumberSerialize</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-119"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/number"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-120"></a><span>
|
||||
</span><a name="line-121"></a><span class="hs-keyword">data</span><span> </span><a name="FakeOuterNumberSerialize"><a href="SwaggerPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier">FakeOuterNumberSerialize</span></a></a><span> </span><span>
|
||||
</span><a name="line-122"></a><span>
|
||||
</span><a name="line-123"></a><span class="hs-comment">-- | /Body Param/ "body" - Input number as post body</span><span>
|
||||
</span><a name="line-124"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="SwaggerPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span>
|
||||
</span><a name="line-125"></a><span>
|
||||
</span><a name="line-126"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-127"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679156150"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679156150"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-128"></a><span>
|
||||
</span><a name="line-129"></a><span>
|
||||
</span><a name="line-130"></a><span class="hs-comment">-- *** fakeOuterStringSerialize</span><span>
|
||||
</span><a name="line-131"></a><span>
|
||||
</span><a name="line-132"></a><span class="hs-keyword">data</span><span> </span><a name="FakeOuterStringSerialize"><a href="SwaggerPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier">FakeOuterStringSerialize</span></a></a><span> </span><span>
|
||||
</span><a name="line-133"></a><span>
|
||||
</span><a name="line-134"></a><span class="hs-comment">-- | /Body Param/ "body" - Input string as post body</span><span>
|
||||
</span><a name="line-135"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterString"><span class="hs-identifier hs-type">OuterString</span></a><span> </span><span>
|
||||
</span><a name="line-136"></a><span>
|
||||
</span><a name="line-137"></a><span class="hs-comment">-- *** testClientModel</span><span>
|
||||
</span><a name="line-138"></a><span>
|
||||
</span><a name="line-139"></a><span class="hs-comment">-- | @PATCH \/fake@</span><span>
|
||||
</span><a name="line-140"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-141"></a><span class="hs-comment">-- To test \"client\" model</span><span>
|
||||
</span><a name="line-142"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-143"></a><span class="hs-comment">-- To test \"client\" model</span><span>
|
||||
</span><a name="line-144"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-145"></a><span class="hs-identifier">testClientModel</span><span> </span><span>
|
||||
</span><a name="line-146"></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.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</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.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><a name="line-148"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-149"></a><a name="testClientModel"><a href="SwaggerPetstore.API.Fake.html#testClientModel"><span class="hs-identifier">testClientModel</span></a></a><span> </span><a name="local-6989586621679155813"><a href="#local-6989586621679155813"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-150"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-151"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679155813"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-132"></a><span class="hs-comment">-- | @POST \/fake\/outer\/string@</span><span>
|
||||
</span><a name="line-133"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-134"></a><span class="hs-comment">-- Test serialization of outer string types</span><span>
|
||||
</span><a name="line-135"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-136"></a><span class="hs-identifier">fakeOuterStringSerialize</span><span> </span><span>
|
||||
</span><a name="line-137"></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.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679156153"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-138"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679156153"><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-139"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679156154"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-140"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679156153"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#OuterString"><span class="hs-identifier hs-type">OuterString</span></a><span> </span><a href="#local-6989586621679156154"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-141"></a><a name="fakeOuterStringSerialize"><a href="SwaggerPetstore.API.Fake.html#fakeOuterStringSerialize"><span class="hs-identifier">fakeOuterStringSerialize</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-142"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/string"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-143"></a><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">data</span><span> </span><a name="FakeOuterStringSerialize"><a href="SwaggerPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier">FakeOuterStringSerialize</span></a></a><span> </span><span>
|
||||
</span><a name="line-145"></a><span>
|
||||
</span><a name="line-146"></a><span class="hs-comment">-- | /Body Param/ "body" - Input string as post body</span><span>
|
||||
</span><a name="line-147"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="SwaggerPetstore.Model.html#BodyText"><span class="hs-identifier hs-type">BodyText</span></a><span> </span><span>
|
||||
</span><a name="line-148"></a><span>
|
||||
</span><a name="line-149"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-150"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679156149"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679156149"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-151"></a><span>
|
||||
</span><a name="line-152"></a><span>
|
||||
</span><a name="line-153"></a><span class="hs-keyword">data</span><span> </span><a name="TestClientModel"><a href="SwaggerPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier">TestClientModel</span></a></a><span> </span><span>
|
||||
</span><a name="line-153"></a><span class="hs-comment">-- *** testBodyWithQueryParams</span><span>
|
||||
</span><a name="line-154"></a><span>
|
||||
</span><a name="line-155"></a><span class="hs-comment">-- | /Body Param/ "body" - client model</span><span>
|
||||
</span><a name="line-156"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span>
|
||||
</span><a name="line-157"></a><span>
|
||||
</span><a name="line-158"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-159"></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.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-160"></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-162"></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.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-163"></a><span>
|
||||
</span><a name="line-164"></a><span>
|
||||
</span><a name="line-165"></a><span class="hs-comment">-- *** testEndpointParameters</span><span>
|
||||
</span><a name="line-155"></a><span class="hs-comment">-- | @PUT \/fake\/body-with-query-params@</span><span>
|
||||
</span><a name="line-156"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-157"></a><span class="hs-identifier">testBodyWithQueryParams</span><span> </span><span>
|
||||
</span><a name="line-158"></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.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier hs-type">TestBodyWithQueryParams</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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-159"></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">-- ^ "user"</span><span>
|
||||
</span><a name="line-160"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Query"><span class="hs-identifier hs-type">Query</span></a><span> </span><span class="hs-comment">-- ^ "query"</span><span>
|
||||
</span><a name="line-161"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier hs-type">TestBodyWithQueryParams</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-162"></a><a name="testBodyWithQueryParams"><a href="SwaggerPetstore.API.Fake.html#testBodyWithQueryParams"><span class="hs-identifier">testBodyWithQueryParams</span></a></a><span> </span><a name="local-6989586621679156161"><a href="#local-6989586621679156161"><span class="hs-identifier">user</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Query"><span class="hs-identifier hs-var">Query</span></a><span> </span><a name="local-6989586621679156162"><a href="#local-6989586621679156162"><span class="hs-identifier">query</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-163"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/body-with-query-params"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-164"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679156161"><span class="hs-identifier hs-var">user</span></a><span>
|
||||
</span><a name="line-165"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"query"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679156162"><span class="hs-identifier hs-var">query</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-166"></a><span>
|
||||
</span><a name="line-167"></a><span class="hs-comment">-- | @POST \/fake@</span><span>
|
||||
</span><a name="line-168"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-169"></a><span class="hs-comment">-- Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 </span><span>
|
||||
</span><a name="line-170"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-171"></a><span class="hs-comment">-- Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 </span><span>
|
||||
</span><a name="line-172"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-173"></a><span class="hs-comment">-- AuthMethod: 'AuthBasicHttpBasicTest'</span><span>
|
||||
</span><a name="line-174"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-175"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-176"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-177"></a><span class="hs-identifier">testEndpointParameters</span><span> </span><span>
|
||||
</span><a name="line-178"></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.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="#local-6989586621679155802"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-179"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679155802"><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-180"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155803"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-181"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Number"><span class="hs-identifier hs-type">Number</span></a><span> </span><span class="hs-comment">-- ^ "number" - None</span><span>
|
||||
</span><a name="line-182"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#ParamDouble"><span class="hs-identifier hs-type">ParamDouble</span></a><span> </span><span class="hs-comment">-- ^ "double" - None</span><span>
|
||||
</span><a name="line-183"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#PatternWithoutDelimiter"><span class="hs-identifier hs-type">PatternWithoutDelimiter</span></a><span> </span><span class="hs-comment">-- ^ "patternWithoutDelimiter" - None</span><span>
|
||||
</span><a name="line-184"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Byte"><span class="hs-identifier hs-type">Byte</span></a><span> </span><span class="hs-comment">-- ^ "byte" - None</span><span>
|
||||
</span><a name="line-185"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="#local-6989586621679155802"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679155804"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679155803"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-186"></a><a name="testEndpointParameters"><a href="SwaggerPetstore.API.Fake.html#testEndpointParameters"><span class="hs-identifier">testEndpointParameters</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Number"><span class="hs-identifier hs-var">Number</span></a><span> </span><a name="local-6989586621679155814"><a href="#local-6989586621679155814"><span class="hs-identifier">number</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamDouble"><span class="hs-identifier hs-var">ParamDouble</span></a><span> </span><a name="local-6989586621679155815"><a href="#local-6989586621679155815"><span class="hs-identifier">double</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PatternWithoutDelimiter"><span class="hs-identifier hs-var">PatternWithoutDelimiter</span></a><span> </span><a name="local-6989586621679155816"><a href="#local-6989586621679155816"><span class="hs-identifier">patternWithoutDelimiter</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Byte"><span class="hs-identifier hs-var">Byte</span></a><span> </span><a name="local-6989586621679155817"><a href="#local-6989586621679155817"><span class="hs-identifier">byte</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-187"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-188"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthBasicHttpBasicTest"><span class="hs-identifier hs-type">AuthBasicHttpBasicTest</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-189"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"number"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155814"><span class="hs-identifier hs-var">number</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-190"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"double"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155815"><span class="hs-identifier hs-var">double</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-191"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"pattern_without_delimiter"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155816"><span class="hs-identifier hs-var">patternWithoutDelimiter</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-192"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"byte"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155817"><span class="hs-identifier hs-var">byte</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-167"></a><span class="hs-keyword">data</span><span> </span><a name="TestBodyWithQueryParams"><a href="SwaggerPetstore.API.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier">TestBodyWithQueryParams</span></a></a><span> </span><span>
|
||||
</span><a name="line-168"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier hs-type">TestBodyWithQueryParams</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span>
|
||||
</span><a name="line-169"></a><span>
|
||||
</span><a name="line-170"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-171"></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.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier hs-type">TestBodyWithQueryParams</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-172"></a><span>
|
||||
</span><a name="line-173"></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.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier hs-type">TestBodyWithQueryParams</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-174"></a><span>
|
||||
</span><a name="line-175"></a><span>
|
||||
</span><a name="line-176"></a><span class="hs-comment">-- *** testClientModel</span><span>
|
||||
</span><a name="line-177"></a><span>
|
||||
</span><a name="line-178"></a><span class="hs-comment">-- | @PATCH \/fake@</span><span>
|
||||
</span><a name="line-179"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-180"></a><span class="hs-comment">-- To test \"client\" model</span><span>
|
||||
</span><a name="line-181"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-182"></a><span class="hs-comment">-- To test \"client\" model</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-184"></a><span class="hs-identifier">testClientModel</span><span> </span><span>
|
||||
</span><a name="line-185"></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.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "client" - client model</span><span>
|
||||
</span><a name="line-187"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-188"></a><a name="testClientModel"><a href="SwaggerPetstore.API.Fake.html#testClientModel"><span class="hs-identifier">testClientModel</span></a></a><span> </span><a name="local-6989586621679156163"><a href="#local-6989586621679156163"><span class="hs-identifier">client</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-189"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-190"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679156163"><span class="hs-identifier hs-var">client</span></a><span>
|
||||
</span><a name="line-191"></a><span>
|
||||
</span><a name="line-192"></a><span class="hs-keyword">data</span><span> </span><a name="TestClientModel"><a href="SwaggerPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier">TestClientModel</span></a></a><span> </span><span>
|
||||
</span><a name="line-193"></a><span>
|
||||
</span><a name="line-194"></a><span class="hs-keyword">data</span><span> </span><a name="TestEndpointParameters"><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier">TestEndpointParameters</span></a></a><span> </span><span>
|
||||
</span><a name="line-195"></a><span>
|
||||
</span><a name="line-196"></a><span class="hs-comment">-- | /Optional Param/ "integer" - None</span><span>
|
||||
</span><a name="line-197"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamInteger"><span class="hs-identifier hs-type">ParamInteger</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-198"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155797"><a href="#local-6989586621679155797"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamInteger"><span class="hs-identifier hs-var">ParamInteger</span></a><span> </span><a name="local-6989586621679155798"><a href="#local-6989586621679155798"><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-199"></a><span> </span><a href="#local-6989586621679155797"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"integer"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155798"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-200"></a><span>
|
||||
</span><a name="line-201"></a><span class="hs-comment">-- | /Optional Param/ "int32" - None</span><span>
|
||||
</span><a name="line-202"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#Int32"><span class="hs-identifier hs-type">Int32</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-203"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155795"><a href="#local-6989586621679155795"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Int32"><span class="hs-identifier hs-var">Int32</span></a><span> </span><a name="local-6989586621679155796"><a href="#local-6989586621679155796"><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-204"></a><span> </span><a href="#local-6989586621679155795"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"int32"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155796"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-194"></a><span class="hs-comment">-- | /Body Param/ "Client" - client model</span><span>
|
||||
</span><a name="line-195"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span>
|
||||
</span><a name="line-196"></a><span>
|
||||
</span><a name="line-197"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-198"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-199"></a><span>
|
||||
</span><a name="line-200"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-201"></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.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-202"></a><span>
|
||||
</span><a name="line-203"></a><span>
|
||||
</span><a name="line-204"></a><span class="hs-comment">-- *** testEndpointParameters</span><span>
|
||||
</span><a name="line-205"></a><span>
|
||||
</span><a name="line-206"></a><span class="hs-comment">-- | /Optional Param/ "int64" - None</span><span>
|
||||
</span><a name="line-207"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#Int64"><span class="hs-identifier hs-type">Int64</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-208"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155793"><a href="#local-6989586621679155793"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Int64"><span class="hs-identifier hs-var">Int64</span></a><span> </span><a name="local-6989586621679155794"><a href="#local-6989586621679155794"><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-209"></a><span> </span><a href="#local-6989586621679155793"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"int64"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155794"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-210"></a><span>
|
||||
</span><a name="line-211"></a><span class="hs-comment">-- | /Optional Param/ "float" - None</span><span>
|
||||
</span><a name="line-212"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamFloat"><span class="hs-identifier hs-type">ParamFloat</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-213"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155791"><a href="#local-6989586621679155791"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamFloat"><span class="hs-identifier hs-var">ParamFloat</span></a><span> </span><a name="local-6989586621679155792"><a href="#local-6989586621679155792"><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-214"></a><span> </span><a href="#local-6989586621679155791"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"float"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155792"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-215"></a><span>
|
||||
</span><a name="line-216"></a><span class="hs-comment">-- | /Optional Param/ "string" - None</span><span>
|
||||
</span><a name="line-217"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamString"><span class="hs-identifier hs-type">ParamString</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-218"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155789"><a href="#local-6989586621679155789"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamString"><span class="hs-identifier hs-var">ParamString</span></a><span> </span><a name="local-6989586621679155790"><a href="#local-6989586621679155790"><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-219"></a><span> </span><a href="#local-6989586621679155789"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"string"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155790"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-220"></a><span>
|
||||
</span><a name="line-221"></a><span class="hs-comment">-- | /Optional Param/ "binary" - None</span><span>
|
||||
</span><a name="line-222"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamBinary"><span class="hs-identifier hs-type">ParamBinary</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-223"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155787"><a href="#local-6989586621679155787"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamBinary"><span class="hs-identifier hs-var">ParamBinary</span></a><span> </span><a name="local-6989586621679155788"><a href="#local-6989586621679155788"><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-224"></a><span> </span><a href="#local-6989586621679155787"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"binary"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155788"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-225"></a><span>
|
||||
</span><a name="line-226"></a><span class="hs-comment">-- | /Optional Param/ "date" - None</span><span>
|
||||
</span><a name="line-227"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamDate"><span class="hs-identifier hs-type">ParamDate</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-228"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155785"><a href="#local-6989586621679155785"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamDate"><span class="hs-identifier hs-var">ParamDate</span></a><span> </span><a name="local-6989586621679155786"><a href="#local-6989586621679155786"><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-229"></a><span> </span><a href="#local-6989586621679155785"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"date"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155786"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-206"></a><span class="hs-comment">-- | @POST \/fake@</span><span>
|
||||
</span><a name="line-207"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-208"></a><span class="hs-comment">-- Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 </span><span>
|
||||
</span><a name="line-209"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-210"></a><span class="hs-comment">-- Fake endpoint for testing various parameters 假端點 偽のエンドポイント 가짜 엔드 포인트 </span><span>
|
||||
</span><a name="line-211"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-212"></a><span class="hs-comment">-- AuthMethod: 'AuthBasicHttpBasicTest'</span><span>
|
||||
</span><a name="line-213"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-214"></a><span class="hs-identifier">testEndpointParameters</span><span> </span><span>
|
||||
</span><a name="line-215"></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.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-216"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#Number"><span class="hs-identifier hs-type">Number</span></a><span> </span><span class="hs-comment">-- ^ "number" - None</span><span>
|
||||
</span><a name="line-217"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#ParamDouble"><span class="hs-identifier hs-type">ParamDouble</span></a><span> </span><span class="hs-comment">-- ^ "double" - None</span><span>
|
||||
</span><a name="line-218"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#PatternWithoutDelimiter"><span class="hs-identifier hs-type">PatternWithoutDelimiter</span></a><span> </span><span class="hs-comment">-- ^ "patternWithoutDelimiter" - None</span><span>
|
||||
</span><a name="line-219"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Byte"><span class="hs-identifier hs-type">Byte</span></a><span> </span><span class="hs-comment">-- ^ "byte" - None</span><span>
|
||||
</span><a name="line-220"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-221"></a><a name="testEndpointParameters"><a href="SwaggerPetstore.API.Fake.html#testEndpointParameters"><span class="hs-identifier">testEndpointParameters</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Number"><span class="hs-identifier hs-var">Number</span></a><span> </span><a name="local-6989586621679156164"><a href="#local-6989586621679156164"><span class="hs-identifier">number</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamDouble"><span class="hs-identifier hs-var">ParamDouble</span></a><span> </span><a name="local-6989586621679156165"><a href="#local-6989586621679156165"><span class="hs-identifier">double</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PatternWithoutDelimiter"><span class="hs-identifier hs-var">PatternWithoutDelimiter</span></a><span> </span><a name="local-6989586621679156166"><a href="#local-6989586621679156166"><span class="hs-identifier">patternWithoutDelimiter</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Byte"><span class="hs-identifier hs-var">Byte</span></a><span> </span><a name="local-6989586621679156167"><a href="#local-6989586621679156167"><span class="hs-identifier">byte</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-222"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-223"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthBasicHttpBasicTest"><span class="hs-identifier hs-type">AuthBasicHttpBasicTest</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-224"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"number"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156164"><span class="hs-identifier hs-var">number</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-225"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"double"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156165"><span class="hs-identifier hs-var">double</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-226"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"pattern_without_delimiter"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156166"><span class="hs-identifier hs-var">patternWithoutDelimiter</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-227"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"byte"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156167"><span class="hs-identifier hs-var">byte</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-228"></a><span>
|
||||
</span><a name="line-229"></a><span class="hs-keyword">data</span><span> </span><a name="TestEndpointParameters"><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier">TestEndpointParameters</span></a></a><span> </span><span>
|
||||
</span><a name="line-230"></a><span>
|
||||
</span><a name="line-231"></a><span class="hs-comment">-- | /Optional Param/ "dateTime" - None</span><span>
|
||||
</span><a name="line-232"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamDateTime"><span class="hs-identifier hs-type">ParamDateTime</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-233"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155783"><a href="#local-6989586621679155783"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamDateTime"><span class="hs-identifier hs-var">ParamDateTime</span></a><span> </span><a name="local-6989586621679155784"><a href="#local-6989586621679155784"><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-234"></a><span> </span><a href="#local-6989586621679155783"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"dateTime"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155784"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-231"></a><span class="hs-comment">-- | /Optional Param/ "integer" - None</span><span>
|
||||
</span><a name="line-232"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamInteger"><span class="hs-identifier hs-type">ParamInteger</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-233"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156147"><a href="#local-6989586621679156147"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamInteger"><span class="hs-identifier hs-var">ParamInteger</span></a><span> </span><a name="local-6989586621679156148"><a href="#local-6989586621679156148"><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-234"></a><span> </span><a href="#local-6989586621679156147"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"integer"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156148"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-235"></a><span>
|
||||
</span><a name="line-236"></a><span class="hs-comment">-- | /Optional Param/ "password" - None</span><span>
|
||||
</span><a name="line-237"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-238"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155781"><a href="#local-6989586621679155781"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679155782"><a href="#local-6989586621679155782"><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-239"></a><span> </span><a href="#local-6989586621679155781"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"password"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155782"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-236"></a><span class="hs-comment">-- | /Optional Param/ "int32" - None</span><span>
|
||||
</span><a name="line-237"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#Int32"><span class="hs-identifier hs-type">Int32</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-238"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156145"><a href="#local-6989586621679156145"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Int32"><span class="hs-identifier hs-var">Int32</span></a><span> </span><a name="local-6989586621679156146"><a href="#local-6989586621679156146"><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-239"></a><span> </span><a href="#local-6989586621679156145"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"int32"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156146"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-240"></a><span>
|
||||
</span><a name="line-241"></a><span class="hs-comment">-- | /Optional Param/ "callback" - None</span><span>
|
||||
</span><a name="line-242"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#Callback"><span class="hs-identifier hs-type">Callback</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-243"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155779"><a href="#local-6989586621679155779"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Callback"><span class="hs-identifier hs-var">Callback</span></a><span> </span><a name="local-6989586621679155780"><a href="#local-6989586621679155780"><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-244"></a><span> </span><a href="#local-6989586621679155779"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"callback"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155780"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-241"></a><span class="hs-comment">-- | /Optional Param/ "int64" - None</span><span>
|
||||
</span><a name="line-242"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#Int64"><span class="hs-identifier hs-type">Int64</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-243"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156143"><a href="#local-6989586621679156143"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Int64"><span class="hs-identifier hs-var">Int64</span></a><span> </span><a name="local-6989586621679156144"><a href="#local-6989586621679156144"><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-244"></a><span> </span><a href="#local-6989586621679156143"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"int64"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156144"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-245"></a><span>
|
||||
</span><a name="line-246"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-247"></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.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a><span>
|
||||
</span><a name="line-248"></a><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
|
||||
</span><a name="line-249"></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.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier hs-type">MimeJsonCharsetutf8</span></a><span>
|
||||
</span><a name="line-246"></a><span class="hs-comment">-- | /Optional Param/ "float" - None</span><span>
|
||||
</span><a name="line-247"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamFloat"><span class="hs-identifier hs-type">ParamFloat</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-248"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156141"><a href="#local-6989586621679156141"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamFloat"><span class="hs-identifier hs-var">ParamFloat</span></a><span> </span><a name="local-6989586621679156142"><a href="#local-6989586621679156142"><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-249"></a><span> </span><a href="#local-6989586621679156141"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"float"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156142"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-250"></a><span>
|
||||
</span><a name="line-251"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-252"></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.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a><span>
|
||||
</span><a name="line-253"></a><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
|
||||
</span><a name="line-254"></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.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier hs-type">MimeJsonCharsetutf8</span></a><span>
|
||||
</span><a name="line-251"></a><span class="hs-comment">-- | /Optional Param/ "string" - None</span><span>
|
||||
</span><a name="line-252"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamString"><span class="hs-identifier hs-type">ParamString</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-253"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156139"><a href="#local-6989586621679156139"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamString"><span class="hs-identifier hs-var">ParamString</span></a><span> </span><a name="local-6989586621679156140"><a href="#local-6989586621679156140"><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-254"></a><span> </span><a href="#local-6989586621679156139"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"string"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156140"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-255"></a><span>
|
||||
</span><a name="line-256"></a><span>
|
||||
</span><a name="line-257"></a><span class="hs-comment">-- *** testEnumParameters</span><span>
|
||||
</span><a name="line-258"></a><span>
|
||||
</span><a name="line-259"></a><span class="hs-comment">-- | @GET \/fake@</span><span>
|
||||
</span><a name="line-260"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-261"></a><span class="hs-comment">-- To test enum parameters</span><span>
|
||||
</span><a name="line-262"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-263"></a><span class="hs-comment">-- To test enum parameters</span><span>
|
||||
</span><a name="line-264"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-265"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-266"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-267"></a><span class="hs-identifier">testEnumParameters</span><span> </span><span>
|
||||
</span><a name="line-268"></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.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="#local-6989586621679155799"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-269"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679155799"><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-270"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155800"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-271"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="#local-6989586621679155799"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679155801"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679155800"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-272"></a><a name="testEnumParameters"><a href="SwaggerPetstore.API.Fake.html#testEnumParameters"><span class="hs-identifier">testEnumParameters</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-273"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-274"></a><span>
|
||||
</span><a name="line-275"></a><span class="hs-keyword">data</span><span> </span><a name="TestEnumParameters"><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier">TestEnumParameters</span></a></a><span> </span><span>
|
||||
</span><a name="line-276"></a><span>
|
||||
</span><a name="line-277"></a><span class="hs-comment">-- | /Optional Param/ "enum_form_string_array" - Form parameter enum test (string array)</span><span>
|
||||
</span><a name="line-278"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumFormStringArray"><span class="hs-identifier hs-type">EnumFormStringArray</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-279"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155777"><a href="#local-6989586621679155777"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumFormStringArray"><span class="hs-identifier hs-var">EnumFormStringArray</span></a><span> </span><a name="local-6989586621679155778"><a href="#local-6989586621679155778"><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-280"></a><span> </span><a href="#local-6989586621679155777"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toFormColl"><span class="hs-identifier hs-var">toFormColl</span></a><span> </span><a href="SwaggerPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_form_string_array"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155778"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-281"></a><span>
|
||||
</span><a name="line-282"></a><span class="hs-comment">-- | /Optional Param/ "enum_form_string" - Form parameter enum test (string)</span><span>
|
||||
</span><a name="line-283"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumFormString"><span class="hs-identifier hs-type">EnumFormString</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-284"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155775"><a href="#local-6989586621679155775"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumFormString"><span class="hs-identifier hs-var">EnumFormString</span></a><span> </span><a name="local-6989586621679155776"><a href="#local-6989586621679155776"><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-285"></a><span> </span><a href="#local-6989586621679155775"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_form_string"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155776"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-256"></a><span class="hs-comment">-- | /Optional Param/ "binary" - None</span><span>
|
||||
</span><a name="line-257"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamBinary"><span class="hs-identifier hs-type">ParamBinary</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-258"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156137"><a href="#local-6989586621679156137"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamBinary"><span class="hs-identifier hs-var">ParamBinary</span></a><span> </span><a name="local-6989586621679156138"><a href="#local-6989586621679156138"><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-259"></a><span> </span><a href="#local-6989586621679156137"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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">"binary"</span><span> </span><a href="#local-6989586621679156138"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-260"></a><span>
|
||||
</span><a name="line-261"></a><span class="hs-comment">-- | /Optional Param/ "date" - None</span><span>
|
||||
</span><a name="line-262"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamDate"><span class="hs-identifier hs-type">ParamDate</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-263"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156135"><a href="#local-6989586621679156135"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamDate"><span class="hs-identifier hs-var">ParamDate</span></a><span> </span><a name="local-6989586621679156136"><a href="#local-6989586621679156136"><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-264"></a><span> </span><a href="#local-6989586621679156135"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"date"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156136"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-265"></a><span>
|
||||
</span><a name="line-266"></a><span class="hs-comment">-- | /Optional Param/ "dateTime" - None</span><span>
|
||||
</span><a name="line-267"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#ParamDateTime"><span class="hs-identifier hs-type">ParamDateTime</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-268"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156133"><a href="#local-6989586621679156133"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ParamDateTime"><span class="hs-identifier hs-var">ParamDateTime</span></a><span> </span><a name="local-6989586621679156134"><a href="#local-6989586621679156134"><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-269"></a><span> </span><a href="#local-6989586621679156133"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"dateTime"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156134"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-270"></a><span>
|
||||
</span><a name="line-271"></a><span class="hs-comment">-- | /Optional Param/ "password" - None</span><span>
|
||||
</span><a name="line-272"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-273"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156131"><a href="#local-6989586621679156131"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679156132"><a href="#local-6989586621679156132"><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-274"></a><span> </span><a href="#local-6989586621679156131"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"password"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156132"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-275"></a><span>
|
||||
</span><a name="line-276"></a><span class="hs-comment">-- | /Optional Param/ "callback" - None</span><span>
|
||||
</span><a name="line-277"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#Callback"><span class="hs-identifier hs-type">Callback</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-278"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156129"><a href="#local-6989586621679156129"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Callback"><span class="hs-identifier hs-var">Callback</span></a><span> </span><a name="local-6989586621679156130"><a href="#local-6989586621679156130"><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-279"></a><span> </span><a href="#local-6989586621679156129"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"callback"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156130"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-280"></a><span>
|
||||
</span><a name="line-281"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-282"></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.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span>
|
||||
</span><a name="line-283"></a><span>
|
||||
</span><a name="line-284"></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.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-285"></a><span>
|
||||
</span><a name="line-286"></a><span>
|
||||
</span><a name="line-287"></a><span class="hs-comment">-- | /Optional Param/ "enum_header_string_array" - Header parameter enum test (string array)</span><span>
|
||||
</span><a name="line-288"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumHeaderStringArray"><span class="hs-identifier hs-type">EnumHeaderStringArray</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-289"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155773"><a href="#local-6989586621679155773"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumHeaderStringArray"><span class="hs-identifier hs-var">EnumHeaderStringArray</span></a><span> </span><a name="local-6989586621679155774"><a href="#local-6989586621679155774"><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-290"></a><span> </span><a href="#local-6989586621679155773"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toHeaderColl"><span class="hs-identifier hs-var">toHeaderColl</span></a><span> </span><a href="SwaggerPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_header_string_array"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155774"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-291"></a><span>
|
||||
</span><a name="line-292"></a><span class="hs-comment">-- | /Optional Param/ "enum_header_string" - Header parameter enum test (string)</span><span>
|
||||
</span><a name="line-293"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumHeaderString"><span class="hs-identifier hs-type">EnumHeaderString</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-294"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155771"><a href="#local-6989586621679155771"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumHeaderString"><span class="hs-identifier hs-var">EnumHeaderString</span></a><span> </span><a name="local-6989586621679155772"><a href="#local-6989586621679155772"><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-295"></a><span> </span><a href="#local-6989586621679155771"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_header_string"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155772"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-296"></a><span>
|
||||
</span><a name="line-297"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_string_array" - Query parameter enum test (string array)</span><span>
|
||||
</span><a name="line-298"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumQueryStringArray"><span class="hs-identifier hs-type">EnumQueryStringArray</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-299"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155769"><a href="#local-6989586621679155769"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumQueryStringArray"><span class="hs-identifier hs-var">EnumQueryStringArray</span></a><span> </span><a name="local-6989586621679155770"><a href="#local-6989586621679155770"><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-300"></a><span> </span><a href="#local-6989586621679155769"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_string_array"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679155770"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-301"></a><span>
|
||||
</span><a name="line-302"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_string" - Query parameter enum test (string)</span><span>
|
||||
</span><a name="line-303"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumQueryString"><span class="hs-identifier hs-type">EnumQueryString</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-304"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155767"><a href="#local-6989586621679155767"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumQueryString"><span class="hs-identifier hs-var">EnumQueryString</span></a><span> </span><a name="local-6989586621679155768"><a href="#local-6989586621679155768"><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-305"></a><span> </span><a href="#local-6989586621679155767"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_string"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679155768"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-306"></a><span>
|
||||
</span><a name="line-307"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_integer" - Query parameter enum test (double)</span><span>
|
||||
</span><a name="line-308"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumQueryInteger"><span class="hs-identifier hs-type">EnumQueryInteger</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-309"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155765"><a href="#local-6989586621679155765"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumQueryInteger"><span class="hs-identifier hs-var">EnumQueryInteger</span></a><span> </span><a name="local-6989586621679155766"><a href="#local-6989586621679155766"><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-310"></a><span> </span><a href="#local-6989586621679155765"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_integer"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679155766"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-311"></a><span>
|
||||
</span><a name="line-312"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_double" - Query parameter enum test (double)</span><span>
|
||||
</span><a name="line-313"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumQueryDouble"><span class="hs-identifier hs-type">EnumQueryDouble</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-314"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155763"><a href="#local-6989586621679155763"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumQueryDouble"><span class="hs-identifier hs-var">EnumQueryDouble</span></a><span> </span><a name="local-6989586621679155764"><a href="#local-6989586621679155764"><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-315"></a><span> </span><a href="#local-6989586621679155763"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_double"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155764"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-316"></a><span>
|
||||
</span><a name="line-317"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-318"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679155762"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="#local-6989586621679155762"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-319"></a><span>
|
||||
</span><a name="line-320"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-321"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679155761"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="#local-6989586621679155761"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-287"></a><span class="hs-comment">-- *** testEnumParameters</span><span>
|
||||
</span><a name="line-288"></a><span>
|
||||
</span><a name="line-289"></a><span class="hs-comment">-- | @GET \/fake@</span><span>
|
||||
</span><a name="line-290"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-291"></a><span class="hs-comment">-- To test enum parameters</span><span>
|
||||
</span><a name="line-292"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-293"></a><span class="hs-comment">-- To test enum parameters</span><span>
|
||||
</span><a name="line-294"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-295"></a><span class="hs-identifier">testEnumParameters</span><span> </span><span>
|
||||
</span><a name="line-296"></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.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-297"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-298"></a><a name="testEnumParameters"><a href="SwaggerPetstore.API.Fake.html#testEnumParameters"><span class="hs-identifier">testEnumParameters</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-299"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-300"></a><span>
|
||||
</span><a name="line-301"></a><span class="hs-keyword">data</span><span> </span><a name="TestEnumParameters"><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier">TestEnumParameters</span></a></a><span> </span><span>
|
||||
</span><a name="line-302"></a><span>
|
||||
</span><a name="line-303"></a><span class="hs-comment">-- | /Optional Param/ "enum_form_string_array" - Form parameter enum test (string array)</span><span>
|
||||
</span><a name="line-304"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumFormStringArray"><span class="hs-identifier hs-type">EnumFormStringArray</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-305"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156127"><a href="#local-6989586621679156127"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumFormStringArray"><span class="hs-identifier hs-var">EnumFormStringArray</span></a><span> </span><a name="local-6989586621679156128"><a href="#local-6989586621679156128"><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-306"></a><span> </span><a href="#local-6989586621679156127"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toFormColl"><span class="hs-identifier hs-var">toFormColl</span></a><span> </span><a href="SwaggerPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_form_string_array"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156128"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-307"></a><span>
|
||||
</span><a name="line-308"></a><span class="hs-comment">-- | /Optional Param/ "enum_form_string" - Form parameter enum test (string)</span><span>
|
||||
</span><a name="line-309"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumFormString"><span class="hs-identifier hs-type">EnumFormString</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-310"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156125"><a href="#local-6989586621679156125"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumFormString"><span class="hs-identifier hs-var">EnumFormString</span></a><span> </span><a name="local-6989586621679156126"><a href="#local-6989586621679156126"><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 href="#local-6989586621679156125"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_form_string"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156126"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-312"></a><span>
|
||||
</span><a name="line-313"></a><span class="hs-comment">-- | /Optional Param/ "enum_header_string_array" - Header parameter enum test (string array)</span><span>
|
||||
</span><a name="line-314"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumHeaderStringArray"><span class="hs-identifier hs-type">EnumHeaderStringArray</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-315"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156123"><a href="#local-6989586621679156123"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumHeaderStringArray"><span class="hs-identifier hs-var">EnumHeaderStringArray</span></a><span> </span><a name="local-6989586621679156124"><a href="#local-6989586621679156124"><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 href="#local-6989586621679156123"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toHeaderColl"><span class="hs-identifier hs-var">toHeaderColl</span></a><span> </span><a href="SwaggerPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_header_string_array"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156124"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-317"></a><span>
|
||||
</span><a name="line-318"></a><span class="hs-comment">-- | /Optional Param/ "enum_header_string" - Header parameter enum test (string)</span><span>
|
||||
</span><a name="line-319"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumHeaderString"><span class="hs-identifier hs-type">EnumHeaderString</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-320"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156121"><a href="#local-6989586621679156121"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumHeaderString"><span class="hs-identifier hs-var">EnumHeaderString</span></a><span> </span><a name="local-6989586621679156122"><a href="#local-6989586621679156122"><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-321"></a><span> </span><a href="#local-6989586621679156121"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_header_string"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156122"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-322"></a><span>
|
||||
</span><a name="line-323"></a><span>
|
||||
</span><a name="line-324"></a><span class="hs-comment">-- *** testInlineAdditionalProperties</span><span>
|
||||
</span><a name="line-325"></a><span>
|
||||
</span><a name="line-326"></a><span class="hs-comment">-- | @POST \/fake\/inline-additionalProperties@</span><span>
|
||||
</span><a name="line-327"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-328"></a><span class="hs-comment">-- test inline additionalProperties</span><span>
|
||||
</span><a name="line-329"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-330"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-331"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-332"></a><span class="hs-identifier">testInlineAdditionalProperties</span><span> </span><span>
|
||||
</span><a name="line-333"></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.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Value</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-334"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Value</span><span> </span><span class="hs-comment">-- ^ "param" - request body</span><span>
|
||||
</span><a name="line-335"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-336"></a><a name="testInlineAdditionalProperties"><a href="SwaggerPetstore.API.Fake.html#testInlineAdditionalProperties"><span class="hs-identifier">testInlineAdditionalProperties</span></a></a><span> </span><a name="local-6989586621679155818"><a href="#local-6989586621679155818"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-337"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/inline-additionalProperties"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-338"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679155818"><span class="hs-identifier hs-var">param</span></a><span>
|
||||
</span><a name="line-339"></a><span>
|
||||
</span><a name="line-340"></a><span class="hs-keyword">data</span><span> </span><a name="TestInlineAdditionalProperties"><a href="SwaggerPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier">TestInlineAdditionalProperties</span></a></a><span> </span><span>
|
||||
</span><a name="line-341"></a><span>
|
||||
</span><a name="line-342"></a><span class="hs-comment">-- | /Body Param/ "param" - request body</span><span>
|
||||
</span><a name="line-343"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Value</span><span> </span><span>
|
||||
</span><a name="line-344"></a><span>
|
||||
</span><a name="line-345"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-346"></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.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-323"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_string_array" - Query parameter enum test (string array)</span><span>
|
||||
</span><a name="line-324"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumQueryStringArray"><span class="hs-identifier hs-type">EnumQueryStringArray</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-325"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156119"><a href="#local-6989586621679156119"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumQueryStringArray"><span class="hs-identifier hs-var">EnumQueryStringArray</span></a><span> </span><a name="local-6989586621679156120"><a href="#local-6989586621679156120"><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-326"></a><span> </span><a href="#local-6989586621679156119"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_string_array"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679156120"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-327"></a><span>
|
||||
</span><a name="line-328"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_string" - Query parameter enum test (string)</span><span>
|
||||
</span><a name="line-329"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumQueryString"><span class="hs-identifier hs-type">EnumQueryString</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-330"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156117"><a href="#local-6989586621679156117"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumQueryString"><span class="hs-identifier hs-var">EnumQueryString</span></a><span> </span><a name="local-6989586621679156118"><a href="#local-6989586621679156118"><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-331"></a><span> </span><a href="#local-6989586621679156117"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_string"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679156118"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-332"></a><span>
|
||||
</span><a name="line-333"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_integer" - Query parameter enum test (double)</span><span>
|
||||
</span><a name="line-334"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumQueryInteger"><span class="hs-identifier hs-type">EnumQueryInteger</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-335"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156115"><a href="#local-6989586621679156115"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumQueryInteger"><span class="hs-identifier hs-var">EnumQueryInteger</span></a><span> </span><a name="local-6989586621679156116"><a href="#local-6989586621679156116"><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-336"></a><span> </span><a href="#local-6989586621679156115"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_integer"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679156116"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-337"></a><span>
|
||||
</span><a name="line-338"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_double" - Query parameter enum test (double)</span><span>
|
||||
</span><a name="line-339"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.Model.html#EnumQueryDouble"><span class="hs-identifier hs-type">EnumQueryDouble</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-340"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679156113"><a href="#local-6989586621679156113"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#EnumQueryDouble"><span class="hs-identifier hs-var">EnumQueryDouble</span></a><span> </span><a name="local-6989586621679156114"><a href="#local-6989586621679156114"><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-341"></a><span> </span><a href="#local-6989586621679156113"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_double"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679156114"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-342"></a><span>
|
||||
</span><a name="line-343"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-344"></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.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span>
|
||||
</span><a name="line-345"></a><span>
|
||||
</span><a name="line-346"></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.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-347"></a><span>
|
||||
</span><a name="line-348"></a><span>
|
||||
</span><a name="line-349"></a><span class="hs-comment">-- *** testJsonFormData</span><span>
|
||||
</span><a name="line-349"></a><span class="hs-comment">-- *** testInlineAdditionalProperties</span><span>
|
||||
</span><a name="line-350"></a><span>
|
||||
</span><a name="line-351"></a><span class="hs-comment">-- | @GET \/fake\/jsonFormData@</span><span>
|
||||
</span><a name="line-351"></a><span class="hs-comment">-- | @POST \/fake\/inline-additionalProperties@</span><span>
|
||||
</span><a name="line-352"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-353"></a><span class="hs-comment">-- test json serialization of form data</span><span>
|
||||
</span><a name="line-353"></a><span class="hs-comment">-- test inline additionalProperties</span><span>
|
||||
</span><a name="line-354"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-355"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-356"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-357"></a><span class="hs-identifier">testJsonFormData</span><span> </span><span>
|
||||
</span><a name="line-358"></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.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-359"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#Param"><span class="hs-identifier hs-type">Param</span></a><span> </span><span class="hs-comment">-- ^ "param" - field1</span><span>
|
||||
</span><a name="line-360"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Param2"><span class="hs-identifier hs-type">Param2</span></a><span> </span><span class="hs-comment">-- ^ "param2" - field2</span><span>
|
||||
</span><a name="line-361"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-362"></a><a name="testJsonFormData"><a href="SwaggerPetstore.API.Fake.html#testJsonFormData"><span class="hs-identifier">testJsonFormData</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Param"><span class="hs-identifier hs-var">Param</span></a><span> </span><a name="local-6989586621679155819"><a href="#local-6989586621679155819"><span class="hs-identifier">param</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Param2"><span class="hs-identifier hs-var">Param2</span></a><span> </span><a name="local-6989586621679155820"><a href="#local-6989586621679155820"><span class="hs-identifier">param2</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-363"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/jsonFormData"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-364"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"param"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155819"><span class="hs-identifier hs-var">param</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-365"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"param2"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679155820"><span class="hs-identifier hs-var">param2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-366"></a><span>
|
||||
</span><a name="line-367"></a><span class="hs-keyword">data</span><span> </span><a name="TestJsonFormData"><a href="SwaggerPetstore.API.Fake.html#TestJsonFormData"><span class="hs-identifier">TestJsonFormData</span></a></a><span> </span><span>
|
||||
</span><a name="line-368"></a><span>
|
||||
</span><a name="line-369"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-370"></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.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-371"></a><span>
|
||||
</span><a name="line-372"></a></pre></body></html>
|
||||
</span><a name="line-355"></a><span class="hs-identifier">testInlineAdditionalProperties</span><span> </span><span>
|
||||
</span><a name="line-356"></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.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#RequestBody"><span class="hs-identifier hs-type">RequestBody</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-357"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#RequestBody"><span class="hs-identifier hs-type">RequestBody</span></a><span> </span><span class="hs-comment">-- ^ "requestBody" - request body</span><span>
|
||||
</span><a name="line-358"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-359"></a><a name="testInlineAdditionalProperties"><a href="SwaggerPetstore.API.Fake.html#testInlineAdditionalProperties"><span class="hs-identifier">testInlineAdditionalProperties</span></a></a><span> </span><a name="local-6989586621679156168"><a href="#local-6989586621679156168"><span class="hs-identifier">requestBody</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-360"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/inline-additionalProperties"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-361"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679156168"><span class="hs-identifier hs-var">requestBody</span></a><span>
|
||||
</span><a name="line-362"></a><span>
|
||||
</span><a name="line-363"></a><span class="hs-keyword">data</span><span> </span><a name="TestInlineAdditionalProperties"><a href="SwaggerPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier">TestInlineAdditionalProperties</span></a></a><span> </span><span>
|
||||
</span><a name="line-364"></a><span>
|
||||
</span><a name="line-365"></a><span class="hs-comment">-- | /Body Param/ "request_body" - request body</span><span>
|
||||
</span><a name="line-366"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="SwaggerPetstore.Model.html#RequestBody"><span class="hs-identifier hs-type">RequestBody</span></a><span> </span><span>
|
||||
</span><a name="line-367"></a><span>
|
||||
</span><a name="line-368"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-369"></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.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-370"></a><span>
|
||||
</span><a name="line-371"></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.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-372"></a><span>
|
||||
</span><a name="line-373"></a><span>
|
||||
</span><a name="line-374"></a><span class="hs-comment">-- *** testJsonFormData</span><span>
|
||||
</span><a name="line-375"></a><span>
|
||||
</span><a name="line-376"></a><span class="hs-comment">-- | @GET \/fake\/jsonFormData@</span><span>
|
||||
</span><a name="line-377"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-378"></a><span class="hs-comment">-- test json serialization of form data</span><span>
|
||||
</span><a name="line-379"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-380"></a><span class="hs-identifier">testJsonFormData</span><span> </span><span>
|
||||
</span><a name="line-381"></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.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-382"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#Param"><span class="hs-identifier hs-type">Param</span></a><span> </span><span class="hs-comment">-- ^ "param" - field1</span><span>
|
||||
</span><a name="line-383"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Param2"><span class="hs-identifier hs-type">Param2</span></a><span> </span><span class="hs-comment">-- ^ "param2" - field2</span><span>
|
||||
</span><a name="line-384"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-385"></a><a name="testJsonFormData"><a href="SwaggerPetstore.API.Fake.html#testJsonFormData"><span class="hs-identifier">testJsonFormData</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Param"><span class="hs-identifier hs-var">Param</span></a><span> </span><a name="local-6989586621679156169"><a href="#local-6989586621679156169"><span class="hs-identifier">param</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Param2"><span class="hs-identifier hs-var">Param2</span></a><span> </span><a name="local-6989586621679156170"><a href="#local-6989586621679156170"><span class="hs-identifier">param2</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-386"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/jsonFormData"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-387"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"param"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156169"><span class="hs-identifier hs-var">param</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-388"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier hs-var">toForm</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"param2"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679156170"><span class="hs-identifier hs-var">param2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-389"></a><span>
|
||||
</span><a name="line-390"></a><span class="hs-keyword">data</span><span> </span><a name="TestJsonFormData"><a href="SwaggerPetstore.API.Fake.html#TestJsonFormData"><span class="hs-identifier">TestJsonFormData</span></a></a><span> </span><span>
|
||||
</span><a name="line-391"></a><span>
|
||||
</span><a name="line-392"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-393"></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.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span>
|
||||
</span><a name="line-394"></a><span>
|
||||
</span><a name="line-395"></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.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-396"></a><span>
|
||||
</span><a name="line-397"></a></pre></body></html>
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -64,26 +64,28 @@ Module : SwaggerPetstore.API.FakeClassnameTags123
|
||||
</span><a name="line-64"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- To test class name in snake case</span><span>
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKeyQuery'</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- To test class name in snake case</span><span>
|
||||
</span><a name="line-68"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-69"></a><span class="hs-identifier">testClassname</span><span> </span><span>
|
||||
</span><a name="line-70"></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.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-73"></a><a name="testClassname"><a href="SwaggerPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier">testClassname</span></a></a><span> </span><a name="local-6989586621679155628"><a href="#local-6989586621679155628"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-74"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake_classname_test"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthApiKeyApiKeyQuery"><span class="hs-identifier hs-type">AuthApiKeyApiKeyQuery</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679155628"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-77"></a><span>
|
||||
</span><a name="line-78"></a><span class="hs-keyword">data</span><span> </span><a name="TestClassname"><a href="SwaggerPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier">TestClassname</span></a></a><span> </span><span>
|
||||
</span><a name="line-69"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKeyQuery'</span><span>
|
||||
</span><a name="line-70"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-71"></a><span class="hs-identifier">testClassname</span><span> </span><span>
|
||||
</span><a name="line-72"></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.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</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="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-73"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "client" - client model</span><span>
|
||||
</span><a name="line-74"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-75"></a><a name="testClassname"><a href="SwaggerPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier">testClassname</span></a></a><span> </span><a name="local-6989586621679155978"><a href="#local-6989586621679155978"><span class="hs-identifier">client</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-76"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake_classname_test"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-77"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthApiKeyApiKeyQuery"><span class="hs-identifier hs-type">AuthApiKeyApiKeyQuery</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-78"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679155978"><span class="hs-identifier hs-var">client</span></a><span>
|
||||
</span><a name="line-79"></a><span>
|
||||
</span><a name="line-80"></a><span class="hs-comment">-- | /Body Param/ "body" - client model</span><span>
|
||||
</span><a name="line-81"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span>
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-84"></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.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-85"></a><span>
|
||||
</span><a name="line-86"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-87"></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.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-88"></a><span>
|
||||
</span><a name="line-89"></a></pre></body></html>
|
||||
</span><a name="line-80"></a><span class="hs-keyword">data</span><span> </span><a name="TestClassname"><a href="SwaggerPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier">TestClassname</span></a></a><span> </span><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- | /Body Param/ "Client" - client model</span><span>
|
||||
</span><a name="line-83"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span>
|
||||
</span><a name="line-84"></a><span>
|
||||
</span><a name="line-85"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-86"></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.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-87"></a><span>
|
||||
</span><a name="line-88"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-89"></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.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-90"></a><span>
|
||||
</span><a name="line-91"></a></pre></body></html>
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -64,263 +64,233 @@ Module : SwaggerPetstore.API.Pet
|
||||
</span><a name="line-64"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- Add a new pet to the store</span><span>
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-68"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-69"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-70"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-71"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-72"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-73"></a><span class="hs-identifier">addPet</span><span> </span><span>
|
||||
</span><a name="line-74"></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.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679154695"><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-6989586621679154695"><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-75"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679154695"><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-76"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154696"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-77"></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-78"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679154695"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679154697"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679154696"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-79"></a><a name="addPet"><a href="SwaggerPetstore.API.Pet.html#addPet"><span class="hs-identifier">addPet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679154698"><a href="#local-6989586621679154698"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-80"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-81"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-82"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679154698"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-69"></a><span class="hs-identifier">addPet</span><span> </span><span>
|
||||
</span><a name="line-70"></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.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679155126"><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-6989586621679155126"><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-71"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679155126"><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-72"></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">-- ^ "pet" - Pet object that needs to be added to the store</span><span>
|
||||
</span><a name="line-73"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679155126"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-74"></a><a name="addPet"><a href="SwaggerPetstore.API.Pet.html#addPet"><span class="hs-identifier">addPet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679155127"><a href="#local-6989586621679155127"><span class="hs-identifier">pet</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-75"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-77"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679155127"><span class="hs-identifier hs-var">pet</span></a><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span class="hs-keyword">data</span><span> </span><a name="AddPet"><a href="SwaggerPetstore.API.Pet.html#AddPet"><span class="hs-identifier">AddPet</span></a></a><span> </span><span>
|
||||
</span><a name="line-80"></a><span>
|
||||
</span><a name="line-81"></a><span class="hs-comment">-- | /Body Param/ "Pet" - Pet object that needs to be added to the store</span><span>
|
||||
</span><a name="line-82"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span>
|
||||
</span><a name="line-83"></a><span>
|
||||
</span><a name="line-84"></a><span class="hs-keyword">data</span><span> </span><a name="AddPet"><a href="SwaggerPetstore.API.Pet.html#AddPet"><span class="hs-identifier">AddPet</span></a></a><span> </span><span>
|
||||
</span><a name="line-85"></a><span>
|
||||
</span><a name="line-86"></a><span class="hs-comment">-- | /Body Param/ "body" - Pet object that needs to be added to the store</span><span>
|
||||
</span><a name="line-87"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-85"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-86"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-87"></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.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-88"></a><span>
|
||||
</span><a name="line-89"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-90"></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.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-92"></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.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-89"></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.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-90"></a><span>
|
||||
</span><a name="line-91"></a><span>
|
||||
</span><a name="line-92"></a><span class="hs-comment">-- *** deletePet</span><span>
|
||||
</span><a name="line-93"></a><span>
|
||||
</span><a name="line-94"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-95"></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.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-96"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-97"></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.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-98"></a><span>
|
||||
</span><a name="line-99"></a><span>
|
||||
</span><a name="line-100"></a><span class="hs-comment">-- *** deletePet</span><span>
|
||||
</span><a name="line-101"></a><span>
|
||||
</span><a name="line-102"></a><span class="hs-comment">-- | @DELETE \/pet\/{petId}@</span><span>
|
||||
</span><a name="line-103"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-104"></a><span class="hs-comment">-- Deletes a pet</span><span>
|
||||
</span><a name="line-105"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-106"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-107"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-109"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-110"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-111"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-112"></a><span class="hs-identifier">deletePet</span><span> </span><span>
|
||||
</span><a name="line-113"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154693"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-114"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a><span> </span><span class="hs-comment">-- ^ "petId" - Pet id to delete</span><span>
|
||||
</span><a name="line-115"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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-6989586621679154694"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679154693"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-116"></a><a name="deletePet"><a href="SwaggerPetstore.API.Pet.html#deletePet"><span class="hs-identifier">deletePet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679154699"><a href="#local-6989586621679154699"><span class="hs-identifier">petId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-117"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154699"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-118"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-119"></a><span>
|
||||
</span><a name="line-120"></a><span class="hs-keyword">data</span><span> </span><a name="DeletePet"><a href="SwaggerPetstore.API.Pet.html#DeletePet"><span class="hs-identifier">DeletePet</span></a></a><span> </span><span>
|
||||
</span><a name="line-121"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiKey"><span class="hs-identifier hs-type">ApiKey</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-122"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679154683"><a href="#local-6989586621679154683"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ApiKey"><span class="hs-identifier hs-var">ApiKey</span></a><span> </span><a name="local-6989586621679154684"><a href="#local-6989586621679154684"><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-123"></a><span> </span><a href="#local-6989586621679154683"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679154684"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-124"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-125"></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.Pet.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-126"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-127"></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.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-128"></a><span>
|
||||
</span><a name="line-129"></a><span>
|
||||
</span><a name="line-130"></a><span class="hs-comment">-- *** findPetsByStatus</span><span>
|
||||
</span><a name="line-131"></a><span>
|
||||
</span><a name="line-132"></a><span class="hs-comment">-- | @GET \/pet\/findByStatus@</span><span>
|
||||
</span><a name="line-133"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-134"></a><span class="hs-comment">-- Finds Pets by status</span><span>
|
||||
</span><a name="line-135"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-136"></a><span class="hs-comment">-- Multiple status values can be provided with comma separated strings</span><span>
|
||||
</span><a name="line-137"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-138"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-139"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-140"></a><span class="hs-identifier">findPetsByStatus</span><span> </span><span>
|
||||
</span><a name="line-141"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154692"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-142"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Status"><span class="hs-identifier hs-type">Status</span></a><span> </span><span class="hs-comment">-- ^ "status" - Status values that need to be considered for filter</span><span>
|
||||
</span><a name="line-143"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="#local-6989586621679154692"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-144"></a><a name="findPetsByStatus"><a href="SwaggerPetstore.API.Pet.html#findPetsByStatus"><span class="hs-identifier">findPetsByStatus</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Status"><span class="hs-identifier hs-var">Status</span></a><span> </span><a name="local-6989586621679154700"><a href="#local-6989586621679154700"><span class="hs-identifier">status</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-145"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/findByStatus"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-146"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-147"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.Core.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-6989586621679154700"><span class="hs-identifier hs-var">status</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-148"></a><span>
|
||||
</span><a name="line-149"></a><span class="hs-keyword">data</span><span> </span><a name="FindPetsByStatus"><a href="SwaggerPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier">FindPetsByStatus</span></a></a><span> </span><span>
|
||||
</span><a name="line-150"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-151"></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.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-152"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-153"></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.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-154"></a><span>
|
||||
</span><a name="line-155"></a><span>
|
||||
</span><a name="line-156"></a><span class="hs-comment">-- *** findPetsByTags</span><span>
|
||||
</span><a name="line-157"></a><span>
|
||||
</span><a name="line-158"></a><span class="hs-comment">-- | @GET \/pet\/findByTags@</span><span>
|
||||
</span><a name="line-159"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-160"></a><span class="hs-comment">-- Finds Pets by tags</span><span>
|
||||
</span><a name="line-161"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-162"></a><span class="hs-comment">-- Multiple tags can be provided with comma separated strings. Use tag1, tag2, tag3 for testing.</span><span>
|
||||
</span><a name="line-163"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-164"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-165"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-166"></a><span class="hs-identifier">findPetsByTags</span><span> </span><span>
|
||||
</span><a name="line-167"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154691"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-168"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Tags"><span class="hs-identifier hs-type">Tags</span></a><span> </span><span class="hs-comment">-- ^ "tags" - Tags to filter by</span><span>
|
||||
</span><a name="line-169"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="#local-6989586621679154691"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-170"></a><a name="findPetsByTags"><a href="SwaggerPetstore.API.Pet.html#findPetsByTags"><span class="hs-identifier">findPetsByTags</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Tags"><span class="hs-identifier hs-var">Tags</span></a><span> </span><a name="local-6989586621679154701"><a href="#local-6989586621679154701"><span class="hs-identifier">tags</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-171"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/findByTags"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-172"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-173"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.Core.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-6989586621679154701"><span class="hs-identifier hs-var">tags</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-174"></a><span>
|
||||
</span><a name="line-175"></a><span class="hs-pragma">{-# DEPRECATED findPetsByTags "" #-}</span><span>
|
||||
</span><a name="line-176"></a><span>
|
||||
</span><a name="line-177"></a><span class="hs-keyword">data</span><span> </span><a name="FindPetsByTags"><a href="SwaggerPetstore.API.Pet.html#FindPetsByTags"><span class="hs-identifier">FindPetsByTags</span></a></a><span> </span><span>
|
||||
</span><a name="line-178"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-179"></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.Pet.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-180"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-181"></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.Pet.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-182"></a><span>
|
||||
</span><a name="line-183"></a><span>
|
||||
</span><a name="line-184"></a><span class="hs-comment">-- *** getPetById</span><span>
|
||||
</span><a name="line-185"></a><span>
|
||||
</span><a name="line-186"></a><span class="hs-comment">-- | @GET \/pet\/{petId}@</span><span>
|
||||
</span><a name="line-187"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-188"></a><span class="hs-comment">-- Find pet by ID</span><span>
|
||||
</span><a name="line-189"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-190"></a><span class="hs-comment">-- Returns a single pet</span><span>
|
||||
</span><a name="line-191"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-192"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKey'</span><span>
|
||||
</span><a name="line-193"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-194"></a><span class="hs-identifier">getPetById</span><span> </span><span>
|
||||
</span><a name="line-195"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154690"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-196"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a><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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="#local-6989586621679154690"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-198"></a><a name="getPetById"><a href="SwaggerPetstore.API.Pet.html#getPetById"><span class="hs-identifier">getPetById</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679154702"><a href="#local-6989586621679154702"><span class="hs-identifier">petId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-199"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154702"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-200"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a><span class="hs-special">)</span><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.Pet.html#GetPetById"><span class="hs-identifier">GetPetById</span></a></a><span> </span><span>
|
||||
</span><a name="line-203"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-204"></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.Pet.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-205"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-206"></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.Pet.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-207"></a><span>
|
||||
</span><a name="line-208"></a><span>
|
||||
</span><a name="line-209"></a><span class="hs-comment">-- *** updatePet</span><span>
|
||||
</span><a name="line-210"></a><span>
|
||||
</span><a name="line-211"></a><span class="hs-comment">-- | @PUT \/pet@</span><span>
|
||||
</span><a name="line-212"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-213"></a><span class="hs-comment">-- Update an existing pet</span><span>
|
||||
</span><a name="line-214"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-215"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-216"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-217"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-218"></a><span class="hs-comment">-- </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-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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679154687"><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-6989586621679154687"><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="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679154687"><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.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154688"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-225"></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-226"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679154687"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679154689"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679154688"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-227"></a><a name="updatePet"><a href="SwaggerPetstore.API.Pet.html#updatePet"><span class="hs-identifier">updatePet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679154703"><a href="#local-6989586621679154703"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-228"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-229"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-230"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679154703"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-231"></a><span>
|
||||
</span><a name="line-232"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePet"><a href="SwaggerPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier">UpdatePet</span></a></a><span> </span><span>
|
||||
</span><a name="line-233"></a><span>
|
||||
</span><a name="line-234"></a><span class="hs-comment">-- | /Body Param/ "body" - Pet object that needs to be added to the store</span><span>
|
||||
</span><a name="line-235"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span>
|
||||
</span><a name="line-236"></a><span>
|
||||
</span><a name="line-237"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-238"></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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-239"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-240"></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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-241"></a><span>
|
||||
</span><a name="line-242"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-243"></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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-244"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-245"></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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-246"></a><span>
|
||||
</span><a name="line-247"></a><span>
|
||||
</span><a name="line-248"></a><span class="hs-comment">-- *** updatePetWithForm</span><span>
|
||||
</span><a name="line-249"></a><span>
|
||||
</span><a name="line-250"></a><span class="hs-comment">-- | @POST \/pet\/{petId}@</span><span>
|
||||
</span><a name="line-251"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-252"></a><span class="hs-comment">-- Updates a pet in the store with form data</span><span>
|
||||
</span><a name="line-253"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-254"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-255"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-256"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-257"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-258"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-259"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-260"></a><span class="hs-identifier">updatePetWithForm</span><span> </span><span>
|
||||
</span><a name="line-261"></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.Pet.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 class="hs-special">)</span><span>
|
||||
</span><a name="line-262"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154685"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-263"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet that needs to be updated</span><span>
|
||||
</span><a name="line-264"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="#local-6989586621679154686"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679154685"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-265"></a><a name="updatePetWithForm"><a href="SwaggerPetstore.API.Pet.html#updatePetWithForm"><span class="hs-identifier">updatePetWithForm</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679154704"><a href="#local-6989586621679154704"><span class="hs-identifier">petId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-266"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154704"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-267"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-268"></a><span>
|
||||
</span><a name="line-269"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePetWithForm"><a href="SwaggerPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier">UpdatePetWithForm</span></a></a><span> </span><span>
|
||||
</span><a name="line-270"></a><span>
|
||||
</span><a name="line-271"></a><span class="hs-comment">-- | /Optional Param/ "name" - Updated name of the pet</span><span>
|
||||
</span><a name="line-272"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.Model.html#Name2"><span class="hs-identifier hs-type">Name2</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-273"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679154681"><a href="#local-6989586621679154681"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Name2"><span class="hs-identifier hs-var">Name2</span></a><span> </span><a name="local-6989586621679154682"><a href="#local-6989586621679154682"><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-274"></a><span> </span><a href="#local-6989586621679154681"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679154682"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-275"></a><span>
|
||||
</span><a name="line-276"></a><span class="hs-comment">-- | /Optional Param/ "status" - Updated status of the pet</span><span>
|
||||
</span><a name="line-277"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.Model.html#StatusText"><span class="hs-identifier hs-type">StatusText</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-278"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679154679"><a href="#local-6989586621679154679"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#StatusText"><span class="hs-identifier hs-var">StatusText</span></a><span> </span><a name="local-6989586621679154680"><a href="#local-6989586621679154680"><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-279"></a><span> </span><a href="#local-6989586621679154679"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679154680"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-280"></a><span>
|
||||
</span><a name="line-281"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-282"></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.Pet.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-283"></a><span>
|
||||
</span><a name="line-284"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-285"></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.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-286"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-287"></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.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-288"></a><span>
|
||||
</span><a name="line-94"></a><span class="hs-comment">-- | @DELETE \/pet\/{petId}@</span><span>
|
||||
</span><a name="line-95"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-96"></a><span class="hs-comment">-- Deletes a pet</span><span>
|
||||
</span><a name="line-97"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-98"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-99"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-100"></a><span class="hs-identifier">deletePet</span><span> </span><span>
|
||||
</span><a name="line-101"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a><span> </span><span class="hs-comment">-- ^ "petId" - Pet id to delete</span><span>
|
||||
</span><a name="line-102"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-103"></a><a name="deletePet"><a href="SwaggerPetstore.API.Pet.html#deletePet"><span class="hs-identifier">deletePet</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679155128"><a href="#local-6989586621679155128"><span class="hs-identifier">petId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-104"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679155128"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-106"></a><span>
|
||||
</span><a name="line-107"></a><span class="hs-keyword">data</span><span> </span><a name="DeletePet"><a href="SwaggerPetstore.API.Pet.html#DeletePet"><span class="hs-identifier">DeletePet</span></a></a><span> </span><span>
|
||||
</span><a name="line-108"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="SwaggerPetstore.Model.html#ApiKey"><span class="hs-identifier hs-type">ApiKey</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-109"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155120"><a href="#local-6989586621679155120"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#ApiKey"><span class="hs-identifier hs-var">ApiKey</span></a><span> </span><a name="local-6989586621679155121"><a href="#local-6989586621679155121"><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-110"></a><span> </span><a href="#local-6989586621679155120"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679155121"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-111"></a><span>
|
||||
</span><a name="line-112"></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.Pet.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 name="line-113"></a><span>
|
||||
</span><a name="line-114"></a><span>
|
||||
</span><a name="line-115"></a><span class="hs-comment">-- *** findPetsByStatus</span><span>
|
||||
</span><a name="line-116"></a><span>
|
||||
</span><a name="line-117"></a><span class="hs-comment">-- | @GET \/pet\/findByStatus@</span><span>
|
||||
</span><a name="line-118"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-119"></a><span class="hs-comment">-- Finds Pets by status</span><span>
|
||||
</span><a name="line-120"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-121"></a><span class="hs-comment">-- Multiple status values can be provided with comma separated strings</span><span>
|
||||
</span><a name="line-122"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-123"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-124"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-125"></a><span class="hs-identifier">findPetsByStatus</span><span> </span><span>
|
||||
</span><a name="line-126"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155125"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-127"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Status"><span class="hs-identifier hs-type">Status</span></a><span> </span><span class="hs-comment">-- ^ "status" - Status values that need to be considered for filter</span><span>
|
||||
</span><a name="line-128"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="#local-6989586621679155125"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-129"></a><a name="findPetsByStatus"><a href="SwaggerPetstore.API.Pet.html#findPetsByStatus"><span class="hs-identifier">findPetsByStatus</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Status"><span class="hs-identifier hs-var">Status</span></a><span> </span><a name="local-6989586621679155129"><a href="#local-6989586621679155129"><span class="hs-identifier">status</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-130"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/findByStatus"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-131"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-132"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.Core.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-6989586621679155129"><span class="hs-identifier hs-var">status</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-133"></a><span>
|
||||
</span><a name="line-134"></a><span class="hs-keyword">data</span><span> </span><a name="FindPetsByStatus"><a href="SwaggerPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier">FindPetsByStatus</span></a></a><span> </span><span>
|
||||
</span><a name="line-135"></a><span>
|
||||
</span><a name="line-136"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-137"></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.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-138"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-139"></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.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-140"></a><span>
|
||||
</span><a name="line-141"></a><span>
|
||||
</span><a name="line-142"></a><span class="hs-comment">-- *** findPetsByTags</span><span>
|
||||
</span><a name="line-143"></a><span>
|
||||
</span><a name="line-144"></a><span class="hs-comment">-- | @GET \/pet\/findByTags@</span><span>
|
||||
</span><a name="line-145"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-146"></a><span class="hs-comment">-- Finds Pets by tags</span><span>
|
||||
</span><a name="line-147"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-148"></a><span class="hs-comment">-- Multiple tags can be provided with comma separated strings. Use tag1, tag2, tag3 for testing.</span><span>
|
||||
</span><a name="line-149"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-150"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-151"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-152"></a><span class="hs-identifier">findPetsByTags</span><span> </span><span>
|
||||
</span><a name="line-153"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155124"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-154"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Tags"><span class="hs-identifier hs-type">Tags</span></a><span> </span><span class="hs-comment">-- ^ "tags" - Tags to filter by</span><span>
|
||||
</span><a name="line-155"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="#local-6989586621679155124"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-156"></a><a name="findPetsByTags"><a href="SwaggerPetstore.API.Pet.html#findPetsByTags"><span class="hs-identifier">findPetsByTags</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Tags"><span class="hs-identifier hs-var">Tags</span></a><span> </span><a name="local-6989586621679155130"><a href="#local-6989586621679155130"><span class="hs-identifier">tags</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-157"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/findByTags"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-158"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-159"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="SwaggerPetstore.Core.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-6989586621679155130"><span class="hs-identifier hs-var">tags</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-160"></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-pragma">{-# DEPRECATED findPetsByTags "" #-}</span><span>
|
||||
</span><a name="line-162"></a><span>
|
||||
</span><a name="line-163"></a><span class="hs-keyword">data</span><span> </span><a name="FindPetsByTags"><a href="SwaggerPetstore.API.Pet.html#FindPetsByTags"><span class="hs-identifier">FindPetsByTags</span></a></a><span> </span><span>
|
||||
</span><a name="line-164"></a><span>
|
||||
</span><a name="line-165"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-166"></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.Pet.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-167"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-168"></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.Pet.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-169"></a><span>
|
||||
</span><a name="line-170"></a><span>
|
||||
</span><a name="line-171"></a><span class="hs-comment">-- *** getPetById</span><span>
|
||||
</span><a name="line-172"></a><span>
|
||||
</span><a name="line-173"></a><span class="hs-comment">-- | @GET \/pet\/{petId}@</span><span>
|
||||
</span><a name="line-174"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-175"></a><span class="hs-comment">-- Find pet by ID</span><span>
|
||||
</span><a name="line-176"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-177"></a><span class="hs-comment">-- Returns a single pet</span><span>
|
||||
</span><a name="line-178"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-179"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKey'</span><span>
|
||||
</span><a name="line-180"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-181"></a><span class="hs-identifier">getPetById</span><span> </span><span>
|
||||
</span><a name="line-182"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679155123"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-183"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet to return</span><span>
|
||||
</span><a name="line-184"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="#local-6989586621679155123"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-185"></a><a name="getPetById"><a href="SwaggerPetstore.API.Pet.html#getPetById"><span class="hs-identifier">getPetById</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679155131"><a href="#local-6989586621679155131"><span class="hs-identifier">petId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-186"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679155131"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-187"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-188"></a><span>
|
||||
</span><a name="line-189"></a><span class="hs-keyword">data</span><span> </span><a name="GetPetById"><a href="SwaggerPetstore.API.Pet.html#GetPetById"><span class="hs-identifier">GetPetById</span></a></a><span> </span><span>
|
||||
</span><a name="line-190"></a><span>
|
||||
</span><a name="line-191"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-192"></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.Pet.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-193"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-194"></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.Pet.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-195"></a><span>
|
||||
</span><a name="line-196"></a><span>
|
||||
</span><a name="line-197"></a><span class="hs-comment">-- *** updatePet</span><span>
|
||||
</span><a name="line-198"></a><span>
|
||||
</span><a name="line-199"></a><span class="hs-comment">-- | @PUT \/pet@</span><span>
|
||||
</span><a name="line-200"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-201"></a><span class="hs-comment">-- Update an existing pet</span><span>
|
||||
</span><a name="line-202"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-203"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-204"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-205"></a><span class="hs-identifier">updatePet</span><span> </span><span>
|
||||
</span><a name="line-206"></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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679155122"><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-6989586621679155122"><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-207"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679155122"><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-208"></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">-- ^ "pet" - Pet object that needs to be added to the store</span><span>
|
||||
</span><a name="line-209"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679155122"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-210"></a><a name="updatePet"><a href="SwaggerPetstore.API.Pet.html#updatePet"><span class="hs-identifier">updatePet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679155132"><a href="#local-6989586621679155132"><span class="hs-identifier">pet</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-211"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-212"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-213"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679155132"><span class="hs-identifier hs-var">pet</span></a><span>
|
||||
</span><a name="line-214"></a><span>
|
||||
</span><a name="line-215"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePet"><a href="SwaggerPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier">UpdatePet</span></a></a><span> </span><span>
|
||||
</span><a name="line-216"></a><span>
|
||||
</span><a name="line-217"></a><span class="hs-comment">-- | /Body Param/ "Pet" - Pet object that needs to be added to the store</span><span>
|
||||
</span><a name="line-218"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><span>
|
||||
</span><a name="line-219"></a><span>
|
||||
</span><a name="line-220"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-221"></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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-222"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-223"></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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-224"></a><span>
|
||||
</span><a name="line-225"></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.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-226"></a><span>
|
||||
</span><a name="line-227"></a><span>
|
||||
</span><a name="line-228"></a><span class="hs-comment">-- *** updatePetWithForm</span><span>
|
||||
</span><a name="line-229"></a><span>
|
||||
</span><a name="line-230"></a><span class="hs-comment">-- | @POST \/pet\/{petId}@</span><span>
|
||||
</span><a name="line-231"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-232"></a><span class="hs-comment">-- Updates a pet in the store with form data</span><span>
|
||||
</span><a name="line-233"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-234"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-235"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-236"></a><span class="hs-identifier">updatePetWithForm</span><span> </span><span>
|
||||
</span><a name="line-237"></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.Pet.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 class="hs-special">)</span><span>
|
||||
</span><a name="line-238"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet that needs to be updated</span><span>
|
||||
</span><a name="line-239"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-240"></a><a name="updatePetWithForm"><a href="SwaggerPetstore.API.Pet.html#updatePetWithForm"><span class="hs-identifier">updatePetWithForm</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679155133"><a href="#local-6989586621679155133"><span class="hs-identifier">petId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-241"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679155133"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-242"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-243"></a><span>
|
||||
</span><a name="line-244"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePetWithForm"><a href="SwaggerPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier">UpdatePetWithForm</span></a></a><span> </span><span>
|
||||
</span><a name="line-245"></a><span>
|
||||
</span><a name="line-246"></a><span class="hs-comment">-- | /Optional Param/ "name" - Updated name of the pet</span><span>
|
||||
</span><a name="line-247"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.Model.html#Name2"><span class="hs-identifier hs-type">Name2</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-248"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155118"><a href="#local-6989586621679155118"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Name2"><span class="hs-identifier hs-var">Name2</span></a><span> </span><a name="local-6989586621679155119"><a href="#local-6989586621679155119"><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-249"></a><span> </span><a href="#local-6989586621679155118"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679155119"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-250"></a><span>
|
||||
</span><a name="line-251"></a><span class="hs-comment">-- | /Optional Param/ "status" - Updated status of the pet</span><span>
|
||||
</span><a name="line-252"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.Model.html#StatusText"><span class="hs-identifier hs-type">StatusText</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-253"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155116"><a href="#local-6989586621679155116"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#StatusText"><span class="hs-identifier hs-var">StatusText</span></a><span> </span><a name="local-6989586621679155117"><a href="#local-6989586621679155117"><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-254"></a><span> </span><a href="#local-6989586621679155116"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679155117"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-255"></a><span>
|
||||
</span><a name="line-256"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-257"></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.Pet.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-258"></a><span>
|
||||
</span><a name="line-259"></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.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-260"></a><span>
|
||||
</span><a name="line-261"></a><span>
|
||||
</span><a name="line-262"></a><span class="hs-comment">-- *** uploadFile</span><span>
|
||||
</span><a name="line-263"></a><span>
|
||||
</span><a name="line-264"></a><span class="hs-comment">-- | @POST \/pet\/{petId}\/uploadImage@</span><span>
|
||||
</span><a name="line-265"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-266"></a><span class="hs-comment">-- uploads an image</span><span>
|
||||
</span><a name="line-267"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-268"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-269"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-270"></a><span class="hs-identifier">uploadFile</span><span> </span><span>
|
||||
</span><a name="line-271"></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.Pet.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 class="hs-special">)</span><span>
|
||||
</span><a name="line-272"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet to update</span><span>
|
||||
</span><a name="line-273"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-274"></a><a name="uploadFile"><a href="SwaggerPetstore.API.Pet.html#uploadFile"><span class="hs-identifier">uploadFile</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679155134"><a href="#local-6989586621679155134"><span class="hs-identifier">petId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-275"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679155134"><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-276"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-277"></a><span>
|
||||
</span><a name="line-278"></a><span class="hs-keyword">data</span><span> </span><a name="UploadFile"><a href="SwaggerPetstore.API.Pet.html#UploadFile"><span class="hs-identifier">UploadFile</span></a></a><span> </span><span>
|
||||
</span><a name="line-279"></a><span>
|
||||
</span><a name="line-280"></a><span class="hs-comment">-- | /Optional Param/ "additionalMetadata" - Additional data to pass to server</span><span>
|
||||
</span><a name="line-281"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-282"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155114"><a href="#local-6989586621679155114"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-var">AdditionalMetadata</span></a><span> </span><a name="local-6989586621679155115"><a href="#local-6989586621679155115"><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-283"></a><span> </span><a href="#local-6989586621679155114"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679155115"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-284"></a><span>
|
||||
</span><a name="line-285"></a><span class="hs-comment">-- | /Optional Param/ "file" - file to upload</span><span>
|
||||
</span><a name="line-286"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.Model.html#File"><span class="hs-identifier hs-type">File</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-287"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679155112"><a href="#local-6989586621679155112"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#File"><span class="hs-identifier hs-var">File</span></a><span> </span><a name="local-6989586621679155113"><a href="#local-6989586621679155113"><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-288"></a><span> </span><a href="#local-6989586621679155112"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679155113"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-289"></a><span>
|
||||
</span><a name="line-290"></a><span class="hs-comment">-- *** uploadFile</span><span>
|
||||
</span><a name="line-291"></a><span>
|
||||
</span><a name="line-292"></a><span class="hs-comment">-- | @POST \/pet\/{petId}\/uploadImage@</span><span>
|
||||
</span><a name="line-293"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-294"></a><span class="hs-comment">-- uploads an image</span><span>
|
||||
</span><a name="line-295"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-296"></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-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-299"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-300"></a><span class="hs-identifier">uploadFile</span><span> </span><span>
|
||||
</span><a name="line-301"></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.Pet.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 class="hs-special">)</span><span>
|
||||
</span><a name="line-302"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-type">PetId</span></a><span> </span><span class="hs-comment">-- ^ "petId" - ID of pet to update</span><span>
|
||||
</span><a name="line-303"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Pet.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 href="SwaggerPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-304"></a><a name="uploadFile"><a href="SwaggerPetstore.API.Pet.html#uploadFile"><span class="hs-identifier">uploadFile</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679154705"><a href="#local-6989586621679154705"><span class="hs-identifier">petId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-305"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154705"><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-306"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-307"></a><span>
|
||||
</span><a name="line-308"></a><span class="hs-keyword">data</span><span> </span><a name="UploadFile"><a href="SwaggerPetstore.API.Pet.html#UploadFile"><span class="hs-identifier">UploadFile</span></a></a><span> </span><span>
|
||||
</span><a name="line-309"></a><span>
|
||||
</span><a name="line-310"></a><span class="hs-comment">-- | /Optional Param/ "additionalMetadata" - Additional data to pass to server</span><span>
|
||||
</span><a name="line-311"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-type">AdditionalMetadata</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-312"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679154677"><a href="#local-6989586621679154677"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-var">AdditionalMetadata</span></a><span> </span><a name="local-6989586621679154678"><a href="#local-6989586621679154678"><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-313"></a><span> </span><a href="#local-6989586621679154677"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679154678"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-314"></a><span>
|
||||
</span><a name="line-315"></a><span class="hs-comment">-- | /Optional Param/ "file" - file to upload</span><span>
|
||||
</span><a name="line-316"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="SwaggerPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.Model.html#File"><span class="hs-identifier hs-type">File</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-317"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679154675"><a href="#local-6989586621679154675"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#File"><span class="hs-identifier hs-var">File</span></a><span> </span><a name="local-6989586621679154676"><a href="#local-6989586621679154676"><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-318"></a><span> </span><a href="#local-6989586621679154675"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679154676"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-319"></a><span>
|
||||
</span><a name="line-320"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
||||
</span><a name="line-321"></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.Pet.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-322"></a><span>
|
||||
</span><a name="line-323"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-324"></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.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-325"></a><span>
|
||||
</span><a name="line-326"></a></pre></body></html>
|
||||
</span><a name="line-290"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
||||
</span><a name="line-291"></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.Pet.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-292"></a><span>
|
||||
</span><a name="line-293"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-294"></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.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-295"></a><span>
|
||||
</span><a name="line-296"></a></pre></body></html>
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -66,90 +66,86 @@ Module : SwaggerPetstore.API.Store
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- For valid response try integer IDs with value < 1000. Anything above 1000 or nonintegers will generate API errors</span><span>
|
||||
</span><a name="line-68"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-69"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-70"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-71"></a><span class="hs-identifier">deleteOrder</span><span> </span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154389"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-73"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a><span> </span><span class="hs-comment">-- ^ "orderId" - ID of the order that needs to be deleted</span><span>
|
||||
</span><a name="line-74"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Store.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-6989586621679154390"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679154389"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-75"></a><a name="deleteOrder"><a href="SwaggerPetstore.API.Store.html#deleteOrder"><span class="hs-identifier">deleteOrder</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-var">OrderIdText</span></a><span> </span><a name="local-6989586621679154391"><a href="#local-6989586621679154391"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-76"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154391"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-77"></a><span>
|
||||
</span><a name="line-78"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteOrder"><a href="SwaggerPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier">DeleteOrder</span></a></a><span> </span><span>
|
||||
</span><a name="line-79"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-80"></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.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-81"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-82"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-83"></a><span>
|
||||
</span><a name="line-84"></a><span>
|
||||
</span><a name="line-85"></a><span class="hs-comment">-- *** getInventory</span><span>
|
||||
</span><a name="line-86"></a><span>
|
||||
</span><a name="line-87"></a><span class="hs-comment">-- | @GET \/store\/inventory@</span><span>
|
||||
</span><a name="line-88"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-89"></a><span class="hs-comment">-- Returns pet inventories by status</span><span>
|
||||
</span><a name="line-90"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">-- Returns a map of status codes to quantities</span><span>
|
||||
</span><a name="line-92"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-93"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKey'</span><span>
|
||||
</span><a name="line-94"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-95"></a><span class="hs-identifier">getInventory</span><span> </span><span>
|
||||
</span><a name="line-96"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Store.html#GetInventory"><span class="hs-identifier hs-type">GetInventory</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><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-97"></a><a name="getInventory"><a href="SwaggerPetstore.API.Store.html#getInventory"><span class="hs-identifier">getInventory</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-98"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/inventory"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-99"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-69"></a><span class="hs-identifier">deleteOrder</span><span> </span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a><span> </span><span class="hs-comment">-- ^ "orderId" - ID of the order that needs to be deleted</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Store.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="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-72"></a><a name="deleteOrder"><a href="SwaggerPetstore.API.Store.html#deleteOrder"><span class="hs-identifier">deleteOrder</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-var">OrderIdText</span></a><span> </span><a name="local-6989586621679154849"><a href="#local-6989586621679154849"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-73"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154849"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-74"></a><span>
|
||||
</span><a name="line-75"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteOrder"><a href="SwaggerPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier">DeleteOrder</span></a></a><span> </span><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></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.Store.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 name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span>
|
||||
</span><a name="line-80"></a><span class="hs-comment">-- *** getInventory</span><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- | @GET \/store\/inventory@</span><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- Returns pet inventories by status</span><span>
|
||||
</span><a name="line-85"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-86"></a><span class="hs-comment">-- Returns a map of status codes to quantities</span><span>
|
||||
</span><a name="line-87"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-88"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKey'</span><span>
|
||||
</span><a name="line-89"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-90"></a><span class="hs-identifier">getInventory</span><span> </span><span>
|
||||
</span><a name="line-91"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Store.html#GetInventory"><span class="hs-identifier hs-type">GetInventory</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><span class="hs-special">(</span><span class="hs-identifier hs-type">Map</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Map</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-identifier hs-type">Int</span><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-92"></a><a name="getInventory"><a href="SwaggerPetstore.API.Store.html#getInventory"><span class="hs-identifier">getInventory</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-93"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/inventory"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-94"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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="SwaggerPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-95"></a><span>
|
||||
</span><a name="line-96"></a><span class="hs-keyword">data</span><span> </span><a name="GetInventory"><a href="SwaggerPetstore.API.Store.html#GetInventory"><span class="hs-identifier">GetInventory</span></a></a><span> </span><span>
|
||||
</span><a name="line-97"></a><span>
|
||||
</span><a name="line-98"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-99"></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.Store.html#GetInventory"><span class="hs-identifier hs-type">GetInventory</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-100"></a><span>
|
||||
</span><a name="line-101"></a><span class="hs-keyword">data</span><span> </span><a name="GetInventory"><a href="SwaggerPetstore.API.Store.html#GetInventory"><span class="hs-identifier">GetInventory</span></a></a><span> </span><span>
|
||||
</span><a name="line-102"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-103"></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.Store.html#GetInventory"><span class="hs-identifier hs-type">GetInventory</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-104"></a><span>
|
||||
</span><a name="line-105"></a><span>
|
||||
</span><a name="line-106"></a><span class="hs-comment">-- *** getOrderById</span><span>
|
||||
</span><a name="line-107"></a><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- | @GET \/store\/order\/{order_id}@</span><span>
|
||||
</span><a name="line-101"></a><span>
|
||||
</span><a name="line-102"></a><span class="hs-comment">-- *** getOrderById</span><span>
|
||||
</span><a name="line-103"></a><span>
|
||||
</span><a name="line-104"></a><span class="hs-comment">-- | @GET \/store\/order\/{order_id}@</span><span>
|
||||
</span><a name="line-105"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-106"></a><span class="hs-comment">-- Find purchase order by ID</span><span>
|
||||
</span><a name="line-107"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- For valid response try integer IDs with value <= 5 or > 10. Other values will generated exceptions</span><span>
|
||||
</span><a name="line-109"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-110"></a><span class="hs-comment">-- Find purchase order by ID</span><span>
|
||||
</span><a name="line-111"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-112"></a><span class="hs-comment">-- For valid response try integer IDs with value <= 5 or > 10. Other values will generated exceptions</span><span>
|
||||
</span><a name="line-113"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-114"></a><span class="hs-identifier">getOrderById</span><span> </span><span>
|
||||
</span><a name="line-115"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154388"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-116"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a><span> </span><span class="hs-comment">-- ^ "orderId" - ID of pet that needs to be fetched</span><span>
|
||||
</span><a name="line-117"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Store.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 href="#local-6989586621679154388"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-118"></a><a name="getOrderById"><a href="SwaggerPetstore.API.Store.html#getOrderById"><span class="hs-identifier">getOrderById</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#OrderId"><span class="hs-identifier hs-var">OrderId</span></a><span> </span><a name="local-6989586621679154392"><a href="#local-6989586621679154392"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-119"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154392"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-120"></a><span>
|
||||
</span><a name="line-121"></a><span class="hs-keyword">data</span><span> </span><a name="GetOrderById"><a href="SwaggerPetstore.API.Store.html#GetOrderById"><span class="hs-identifier">GetOrderById</span></a></a><span> </span><span>
|
||||
</span><a name="line-122"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-123"></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.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-124"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-125"></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.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-110"></a><span class="hs-identifier">getOrderById</span><span> </span><span>
|
||||
</span><a name="line-111"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154848"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-112"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a><span> </span><span class="hs-comment">-- ^ "orderId" - ID of pet that needs to be fetched</span><span>
|
||||
</span><a name="line-113"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Store.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 href="#local-6989586621679154848"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-114"></a><a name="getOrderById"><a href="SwaggerPetstore.API.Store.html#getOrderById"><span class="hs-identifier">getOrderById</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#OrderId"><span class="hs-identifier hs-var">OrderId</span></a><span> </span><a name="local-6989586621679154850"><a href="#local-6989586621679154850"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-115"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154850"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-116"></a><span>
|
||||
</span><a name="line-117"></a><span class="hs-keyword">data</span><span> </span><a name="GetOrderById"><a href="SwaggerPetstore.API.Store.html#GetOrderById"><span class="hs-identifier">GetOrderById</span></a></a><span> </span><span>
|
||||
</span><a name="line-118"></a><span>
|
||||
</span><a name="line-119"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-120"></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.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-121"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-122"></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.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-123"></a><span>
|
||||
</span><a name="line-124"></a><span>
|
||||
</span><a name="line-125"></a><span class="hs-comment">-- *** placeOrder</span><span>
|
||||
</span><a name="line-126"></a><span>
|
||||
</span><a name="line-127"></a><span>
|
||||
</span><a name="line-128"></a><span class="hs-comment">-- *** placeOrder</span><span>
|
||||
</span><a name="line-129"></a><span>
|
||||
</span><a name="line-130"></a><span class="hs-comment">-- | @POST \/store\/order@</span><span>
|
||||
</span><a name="line-131"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-132"></a><span class="hs-comment">-- Place an order for a pet</span><span>
|
||||
</span><a name="line-133"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-134"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-135"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-136"></a><span class="hs-identifier">placeOrder</span><span> </span><span>
|
||||
</span><a name="line-137"></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.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679154386"><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-6989586621679154386"><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-138"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679154386"><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-139"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154387"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-140"></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-141"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679154386"><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 href="#local-6989586621679154387"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-142"></a><a name="placeOrder"><a href="SwaggerPetstore.API.Store.html#placeOrder"><span class="hs-identifier">placeOrder</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679154393"><a href="#local-6989586621679154393"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-143"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-144"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679154393"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-127"></a><span class="hs-comment">-- | @POST \/store\/order@</span><span>
|
||||
</span><a name="line-128"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-129"></a><span class="hs-comment">-- Place an order for a pet</span><span>
|
||||
</span><a name="line-130"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-131"></a><span class="hs-identifier">placeOrder</span><span> </span><span>
|
||||
</span><a name="line-132"></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.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679154846"><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-6989586621679154846"><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-133"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679154846"><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-134"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154847"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-135"></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">-- ^ "order" - order placed for purchasing the pet</span><span>
|
||||
</span><a name="line-136"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679154846"><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 href="#local-6989586621679154847"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-137"></a><a name="placeOrder"><a href="SwaggerPetstore.API.Store.html#placeOrder"><span class="hs-identifier">placeOrder</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679154851"><a href="#local-6989586621679154851"><span class="hs-identifier">order</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-138"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-139"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679154851"><span class="hs-identifier hs-var">order</span></a><span>
|
||||
</span><a name="line-140"></a><span>
|
||||
</span><a name="line-141"></a><span class="hs-keyword">data</span><span> </span><a name="PlaceOrder"><a href="SwaggerPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier">PlaceOrder</span></a></a><span> </span><span>
|
||||
</span><a name="line-142"></a><span>
|
||||
</span><a name="line-143"></a><span class="hs-comment">-- | /Body Param/ "Order" - order placed for purchasing the pet</span><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span>
|
||||
</span><a name="line-145"></a><span>
|
||||
</span><a name="line-146"></a><span class="hs-keyword">data</span><span> </span><a name="PlaceOrder"><a href="SwaggerPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier">PlaceOrder</span></a></a><span> </span><span>
|
||||
</span><a name="line-147"></a><span>
|
||||
</span><a name="line-148"></a><span class="hs-comment">-- | /Body Param/ "body" - order placed for purchasing the pet</span><span>
|
||||
</span><a name="line-149"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="SwaggerPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span>
|
||||
</span><a name="line-150"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-151"></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.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-152"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-153"></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.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-154"></a><span>
|
||||
</span><a name="line-155"></a></pre></body></html>
|
||||
</span><a name="line-146"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-147"></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.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-148"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-149"></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.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-150"></a><span>
|
||||
</span><a name="line-151"></a></pre></body></html>
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -66,210 +66,172 @@ Module : SwaggerPetstore.API.User
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-68"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-69"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-70"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-71"></a><span class="hs-identifier">createUser</span><span> </span><span>
|
||||
</span><a name="line-72"></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.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679153677"><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-6989586621679153677"><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-73"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679153677"><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-74"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679153678"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-75"></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-76"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679153677"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679153679"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679153678"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-77"></a><a name="createUser"><a href="SwaggerPetstore.API.User.html#createUser"><span class="hs-identifier">createUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679153680"><a href="#local-6989586621679153680"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-78"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-79"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679153680"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-80"></a><span>
|
||||
</span><a name="line-81"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUser"><a href="SwaggerPetstore.API.User.html#CreateUser"><span class="hs-identifier">CreateUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-69"></a><span class="hs-identifier">createUser</span><span> </span><span>
|
||||
</span><a name="line-70"></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.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679154257"><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-6989586621679154257"><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-71"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679154257"><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-72"></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">-- ^ "user" - Created user object</span><span>
|
||||
</span><a name="line-73"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679154257"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-74"></a><a name="createUser"><a href="SwaggerPetstore.API.User.html#createUser"><span class="hs-identifier">createUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679154258"><a href="#local-6989586621679154258"><span class="hs-identifier">user</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-75"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679154258"><span class="hs-identifier hs-var">user</span></a><span>
|
||||
</span><a name="line-77"></a><span>
|
||||
</span><a name="line-78"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUser"><a href="SwaggerPetstore.API.User.html#CreateUser"><span class="hs-identifier">CreateUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-79"></a><span>
|
||||
</span><a name="line-80"></a><span class="hs-comment">-- | /Body Param/ "User" - Created user object</span><span>
|
||||
</span><a name="line-81"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span>
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- | /Body Param/ "body" - Created user object</span><span>
|
||||
</span><a name="line-84"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span>
|
||||
</span><a name="line-85"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-86"></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.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-87"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-88"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-89"></a><span>
|
||||
</span><a name="line-90"></a><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">-- *** createUsersWithArrayInput</span><span>
|
||||
</span><a name="line-92"></a><span>
|
||||
</span><a name="line-93"></a><span class="hs-comment">-- | @POST \/user\/createWithArray@</span><span>
|
||||
</span><a name="line-94"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-95"></a><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><a name="line-96"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-97"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-98"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-99"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-100"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-101"></a><span class="hs-identifier">createUsersWithArrayInput</span><span> </span><span>
|
||||
</span><a name="line-102"></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.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679153674"><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-6989586621679153674"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-103"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679153674"><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-104"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679153675"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||
</span><a name="line-106"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679153674"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679153676"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679153675"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-107"></a><a name="createUsersWithArrayInput"><a href="SwaggerPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier">createUsersWithArrayInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679153681"><a href="#local-6989586621679153681"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-108"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/createWithArray"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-109"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679153681"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-83"></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.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-84"></a><span>
|
||||
</span><a name="line-85"></a><span>
|
||||
</span><a name="line-86"></a><span class="hs-comment">-- *** createUsersWithArrayInput</span><span>
|
||||
</span><a name="line-87"></a><span>
|
||||
</span><a name="line-88"></a><span class="hs-comment">-- | @POST \/user\/createWithArray@</span><span>
|
||||
</span><a name="line-89"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-90"></a><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-92"></a><span class="hs-identifier">createUsersWithArrayInput</span><span> </span><span>
|
||||
</span><a name="line-93"></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.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679154256"><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-6989586621679154256"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#User2"><span class="hs-identifier hs-type">User2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-94"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679154256"><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-95"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User2"><span class="hs-identifier hs-type">User2</span></a><span> </span><span class="hs-comment">-- ^ "user" - List of user object</span><span>
|
||||
</span><a name="line-96"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679154256"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-97"></a><a name="createUsersWithArrayInput"><a href="SwaggerPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier">createUsersWithArrayInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679154259"><a href="#local-6989586621679154259"><span class="hs-identifier">user</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-98"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/createWithArray"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-99"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679154259"><span class="hs-identifier hs-var">user</span></a><span>
|
||||
</span><a name="line-100"></a><span>
|
||||
</span><a name="line-101"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithArrayInput"><a href="SwaggerPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier">CreateUsersWithArrayInput</span></a></a><span> </span><span>
|
||||
</span><a name="line-102"></a><span>
|
||||
</span><a name="line-103"></a><span class="hs-comment">-- | /Body Param/ "User" - List of user object</span><span>
|
||||
</span><a name="line-104"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="SwaggerPetstore.Model.html#User2"><span class="hs-identifier hs-type">User2</span></a><span> </span><span>
|
||||
</span><a name="line-105"></a><span>
|
||||
</span><a name="line-106"></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.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-107"></a><span>
|
||||
</span><a name="line-108"></a><span>
|
||||
</span><a name="line-109"></a><span class="hs-comment">-- *** createUsersWithListInput</span><span>
|
||||
</span><a name="line-110"></a><span>
|
||||
</span><a name="line-111"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithArrayInput"><a href="SwaggerPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier">CreateUsersWithArrayInput</span></a></a><span> </span><span>
|
||||
</span><a name="line-112"></a><span>
|
||||
</span><a name="line-113"></a><span class="hs-comment">-- | /Body Param/ "body" - List of user object</span><span>
|
||||
</span><a name="line-114"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="SwaggerPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span>
|
||||
</span><a name="line-115"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-116"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-117"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-118"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-119"></a><span>
|
||||
</span><a name="line-120"></a><span>
|
||||
</span><a name="line-121"></a><span class="hs-comment">-- *** createUsersWithListInput</span><span>
|
||||
</span><a name="line-122"></a><span>
|
||||
</span><a name="line-123"></a><span class="hs-comment">-- | @POST \/user\/createWithList@</span><span>
|
||||
</span><a name="line-124"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-125"></a><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><a name="line-126"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-127"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-128"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-129"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-130"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-131"></a><span class="hs-identifier">createUsersWithListInput</span><span> </span><span>
|
||||
</span><a name="line-132"></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.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679153671"><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-6989586621679153671"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-133"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679153671"><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-134"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679153672"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-135"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||
</span><a name="line-136"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679153671"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679153673"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679153672"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-137"></a><a name="createUsersWithListInput"><a href="SwaggerPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier">createUsersWithListInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679153682"><a href="#local-6989586621679153682"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-138"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/createWithList"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-139"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679153682"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-140"></a><span>
|
||||
</span><a name="line-141"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithListInput"><a href="SwaggerPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier">CreateUsersWithListInput</span></a></a><span> </span><span>
|
||||
</span><a name="line-142"></a><span>
|
||||
</span><a name="line-143"></a><span class="hs-comment">-- | /Body Param/ "body" - List of user object</span><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="SwaggerPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span>
|
||||
</span><a name="line-145"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-146"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-147"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-148"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-111"></a><span class="hs-comment">-- | @POST \/user\/createWithList@</span><span>
|
||||
</span><a name="line-112"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-113"></a><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><a name="line-114"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-115"></a><span class="hs-identifier">createUsersWithListInput</span><span> </span><span>
|
||||
</span><a name="line-116"></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.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679154255"><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-6989586621679154255"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.Model.html#User2"><span class="hs-identifier hs-type">User2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-117"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679154255"><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-118"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#User2"><span class="hs-identifier hs-type">User2</span></a><span> </span><span class="hs-comment">-- ^ "user" - List of user object</span><span>
|
||||
</span><a name="line-119"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679154255"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-120"></a><a name="createUsersWithListInput"><a href="SwaggerPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier">createUsersWithListInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679154260"><a href="#local-6989586621679154260"><span class="hs-identifier">user</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-121"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/createWithList"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-122"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679154260"><span class="hs-identifier hs-var">user</span></a><span>
|
||||
</span><a name="line-123"></a><span>
|
||||
</span><a name="line-124"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithListInput"><a href="SwaggerPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier">CreateUsersWithListInput</span></a></a><span> </span><span>
|
||||
</span><a name="line-125"></a><span>
|
||||
</span><a name="line-126"></a><span class="hs-comment">-- | /Body Param/ "User" - List of user object</span><span>
|
||||
</span><a name="line-127"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="SwaggerPetstore.Model.html#User2"><span class="hs-identifier hs-type">User2</span></a><span> </span><span>
|
||||
</span><a name="line-128"></a><span>
|
||||
</span><a name="line-129"></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.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-130"></a><span>
|
||||
</span><a name="line-131"></a><span>
|
||||
</span><a name="line-132"></a><span class="hs-comment">-- *** deleteUser</span><span>
|
||||
</span><a name="line-133"></a><span>
|
||||
</span><a name="line-134"></a><span class="hs-comment">-- | @DELETE \/user\/{username}@</span><span>
|
||||
</span><a name="line-135"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-136"></a><span class="hs-comment">-- Delete user</span><span>
|
||||
</span><a name="line-137"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-138"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-139"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-140"></a><span class="hs-identifier">deleteUser</span><span> </span><span>
|
||||
</span><a name="line-141"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be deleted</span><span>
|
||||
</span><a name="line-142"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.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="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-143"></a><a name="deleteUser"><a href="SwaggerPetstore.API.User.html#deleteUser"><span class="hs-identifier">deleteUser</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679154261"><a href="#local-6989586621679154261"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-144"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154261"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-145"></a><span>
|
||||
</span><a name="line-146"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteUser"><a href="SwaggerPetstore.API.User.html#DeleteUser"><span class="hs-identifier">DeleteUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-147"></a><span>
|
||||
</span><a name="line-148"></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.User.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 name="line-149"></a><span>
|
||||
</span><a name="line-150"></a><span>
|
||||
</span><a name="line-151"></a><span class="hs-comment">-- *** deleteUser</span><span>
|
||||
</span><a name="line-151"></a><span class="hs-comment">-- *** getUserByName</span><span>
|
||||
</span><a name="line-152"></a><span>
|
||||
</span><a name="line-153"></a><span class="hs-comment">-- | @DELETE \/user\/{username}@</span><span>
|
||||
</span><a name="line-153"></a><span class="hs-comment">-- | @GET \/user\/{username}@</span><span>
|
||||
</span><a name="line-154"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-155"></a><span class="hs-comment">-- Delete user</span><span>
|
||||
</span><a name="line-155"></a><span class="hs-comment">-- Get user by user name</span><span>
|
||||
</span><a name="line-156"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-157"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-158"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-159"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-160"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-161"></a><span class="hs-identifier">deleteUser</span><span> </span><span>
|
||||
</span><a name="line-162"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679153669"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-163"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be deleted</span><span>
|
||||
</span><a name="line-164"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.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-6989586621679153670"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679153669"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-165"></a><a name="deleteUser"><a href="SwaggerPetstore.API.User.html#deleteUser"><span class="hs-identifier">deleteUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679153683"><a href="#local-6989586621679153683"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-166"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679153683"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-167"></a><span>
|
||||
</span><a name="line-168"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteUser"><a href="SwaggerPetstore.API.User.html#DeleteUser"><span class="hs-identifier">DeleteUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-169"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-170"></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.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-171"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-172"></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.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-157"></a><span class="hs-identifier">getUserByName</span><span> </span><span>
|
||||
</span><a name="line-158"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154254"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-159"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be fetched. Use user1 for testing.</span><span>
|
||||
</span><a name="line-160"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.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 href="#local-6989586621679154254"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-161"></a><a name="getUserByName"><a href="SwaggerPetstore.API.User.html#getUserByName"><span class="hs-identifier">getUserByName</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679154262"><a href="#local-6989586621679154262"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-162"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154262"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-163"></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-keyword">data</span><span> </span><a name="GetUserByName"><a href="SwaggerPetstore.API.User.html#GetUserByName"><span class="hs-identifier">GetUserByName</span></a></a><span> </span><span>
|
||||
</span><a name="line-165"></a><span>
|
||||
</span><a name="line-166"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-167"></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.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-168"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-169"></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.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-170"></a><span>
|
||||
</span><a name="line-171"></a><span>
|
||||
</span><a name="line-172"></a><span class="hs-comment">-- *** loginUser</span><span>
|
||||
</span><a name="line-173"></a><span>
|
||||
</span><a name="line-174"></a><span>
|
||||
</span><a name="line-175"></a><span class="hs-comment">-- *** getUserByName</span><span>
|
||||
</span><a name="line-176"></a><span>
|
||||
</span><a name="line-177"></a><span class="hs-comment">-- | @GET \/user\/{username}@</span><span>
|
||||
</span><a name="line-178"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-179"></a><span class="hs-comment">-- Get user by user name</span><span>
|
||||
</span><a name="line-180"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-181"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-182"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-183"></a><span class="hs-identifier">getUserByName</span><span> </span><span>
|
||||
</span><a name="line-184"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679153668"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-185"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be fetched. Use user1 for testing. </span><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.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 href="#local-6989586621679153668"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-187"></a><a name="getUserByName"><a href="SwaggerPetstore.API.User.html#getUserByName"><span class="hs-identifier">getUserByName</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679153684"><a href="#local-6989586621679153684"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-188"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679153684"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-174"></a><span class="hs-comment">-- | @GET \/user\/login@</span><span>
|
||||
</span><a name="line-175"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-176"></a><span class="hs-comment">-- Logs user into the system</span><span>
|
||||
</span><a name="line-177"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-178"></a><span class="hs-identifier">loginUser</span><span> </span><span>
|
||||
</span><a name="line-179"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679154253"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-180"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The user name for login</span><span>
|
||||
</span><a name="line-181"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a><span> </span><span class="hs-comment">-- ^ "password" - The password for login in clear text</span><span>
|
||||
</span><a name="line-182"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.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 href="#local-6989586621679154253"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-183"></a><a name="loginUser"><a href="SwaggerPetstore.API.User.html#loginUser"><span class="hs-identifier">loginUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679154263"><a href="#local-6989586621679154263"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679154264"><a href="#local-6989586621679154264"><span class="hs-identifier">password</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-184"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/login"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-185"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"username"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679154263"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"password"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679154264"><span class="hs-identifier hs-var">password</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-187"></a><span>
|
||||
</span><a name="line-188"></a><span class="hs-keyword">data</span><span> </span><a name="LoginUser"><a href="SwaggerPetstore.API.User.html#LoginUser"><span class="hs-identifier">LoginUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-189"></a><span>
|
||||
</span><a name="line-190"></a><span class="hs-keyword">data</span><span> </span><a name="GetUserByName"><a href="SwaggerPetstore.API.User.html#GetUserByName"><span class="hs-identifier">GetUserByName</span></a></a><span> </span><span>
|
||||
</span><a name="line-191"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-192"></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.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-193"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-194"></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.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-190"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-191"></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.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-192"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-193"></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.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-194"></a><span>
|
||||
</span><a name="line-195"></a><span>
|
||||
</span><a name="line-196"></a><span>
|
||||
</span><a name="line-197"></a><span class="hs-comment">-- *** loginUser</span><span>
|
||||
</span><a name="line-198"></a><span>
|
||||
</span><a name="line-199"></a><span class="hs-comment">-- | @GET \/user\/login@</span><span>
|
||||
</span><a name="line-200"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-201"></a><span class="hs-comment">-- Logs user into the system</span><span>
|
||||
</span><a name="line-202"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-203"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-204"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-205"></a><span class="hs-identifier">loginUser</span><span> </span><span>
|
||||
</span><a name="line-206"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679153667"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-207"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The user name for login</span><span>
|
||||
</span><a name="line-208"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a><span> </span><span class="hs-comment">-- ^ "password" - The password for login in clear text</span><span>
|
||||
</span><a name="line-209"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.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 href="#local-6989586621679153667"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-210"></a><a name="loginUser"><a href="SwaggerPetstore.API.User.html#loginUser"><span class="hs-identifier">loginUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679153685"><a href="#local-6989586621679153685"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679153686"><a href="#local-6989586621679153686"><span class="hs-identifier">password</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-211"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/login"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-212"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"username"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679153685"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-213"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"password"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679153686"><span class="hs-identifier hs-var">password</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-214"></a><span>
|
||||
</span><a name="line-215"></a><span class="hs-keyword">data</span><span> </span><a name="LoginUser"><a href="SwaggerPetstore.API.User.html#LoginUser"><span class="hs-identifier">LoginUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-216"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-217"></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.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-218"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-219"></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.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-220"></a><span>
|
||||
</span><a name="line-221"></a><span>
|
||||
</span><a name="line-222"></a><span class="hs-comment">-- *** logoutUser</span><span>
|
||||
</span><a name="line-223"></a><span>
|
||||
</span><a name="line-224"></a><span class="hs-comment">-- | @GET \/user\/logout@</span><span>
|
||||
</span><a name="line-225"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-226"></a><span class="hs-comment">-- Logs out current logged in user session</span><span>
|
||||
</span><a name="line-227"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-228"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-229"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-230"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-231"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-232"></a><span class="hs-identifier">logoutUser</span><span> </span><span>
|
||||
</span><a name="line-233"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679153665"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-234"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.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-6989586621679153666"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679153665"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-235"></a><a name="logoutUser"><a href="SwaggerPetstore.API.User.html#logoutUser"><span class="hs-identifier">logoutUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-236"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/logout"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-237"></a><span>
|
||||
</span><a name="line-238"></a><span class="hs-keyword">data</span><span> </span><a name="LogoutUser"><a href="SwaggerPetstore.API.User.html#LogoutUser"><span class="hs-identifier">LogoutUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-239"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-240"></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.User.html#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-241"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-242"></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.User.html#LogoutUser"><span class="hs-identifier hs-type">LogoutUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-243"></a><span>
|
||||
</span><a name="line-244"></a><span>
|
||||
</span><a name="line-245"></a><span class="hs-comment">-- *** updateUser</span><span>
|
||||
</span><a name="line-246"></a><span>
|
||||
</span><a name="line-247"></a><span class="hs-comment">-- | @PUT \/user\/{username}@</span><span>
|
||||
</span><a name="line-248"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-249"></a><span class="hs-comment">-- Updated user</span><span>
|
||||
</span><a name="line-250"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-251"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-252"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-253"></a><span class="hs-comment">-- Note: Has 'Produces' instances, but no response schema</span><span>
|
||||
</span><a name="line-254"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-255"></a><span class="hs-identifier">updateUser</span><span> </span><span>
|
||||
</span><a name="line-256"></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.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679153662"><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-6989586621679153662"><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-257"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679153662"><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-258"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679153663"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-259"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - name that need to be deleted</span><span>
|
||||
</span><a name="line-260"></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-261"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679153662"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679153664"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679153663"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-262"></a><a name="updateUser"><a href="SwaggerPetstore.API.User.html#updateUser"><span class="hs-identifier">updateUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679153687"><a href="#local-6989586621679153687"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679153688"><a href="#local-6989586621679153688"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-263"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679153687"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-264"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679153688"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-265"></a><span>
|
||||
</span><a name="line-266"></a><span class="hs-keyword">data</span><span> </span><a name="UpdateUser"><a href="SwaggerPetstore.API.User.html#UpdateUser"><span class="hs-identifier">UpdateUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-267"></a><span>
|
||||
</span><a name="line-268"></a><span class="hs-comment">-- | /Body Param/ "body" - Updated user object</span><span>
|
||||
</span><a name="line-269"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span>
|
||||
</span><a name="line-270"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-271"></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.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-272"></a><span class="hs-comment">-- | @application/json@</span><span>
|
||||
</span><a name="line-273"></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.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-274"></a><span>
|
||||
</span><a name="line-275"></a></pre></body></html>
|
||||
</span><a name="line-196"></a><span class="hs-comment">-- *** logoutUser</span><span>
|
||||
</span><a name="line-197"></a><span>
|
||||
</span><a name="line-198"></a><span class="hs-comment">-- | @GET \/user\/logout@</span><span>
|
||||
</span><a name="line-199"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-200"></a><span class="hs-comment">-- Logs out current logged in user session</span><span>
|
||||
</span><a name="line-201"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-202"></a><span class="hs-identifier">logoutUser</span><span> </span><span>
|
||||
</span><a name="line-203"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.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="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-204"></a><a name="logoutUser"><a href="SwaggerPetstore.API.User.html#logoutUser"><span class="hs-identifier">logoutUser</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-205"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/logout"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-206"></a><span>
|
||||
</span><a name="line-207"></a><span class="hs-keyword">data</span><span> </span><a name="LogoutUser"><a href="SwaggerPetstore.API.User.html#LogoutUser"><span class="hs-identifier">LogoutUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-208"></a><span>
|
||||
</span><a name="line-209"></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.User.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 name="line-210"></a><span>
|
||||
</span><a name="line-211"></a><span>
|
||||
</span><a name="line-212"></a><span class="hs-comment">-- *** updateUser</span><span>
|
||||
</span><a name="line-213"></a><span>
|
||||
</span><a name="line-214"></a><span class="hs-comment">-- | @PUT \/user\/{username}@</span><span>
|
||||
</span><a name="line-215"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-216"></a><span class="hs-comment">-- Updated user</span><span>
|
||||
</span><a name="line-217"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-218"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-219"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-220"></a><span class="hs-identifier">updateUser</span><span> </span><span>
|
||||
</span><a name="line-221"></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.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679154252"><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-6989586621679154252"><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-222"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679154252"><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="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-comment">-- ^ "user" - Updated user object</span><span>
|
||||
</span><a name="line-224"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - name that need to be deleted</span><span>
|
||||
</span><a name="line-225"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="SwaggerPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679154252"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-226"></a><a name="updateUser"><a href="SwaggerPetstore.API.User.html#updateUser"><span class="hs-identifier">updateUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679154265"><a href="#local-6989586621679154265"><span class="hs-identifier">user</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679154266"><a href="#local-6989586621679154266"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-227"></a><span> </span><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="SwaggerPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679154266"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-228"></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679154265"><span class="hs-identifier hs-var">user</span></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="UpdateUser"><a href="SwaggerPetstore.API.User.html#UpdateUser"><span class="hs-identifier">UpdateUser</span></a></a><span> </span><span>
|
||||
</span><a name="line-231"></a><span>
|
||||
</span><a name="line-232"></a><span class="hs-comment">-- | /Body Param/ "User" - Updated user object</span><span>
|
||||
</span><a name="line-233"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="SwaggerPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="SwaggerPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span>
|
||||
</span><a name="line-234"></a><span>
|
||||
</span><a name="line-235"></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.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-236"></a><span>
|
||||
</span><a name="line-237"></a></pre></body></html>
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -56,20 +56,20 @@ Module : SwaggerPetstore.Client
|
||||
</span><a name="line-56"></a><span>
|
||||
</span><a name="line-57"></a><span class="hs-comment">-- | send a request returning the raw http response</span><span>
|
||||
</span><a name="line-58"></a><span class="hs-identifier">dispatchLbs</span><span>
|
||||
</span><a name="line-59"></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-6989586621679124497"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124498"><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-6989586621679124499"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-59"></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-6989586621679124315"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124316"><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-6989586621679124317"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-60"></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-61"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-62"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124497"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124499"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124500"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124498"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-62"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124315"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124317"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124318"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124316"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-63"></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-64"></a><a name="dispatchLbs"><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier">dispatchLbs</span></a></a><span> </span><a name="local-6989586621679124501"><a href="#local-6989586621679124501"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124502"><a href="#local-6989586621679124502"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124503"><a href="#local-6989586621679124503"><span class="hs-identifier">request</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-65"></a><span> </span><a name="local-6989586621679124504"><a href="#local-6989586621679124504"><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-6989586621679124502"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124503"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-66"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679124501"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679124502"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124504"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||
</span><a name="line-64"></a><a name="dispatchLbs"><a href="SwaggerPetstore.Client.html#dispatchLbs"><span class="hs-identifier">dispatchLbs</span></a></a><span> </span><a name="local-6989586621679124319"><a href="#local-6989586621679124319"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124320"><a href="#local-6989586621679124320"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124321"><a href="#local-6989586621679124321"><span class="hs-identifier">request</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-65"></a><span> </span><a name="local-6989586621679124322"><a href="#local-6989586621679124322"><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-6989586621679124320"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124321"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-66"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679124319"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679124320"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124322"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||
</span><a name="line-67"></a><span>
|
||||
</span><a name="line-68"></a><span class="hs-comment">-- ** Mime</span><span>
|
||||
</span><a name="line-69"></a><span>
|
||||
</span><a name="line-70"></a><span class="hs-comment">-- | pair of decoded http body and http response</span><span>
|
||||
</span><a name="line-71"></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-6989586621679124465"><a href="#local-6989586621679124465"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></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-6989586621679124465"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ decoded http body</span><span>
|
||||
</span><a name="line-71"></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-6989586621679124283"><a href="#local-6989586621679124283"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></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-6989586621679124283"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ decoded http body</span><span>
|
||||
</span><a name="line-73"></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-74"></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-75"></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>
|
||||
@@ -83,137 +83,137 @@ Module : SwaggerPetstore.Client
|
||||
</span><a name="line-83"></a><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- | send a request returning the 'MimeResult'</span><span>
|
||||
</span><a name="line-85"></a><span class="hs-identifier">dispatchMime</span><span>
|
||||
</span><a name="line-86"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679124493"><a href="#local-6989586621679124493"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679124494"><a href="#local-6989586621679124494"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679124495"><a href="#local-6989586621679124495"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679124496"><a href="#local-6989586621679124496"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</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-6989586621679124493"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124496"><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-6989586621679124496"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679124495"><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-6989586621679124494"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-86"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679124311"><a href="#local-6989586621679124311"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679124312"><a href="#local-6989586621679124312"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679124313"><a href="#local-6989586621679124313"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679124314"><a href="#local-6989586621679124314"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</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-6989586621679124311"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124314"><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-6989586621679124314"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679124313"><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-6989586621679124312"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-87"></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-88"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-89"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124493"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124494"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124495"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124496"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-90"></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-6989586621679124495"><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-91"></a><a name="dispatchMime"><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier">dispatchMime</span></a></a><span> </span><a name="local-6989586621679124505"><a href="#local-6989586621679124505"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124506"><a href="#local-6989586621679124506"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124507"><a href="#local-6989586621679124507"><span class="hs-identifier">request</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-92"></a><span> </span><a name="local-6989586621679124508"><a href="#local-6989586621679124508"><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-6989586621679124505"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679124506"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124507"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-93"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679124509"><a href="#local-6989586621679124509"><span class="hs-identifier">statusCode</span></a></a><span> </span><span class="hs-glyph">=</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><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679124508"><span class="hs-identifier hs-var">httpResponse</span></a><span>
|
||||
</span><a name="line-94"></a><span> </span><a name="local-6989586621679124992"><a href="#local-6989586621679124992"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-glyph"><-</span><span>
|
||||
</span><a name="line-95"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="#local-6989586621679124506"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-96"></a><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-keyword">if</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679124509"><span class="hs-identifier hs-var">statusCode</span></a><span> </span><span class="hs-operator hs-var">>=</span><span> </span><span class="hs-number">400</span><span> </span><span class="hs-operator hs-var">&&</span><span> </span><a href="#local-6989586621679124509"><span class="hs-identifier hs-var">statusCode</span></a><span> </span><span class="hs-operator hs-var"><</span><span> </span><span class="hs-number">600</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-89"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124311"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124312"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124313"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124314"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-90"></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-6989586621679124313"><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-91"></a><a name="dispatchMime"><a href="SwaggerPetstore.Client.html#dispatchMime"><span class="hs-identifier">dispatchMime</span></a></a><span> </span><a name="local-6989586621679124323"><a href="#local-6989586621679124323"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124324"><a href="#local-6989586621679124324"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124325"><a href="#local-6989586621679124325"><span class="hs-identifier">request</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-92"></a><span> </span><a name="local-6989586621679124326"><a href="#local-6989586621679124326"><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-6989586621679124323"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679124324"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124325"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-93"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679124327"><a href="#local-6989586621679124327"><span class="hs-identifier">statusCode</span></a></a><span> </span><span class="hs-glyph">=</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><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679124326"><span class="hs-identifier hs-var">httpResponse</span></a><span>
|
||||
</span><a name="line-94"></a><span> </span><a name="local-6989586621679124810"><a href="#local-6989586621679124810"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-glyph"><-</span><span>
|
||||
</span><a name="line-95"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="#local-6989586621679124324"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-96"></a><span> </span><span class="hs-keyword">do</span><span> </span><span class="hs-keyword">if</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679124327"><span class="hs-identifier hs-var">statusCode</span></a><span> </span><span class="hs-operator hs-var">>=</span><span> </span><span class="hs-number">400</span><span> </span><span class="hs-operator hs-var">&&</span><span> </span><a href="#local-6989586621679124327"><span class="hs-identifier hs-var">statusCode</span></a><span> </span><span class="hs-operator hs-var"><</span><span> </span><span class="hs-number">600</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-97"></a><span> </span><span class="hs-keyword">then</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-98"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679124989"><a href="#local-6989586621679124989"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"error statusCode: "</span><span> </span><span class="hs-operator hs-var">++</span><span> </span><span class="hs-identifier hs-var">show</span><span> </span><a href="#local-6989586621679124509"><span class="hs-identifier hs-var">statusCode</span></a><span>
|
||||
</span><a name="line-99"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="SwaggerPetstore.Logging.html#levelError"><span class="hs-identifier hs-var">levelError</span></a><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-6989586621679124989"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-100"></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-6989586621679124989"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679124508"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-101"></a><span> </span><span class="hs-keyword">else</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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-6989586621679124496"><span class="hs-identifier hs-type">accept</span></a><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">responseBody</span><span> </span><a href="#local-6989586621679124508"><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-102"></a><span> </span><span class="hs-identifier hs-var">Left</span><span> </span><a name="local-6989586621679124990"><a href="#local-6989586621679124990"><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-103"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="SwaggerPetstore.Logging.html#levelError"><span class="hs-identifier hs-var">levelError</span></a><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-6989586621679124990"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-104"></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-6989586621679124990"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679124508"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-identifier hs-var">Right</span><span> </span><a name="local-6989586621679124991"><a href="#local-6989586621679124991"><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-6989586621679124991"><span class="hs-identifier hs-var">r</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-106"></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-6989586621679124992"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a href="#local-6989586621679124508"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-98"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679124807"><a href="#local-6989586621679124807"><span class="hs-identifier">s</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"error statusCode: "</span><span> </span><span class="hs-operator hs-var">++</span><span> </span><span class="hs-identifier hs-var">show</span><span> </span><a href="#local-6989586621679124327"><span class="hs-identifier hs-var">statusCode</span></a><span>
|
||||
</span><a name="line-99"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="SwaggerPetstore.Logging.html#levelError"><span class="hs-identifier hs-var">levelError</span></a><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-6989586621679124807"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-100"></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-6989586621679124807"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679124326"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-101"></a><span> </span><span class="hs-keyword">else</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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-6989586621679124314"><span class="hs-identifier hs-type">accept</span></a><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">responseBody</span><span> </span><a href="#local-6989586621679124326"><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-102"></a><span> </span><span class="hs-identifier hs-var">Left</span><span> </span><a name="local-6989586621679124808"><a href="#local-6989586621679124808"><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-103"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="SwaggerPetstore.Logging.html#levelError"><span class="hs-identifier hs-var">levelError</span></a><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-6989586621679124808"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-104"></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-6989586621679124808"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679124326"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-identifier hs-var">Right</span><span> </span><a name="local-6989586621679124809"><a href="#local-6989586621679124809"><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-6989586621679124809"><span class="hs-identifier hs-var">r</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-106"></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-6989586621679124810"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a href="#local-6989586621679124326"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-107"></a><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- | like 'dispatchMime', but only returns the decoded http body</span><span>
|
||||
</span><a name="line-109"></a><span class="hs-identifier">dispatchMime'</span><span>
|
||||
</span><a name="line-110"></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-6989586621679124489"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124490"><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-6989586621679124490"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679124491"><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-6989586621679124492"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-110"></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-6989586621679124307"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124308"><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-6989586621679124308"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679124309"><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-6989586621679124310"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-111"></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-112"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-113"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124489"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124492"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124491"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124490"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-114"></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-6989586621679124491"><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-115"></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-6989586621679124993"><a href="#local-6989586621679124993"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124994"><a href="#local-6989586621679124994"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124995"><a href="#local-6989586621679124995"><span class="hs-identifier">request</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-116"></a><span> </span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a name="local-6989586621679124996"><a href="#local-6989586621679124996"><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-6989586621679124993"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679124994"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124995"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-117"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679124996"><span class="hs-identifier hs-var">parsedResult</span></a><span>
|
||||
</span><a name="line-113"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124307"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124310"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124309"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124308"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-114"></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-6989586621679124309"><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-115"></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-6989586621679124811"><a href="#local-6989586621679124811"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124812"><a href="#local-6989586621679124812"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124813"><a href="#local-6989586621679124813"><span class="hs-identifier">request</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-116"></a><span> </span><a href="SwaggerPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a name="local-6989586621679124814"><a href="#local-6989586621679124814"><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-6989586621679124811"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679124812"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124813"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-117"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679124814"><span class="hs-identifier hs-var">parsedResult</span></a><span>
|
||||
</span><a name="line-118"></a><span>
|
||||
</span><a name="line-119"></a><span class="hs-comment">-- ** Unsafe</span><span>
|
||||
</span><a name="line-120"></a><span>
|
||||
</span><a name="line-121"></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-122"></a><span class="hs-identifier">dispatchLbsUnsafe</span><span>
|
||||
</span><a name="line-123"></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-6989586621679124485"><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-6989586621679124486"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-123"></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-6989586621679124303"><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-6989586621679124304"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-124"></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-125"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-126"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124487"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124486"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124488"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124485"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-126"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124305"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124304"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124306"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124303"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-127"></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-128"></a><a name="dispatchLbsUnsafe"><a href="SwaggerPetstore.Client.html#dispatchLbsUnsafe"><span class="hs-identifier">dispatchLbsUnsafe</span></a></a><span> </span><a name="local-6989586621679124997"><a href="#local-6989586621679124997"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124998"><a href="#local-6989586621679124998"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124999"><a href="#local-6989586621679124999"><span class="hs-identifier">request</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-129"></a><span> </span><a name="local-6989586621679125000"><a href="#local-6989586621679125000"><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-6989586621679124998"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124999"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-130"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679124997"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679124998"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679125000"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||
</span><a name="line-128"></a><a name="dispatchLbsUnsafe"><a href="SwaggerPetstore.Client.html#dispatchLbsUnsafe"><span class="hs-identifier">dispatchLbsUnsafe</span></a></a><span> </span><a name="local-6989586621679124815"><a href="#local-6989586621679124815"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124816"><a href="#local-6989586621679124816"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124817"><a href="#local-6989586621679124817"><span class="hs-identifier">request</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-129"></a><span> </span><a name="local-6989586621679124818"><a href="#local-6989586621679124818"><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-6989586621679124816"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124817"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-130"></a><span> </span><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679124815"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679124816"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679124818"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||
</span><a name="line-131"></a><span>
|
||||
</span><a name="line-132"></a><span class="hs-comment">-- | dispatch an InitRequest</span><span>
|
||||
</span><a name="line-133"></a><span class="hs-identifier">dispatchInitUnsafe</span><span>
|
||||
</span><a name="line-134"></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-135"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-136"></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-6989586621679124481"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124482"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124483"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124484"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ init request</span><span>
|
||||
</span><a name="line-136"></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-6989586621679124299"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124300"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124301"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124302"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ init request</span><span>
|
||||
</span><a name="line-137"></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-138"></a><a name="dispatchInitUnsafe"><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier">dispatchInitUnsafe</span></a></a><span> </span><a name="local-6989586621679125001"><a href="#local-6989586621679125001"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679125002"><a href="#local-6989586621679125002"><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-6989586621679125003"><a href="#local-6989586621679125003"><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-139"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><a href="#local-6989586621679125004"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="#local-6989586621679125002"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-140"></a><span> </span><span class="hs-keyword">do</span><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679125004"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><a href="#local-6989586621679125006"><span class="hs-identifier hs-var">requestLogMsg</span></a><span>
|
||||
</span><a name="line-141"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679125004"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</span></a><span> </span><a href="#local-6989586621679125007"><span class="hs-identifier hs-var">requestDbgLogMsg</span></a><span>
|
||||
</span><a name="line-142"></a><span> </span><a name="local-6989586621679125063"><a href="#local-6989586621679125063"><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-6989586621679125003"><span class="hs-identifier hs-var">req</span></a><span> </span><a href="#local-6989586621679125001"><span class="hs-identifier hs-var">manager</span></a><span>
|
||||
</span><a name="line-143"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679125004"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679125009"><span class="hs-identifier hs-var">responseLogMsg</span></a><span> </span><a href="#local-6989586621679125063"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-144"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679125004"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</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-6989586621679125063"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-145"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679125063"><span class="hs-identifier hs-var">res</span></a><span>
|
||||
</span><a name="line-138"></a><a name="dispatchInitUnsafe"><a href="SwaggerPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier">dispatchInitUnsafe</span></a></a><span> </span><a name="local-6989586621679124819"><a href="#local-6989586621679124819"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679124820"><a href="#local-6989586621679124820"><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-6989586621679124821"><a href="#local-6989586621679124821"><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-139"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><a href="#local-6989586621679124822"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="#local-6989586621679124820"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-140"></a><span> </span><span class="hs-keyword">do</span><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679124822"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><a href="#local-6989586621679124824"><span class="hs-identifier hs-var">requestLogMsg</span></a><span>
|
||||
</span><a name="line-141"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679124822"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</span></a><span> </span><a href="#local-6989586621679124825"><span class="hs-identifier hs-var">requestDbgLogMsg</span></a><span>
|
||||
</span><a name="line-142"></a><span> </span><a name="local-6989586621679124881"><a href="#local-6989586621679124881"><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-6989586621679124821"><span class="hs-identifier hs-var">req</span></a><span> </span><a href="#local-6989586621679124819"><span class="hs-identifier hs-var">manager</span></a><span>
|
||||
</span><a name="line-143"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679124822"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679124827"><span class="hs-identifier hs-var">responseLogMsg</span></a><span> </span><a href="#local-6989586621679124881"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-144"></a><span> </span><a href="SwaggerPetstore.Logging.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679124822"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="SwaggerPetstore.Logging.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</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-6989586621679124881"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-145"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679124881"><span class="hs-identifier hs-var">res</span></a><span>
|
||||
</span><a name="line-146"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-147"></a><span> </span><a name="local-6989586621679125004"><a href="#local-6989586621679125004"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"Client"</span><span>
|
||||
</span><a name="line-148"></a><span> </span><a name="local-6989586621679125005"><a href="#local-6989586621679125005"><span class="hs-identifier">endpoint</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-147"></a><span> </span><a name="local-6989586621679124822"><a href="#local-6989586621679124822"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"Client"</span><span>
|
||||
</span><a name="line-148"></a><span> </span><a name="local-6989586621679124823"><a href="#local-6989586621679124823"><span class="hs-identifier">endpoint</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-149"></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-150"></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-151"></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-6989586621679125003"><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-6989586621679125003"><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-6989586621679125003"><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-6989586621679125003"><span class="hs-identifier hs-var">req</span></a><span>
|
||||
</span><a name="line-152"></a><span> </span><a name="local-6989586621679125006"><a href="#local-6989586621679125006"><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-6989586621679125005"><span class="hs-identifier hs-var">endpoint</span></a><span>
|
||||
</span><a name="line-153"></a><span> </span><a name="local-6989586621679125007"><a href="#local-6989586621679125007"><span class="hs-identifier">requestDbgLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-154"></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-6989586621679125003"><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-155"></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-6989586621679125003"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-156"></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-6989586621679125010"><a href="#local-6989586621679125010"><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-6989586621679125010"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-151"></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-6989586621679124821"><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-6989586621679124821"><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-6989586621679124821"><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-6989586621679124821"><span class="hs-identifier hs-var">req</span></a><span>
|
||||
</span><a name="line-152"></a><span> </span><a name="local-6989586621679124824"><a href="#local-6989586621679124824"><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-6989586621679124823"><span class="hs-identifier hs-var">endpoint</span></a><span>
|
||||
</span><a name="line-153"></a><span> </span><a name="local-6989586621679124825"><a href="#local-6989586621679124825"><span class="hs-identifier">requestDbgLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-154"></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-6989586621679124821"><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-155"></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-6989586621679124821"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-156"></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-6989586621679124828"><a href="#local-6989586621679124828"><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-6989586621679124828"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-157"></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-158"></a><span> </span><a name="local-6989586621679125008"><a href="#local-6989586621679125008"><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-159"></a><span> </span><a name="local-6989586621679125009"><a href="#local-6989586621679125009"><span class="hs-identifier">responseLogMsg</span></a></a><span> </span><a name="local-6989586621679125011"><a href="#local-6989586621679125011"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-160"></a><span> </span><span class="hs-string">"RES:statusCode="</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679125008"><span class="hs-identifier hs-var">responseStatusCode</span></a><span> </span><a href="#local-6989586621679125011"><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-6989586621679125005"><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-158"></a><span> </span><a name="local-6989586621679124826"><a href="#local-6989586621679124826"><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-159"></a><span> </span><a name="local-6989586621679124827"><a href="#local-6989586621679124827"><span class="hs-identifier">responseLogMsg</span></a></a><span> </span><a name="local-6989586621679124829"><a href="#local-6989586621679124829"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-160"></a><span> </span><span class="hs-string">"RES:statusCode="</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679124826"><span class="hs-identifier hs-var">responseStatusCode</span></a><span> </span><a href="#local-6989586621679124829"><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-6989586621679124823"><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-161"></a><span>
|
||||
</span><a name="line-162"></a><span class="hs-comment">-- * InitRequest</span><span>
|
||||
</span><a name="line-163"></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-comment">-- | wraps an http-client 'Request' with request/response type parameters</span><span>
|
||||
</span><a name="line-165"></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-6989586621679124461"><a href="#local-6989586621679124461"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679124462"><a href="#local-6989586621679124462"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679124463"><a href="#local-6989586621679124463"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679124464"><a href="#local-6989586621679124464"><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-165"></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-6989586621679124279"><a href="#local-6989586621679124279"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679124280"><a href="#local-6989586621679124280"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679124281"><a href="#local-6989586621679124281"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679124282"><a href="#local-6989586621679124282"><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-166"></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-167"></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-168"></a><span>
|
||||
</span><a name="line-169"></a><span class="hs-comment">-- | Build an http-client 'Request' record from the supplied config and request</span><span>
|
||||
</span><a name="line-170"></a><span class="hs-identifier">_toInitRequest</span><span>
|
||||
</span><a name="line-171"></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-6989586621679124477"><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-6989586621679124478"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-171"></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-6989586621679124295"><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-6989586621679124296"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-172"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-173"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124479"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124478"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124480"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124477"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-174"></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-6989586621679124479"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124478"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124480"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124477"><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-175"></a><a name="_toInitRequest"><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier">_toInitRequest</span></a></a><span> </span><a name="local-6989586621679125064"><a href="#local-6989586621679125064"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679125065"><a href="#local-6989586621679125065"><span class="hs-identifier">req0</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-176"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="#local-6989586621679125064"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-6989586621679125066"><a href="#local-6989586621679125066"><span class="hs-identifier">parsedReq</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">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-6989586621679125064"><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">rUrlPath</span><span> </span><a href="#local-6989586621679125065"><span class="hs-identifier hs-var">req0</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-178"></a><span> </span><a name="local-6989586621679125067"><a href="#local-6989586621679125067"><span class="hs-identifier">req1</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><a href="SwaggerPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier hs-var">_applyAuthMethods</span></a><span> </span><a href="#local-6989586621679125065"><span class="hs-identifier hs-var">req0</span></a><span> </span><a href="#local-6989586621679125064"><span class="hs-identifier hs-var">config</span></a><span>
|
||||
</span><a name="line-173"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679124297"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124296"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124298"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124295"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-174"></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-6989586621679124297"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124296"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124298"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124295"><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-175"></a><a name="_toInitRequest"><a href="SwaggerPetstore.Client.html#_toInitRequest"><span class="hs-identifier">_toInitRequest</span></a></a><span> </span><a name="local-6989586621679124882"><a href="#local-6989586621679124882"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679124883"><a href="#local-6989586621679124883"><span class="hs-identifier">req0</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-176"></a><span> </span><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="#local-6989586621679124882"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-6989586621679124884"><a href="#local-6989586621679124884"><span class="hs-identifier">parsedReq</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">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-6989586621679124882"><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">rUrlPath</span><span> </span><a href="#local-6989586621679124883"><span class="hs-identifier hs-var">req0</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-178"></a><span> </span><a name="local-6989586621679124885"><a href="#local-6989586621679124885"><span class="hs-identifier">req1</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><a href="SwaggerPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier hs-var">_applyAuthMethods</span></a><span> </span><a href="#local-6989586621679124883"><span class="hs-identifier hs-var">req0</span></a><span> </span><a href="#local-6989586621679124882"><span class="hs-identifier hs-var">config</span></a><span>
|
||||
</span><a name="line-179"></a><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">when</span><span>
|
||||
</span><a name="line-180"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configValidateAuthMethods</span><span> </span><a href="#local-6989586621679125064"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">&&</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">not</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">null</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">rAuthTypes</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679125067"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-181"></a><span> </span><span class="hs-special">(</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><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethodException"><span class="hs-identifier hs-var">AuthMethodException</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-string">"AuthMethod not configured: "</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">head</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">rAuthTypes</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679125067"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-182"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679125068"><a href="#local-6989586621679125068"><span class="hs-identifier">req2</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679125067"><span class="hs-identifier hs-var">req1</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier hs-var">_setAcceptHeader</span></a><span>
|
||||
</span><a name="line-183"></a><span> </span><a name="local-6989586621679125069"><a href="#local-6989586621679125069"><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-6989586621679125064"><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">rParams</span><span> </span><a href="#local-6989586621679125068"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-184"></a><span> </span><a name="local-6989586621679125070"><a href="#local-6989586621679125070"><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">rParams</span><span> </span><a href="#local-6989586621679125068"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-185"></a><span> </span><a name="local-6989586621679125071"><a href="#local-6989586621679125071"><span class="hs-identifier">pReq</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679125066"><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-6989586621679125068"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-186"></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-6989586621679125069"><span class="hs-identifier hs-var">reqHeaders</span></a><span>
|
||||
</span><a name="line-187"></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-6989586621679125070"><span class="hs-identifier hs-var">reqQuery</span></a><span>
|
||||
</span><a name="line-180"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configValidateAuthMethods</span><span> </span><a href="#local-6989586621679124882"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">&&</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">not</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">null</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">rAuthTypes</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679124885"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-181"></a><span> </span><span class="hs-special">(</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><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethodException"><span class="hs-identifier hs-var">AuthMethodException</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-string">"AuthMethod not configured: "</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">head</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">rAuthTypes</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679124885"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-182"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679124886"><a href="#local-6989586621679124886"><span class="hs-identifier">req2</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679124885"><span class="hs-identifier hs-var">req1</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier hs-var">_setAcceptHeader</span></a><span>
|
||||
</span><a name="line-183"></a><span> </span><a name="local-6989586621679124887"><a href="#local-6989586621679124887"><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-6989586621679124882"><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">rParams</span><span> </span><a href="#local-6989586621679124886"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-184"></a><span> </span><a name="local-6989586621679124888"><a href="#local-6989586621679124888"><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">rParams</span><span> </span><a href="#local-6989586621679124886"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-185"></a><span> </span><a name="local-6989586621679124889"><a href="#local-6989586621679124889"><span class="hs-identifier">pReq</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679124884"><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-6989586621679124886"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-186"></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-6989586621679124887"><span class="hs-identifier hs-var">reqHeaders</span></a><span>
|
||||
</span><a name="line-187"></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-6989586621679124888"><span class="hs-identifier hs-var">reqQuery</span></a><span>
|
||||
</span><a name="line-188"></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-189"></a><span> </span><a name="local-6989586621679125076"><a href="#local-6989586621679125076"><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">rParams</span><span> </span><a href="#local-6989586621679125068"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-190"></a><span> </span><a href="SwaggerPetstore.Core.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-6989586621679125071"><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-191"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a name="local-6989586621679125072"><a href="#local-6989586621679125072"><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-6989586621679125071"><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-6989586621679125072"><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-192"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a name="local-6989586621679125073"><a href="#local-6989586621679125073"><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-6989586621679125071"><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-6989586621679125073"><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-193"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679125074"><a href="#local-6989586621679125074"><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-6989586621679125071"><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-6989586621679125074"><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-194"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679125075"><a href="#local-6989586621679125075"><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-6989586621679125075"><span class="hs-identifier hs-var">parts</span></a><span> </span><a href="#local-6989586621679125071"><span class="hs-identifier hs-var">pReq</span></a><span>
|
||||
</span><a name="line-189"></a><span> </span><a name="local-6989586621679124894"><a href="#local-6989586621679124894"><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">rParams</span><span> </span><a href="#local-6989586621679124886"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-190"></a><span> </span><a href="SwaggerPetstore.Core.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-6989586621679124889"><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-191"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a name="local-6989586621679124890"><a href="#local-6989586621679124890"><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-6989586621679124889"><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-6989586621679124890"><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-192"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a name="local-6989586621679124891"><a href="#local-6989586621679124891"><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-6989586621679124889"><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-6989586621679124891"><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-193"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679124892"><a href="#local-6989586621679124892"><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-6989586621679124889"><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-6989586621679124892"><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-194"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679124893"><a href="#local-6989586621679124893"><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-6989586621679124893"><span class="hs-identifier hs-var">parts</span></a><span> </span><a href="#local-6989586621679124889"><span class="hs-identifier hs-var">pReq</span></a><span>
|
||||
</span><a name="line-195"></a><span>
|
||||
</span><a name="line-196"></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-6989586621679125076"><span class="hs-identifier hs-var">outReq</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-196"></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-6989586621679124894"><span class="hs-identifier hs-var">outReq</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-197"></a><span>
|
||||
</span><a name="line-198"></a><span class="hs-comment">-- | modify the underlying Request</span><span>
|
||||
</span><a name="line-199"></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-6989586621679124473"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124474"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124475"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124476"><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-6989586621679124473"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124474"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124475"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124476"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-200"></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-6989586621679125077"><a href="#local-6989586621679125077"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679125078"><a href="#local-6989586621679125078"><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-6989586621679125078"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679125077"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-199"></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-6989586621679124291"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124292"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124293"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124294"><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-6989586621679124291"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124292"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124293"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124294"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-200"></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-6989586621679124895"><a href="#local-6989586621679124895"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679124896"><a href="#local-6989586621679124896"><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-6989586621679124896"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679124895"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-201"></a><span>
|
||||
</span><a name="line-202"></a><span class="hs-comment">-- | modify the underlying Request (monadic)</span><span>
|
||||
</span><a name="line-203"></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-6989586621679124468"><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-6989586621679124469"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124470"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124471"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124472"><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-6989586621679124468"><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-6989586621679124468"><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-6989586621679124469"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124470"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124471"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124472"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-204"></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-6989586621679125079"><a href="#local-6989586621679125079"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679125080"><a href="#local-6989586621679125080"><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-6989586621679125080"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679125079"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-203"></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-6989586621679124286"><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-6989586621679124287"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124288"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124289"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124290"><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-6989586621679124286"><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-6989586621679124286"><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-6989586621679124287"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679124288"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679124289"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679124290"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-204"></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-6989586621679124897"><a href="#local-6989586621679124897"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679124898"><a href="#local-6989586621679124898"><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-6989586621679124898"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679124897"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-205"></a><span>
|
||||
</span><a name="line-206"></a><span class="hs-comment">-- ** Logging </span><span>
|
||||
</span><a name="line-207"></a><span>
|
||||
</span><a name="line-208"></a><span class="hs-comment">-- | Run a block using the configured logger instance</span><span>
|
||||
</span><a name="line-209"></a><span class="hs-identifier">runConfigLog</span><span>
|
||||
</span><a name="line-210"></a><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">MonadIO</span><span> </span><a href="#local-6989586621679124467"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-211"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679124467"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-212"></a><a name="runConfigLog"><a href="SwaggerPetstore.Client.html#runConfigLog"><span class="hs-identifier">runConfigLog</span></a></a><span> </span><a name="local-6989586621679125081"><a href="#local-6989586621679125081"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><a href="#local-6989586621679125081"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679125081"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-210"></a><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">MonadIO</span><span> </span><a href="#local-6989586621679124285"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-211"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679124285"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-212"></a><a name="runConfigLog"><a href="SwaggerPetstore.Client.html#runConfigLog"><span class="hs-identifier">runConfigLog</span></a></a><span> </span><a name="local-6989586621679124899"><a href="#local-6989586621679124899"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><a href="#local-6989586621679124899"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679124899"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-213"></a><span>
|
||||
</span><a name="line-214"></a><span class="hs-comment">-- | Run a block using the configured logger instance (logs exceptions)</span><span>
|
||||
</span><a name="line-215"></a><span class="hs-identifier">runConfigLogWithExceptions</span><span>
|
||||
</span><a name="line-216"></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-6989586621679124466"><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-6989586621679124466"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-217"></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.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679124466"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-218"></a><a name="runConfigLogWithExceptions"><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier">runConfigLogWithExceptions</span></a></a><span> </span><a name="local-6989586621679125082"><a href="#local-6989586621679125082"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679125083"><a href="#local-6989586621679125083"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#runConfigLog"><span class="hs-identifier hs-var">runConfigLog</span></a><span> </span><a href="#local-6989586621679125083"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Logging.html#logExceptions"><span class="hs-identifier hs-var">logExceptions</span></a><span> </span><a href="#local-6989586621679125082"><span class="hs-identifier hs-var">src</span></a><span>
|
||||
</span><a name="line-216"></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-6989586621679124284"><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-6989586621679124284"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-217"></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.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Logging.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679124284"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-218"></a><a name="runConfigLogWithExceptions"><a href="SwaggerPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier">runConfigLogWithExceptions</span></a></a><span> </span><a name="local-6989586621679124900"><a href="#local-6989586621679124900"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679124901"><a href="#local-6989586621679124901"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Client.html#runConfigLog"><span class="hs-identifier hs-var">runConfigLog</span></a><span> </span><a href="#local-6989586621679124901"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Logging.html#logExceptions"><span class="hs-identifier hs-var">logExceptions</span></a><span> </span><a href="#local-6989586621679124900"><span class="hs-identifier hs-var">src</span></a><span>
|
||||
</span><a name="line-219"></a></pre></body></html>
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -82,11 +82,11 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- | display the config</span><span>
|
||||
</span><a name="line-84"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-85"></a><span> </span><a name="local-8214565720323791630"><span class="hs-identifier">show</span></a><span> </span><a name="local-6989586621679114790"><a href="#local-6989586621679114790"><span class="hs-identifier">c</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-85"></a><span> </span><a name="local-8214565720323791630"><span class="hs-identifier">show</span></a><span> </span><a name="local-6989586621679114608"><a href="#local-6989586621679114608"><span class="hs-identifier">c</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-86"></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-87"></a><span> </span><span class="hs-string">"{ configHost = %v, configUserAgent = %v, ..}"</span><span>
|
||||
</span><a name="line-88"></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-6989586621679114790"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-89"></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-6989586621679114790"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-88"></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-6989586621679114608"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-89"></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-6989586621679114608"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-90"></a><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">-- | constructs a default SwaggerPetstoreConfig</span><span>
|
||||
</span><a name="line-92"></a><span class="hs-comment">--</span><span>
|
||||
@@ -100,36 +100,36 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-100"></a><span class="hs-comment">--</span><span>
|
||||
</span><a name="line-101"></a><span class="hs-identifier">newConfig</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-102"></a><a name="newConfig"><a href="SwaggerPetstore.Core.html#newConfig"><span class="hs-identifier">newConfig</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-103"></a><span> </span><a name="local-6989586621679115241"><a href="#local-6989586621679115241"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Logging.html#initLogContext"><span class="hs-identifier hs-var">initLogContext</span></a><span>
|
||||
</span><a name="line-103"></a><span> </span><a name="local-6989586621679115059"><a href="#local-6989586621679115059"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Logging.html#initLogContext"><span class="hs-identifier hs-var">initLogContext</span></a><span>
|
||||
</span><a name="line-104"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-var">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configHost</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"http://petstore.swagger.io:80/v2"</span><span>
|
||||
</span><a name="line-106"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configUserAgent</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"swagger-petstore/0.1.0.0"</span><span>
|
||||
</span><a name="line-107"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span>
|
||||
</span><a name="line-108"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115241"><span class="hs-identifier hs-var">logCxt</span></a><span>
|
||||
</span><a name="line-108"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115059"><span class="hs-identifier hs-var">logCxt</span></a><span>
|
||||
</span><a name="line-109"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configAuthMethods</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-110"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">configValidateAuthMethods</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">True</span><span>
|
||||
</span><a name="line-111"></a><span> </span><span class="hs-special">}</span><span> </span><span>
|
||||
</span><a name="line-112"></a><span>
|
||||
</span><a name="line-113"></a><span class="hs-comment">-- | updates config use AuthMethod on matching requests</span><span>
|
||||
</span><a name="line-114"></a><span class="hs-identifier">addAuthMethod</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679115240"><span class="hs-identifier hs-type">auth</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115240"><span class="hs-identifier hs-type">auth</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-115"></a><a name="addAuthMethod"><a href="SwaggerPetstore.Core.html#addAuthMethod"><span class="hs-identifier">addAuthMethod</span></a></a><span> </span><a name="local-6989586621679115242"><a href="#local-6989586621679115242"><span class="hs-identifier">config</span></a></a><span class="hs-glyph">@</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-var">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-special">{</span><span class="hs-identifier">configAuthMethods</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">as</span><span class="hs-special">}</span><span> </span><a name="local-6989586621679115244"><a href="#local-6989586621679115244"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-116"></a><span> </span><a href="#local-6989586621679115242"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configAuthMethods</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a href="#local-6989586621679115244"><span class="hs-identifier hs-var">a</span></a><span> </span><span class="hs-glyph">:</span><span> </span><span class="hs-keyword">as</span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-114"></a><span class="hs-identifier">addAuthMethod</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679115058"><span class="hs-identifier hs-type">auth</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115058"><span class="hs-identifier hs-type">auth</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-115"></a><a name="addAuthMethod"><a href="SwaggerPetstore.Core.html#addAuthMethod"><span class="hs-identifier">addAuthMethod</span></a></a><span> </span><a name="local-6989586621679115060"><a href="#local-6989586621679115060"><span class="hs-identifier">config</span></a></a><span class="hs-glyph">@</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-var">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-special">{</span><span class="hs-identifier">configAuthMethods</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">as</span><span class="hs-special">}</span><span> </span><a name="local-6989586621679115062"><a href="#local-6989586621679115062"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-116"></a><span> </span><a href="#local-6989586621679115060"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configAuthMethods</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a href="#local-6989586621679115062"><span class="hs-identifier hs-var">a</span></a><span> </span><span class="hs-glyph">:</span><span> </span><span class="hs-keyword">as</span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-117"></a><span>
|
||||
</span><a name="line-118"></a><span class="hs-comment">-- | updates the config to use stdout logging</span><span>
|
||||
</span><a name="line-119"></a><span class="hs-identifier">withStdoutLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.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">IO</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-120"></a><a name="withStdoutLogging"><a href="SwaggerPetstore.Core.html#withStdoutLogging"><span class="hs-identifier">withStdoutLogging</span></a></a><span> </span><a name="local-6989586621679115245"><a href="#local-6989586621679115245"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-121"></a><span> </span><a name="local-6989586621679115246"><a href="#local-6989586621679115246"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Logging.html#stdoutLoggingContext"><span class="hs-identifier hs-var">stdoutLoggingContext</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679115245"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-122"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679115245"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#stdoutLoggingExec"><span class="hs-identifier hs-var">stdoutLoggingExec</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115246"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-120"></a><a name="withStdoutLogging"><a href="SwaggerPetstore.Core.html#withStdoutLogging"><span class="hs-identifier">withStdoutLogging</span></a></a><span> </span><a name="local-6989586621679115063"><a href="#local-6989586621679115063"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-121"></a><span> </span><a name="local-6989586621679115064"><a href="#local-6989586621679115064"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Logging.html#stdoutLoggingContext"><span class="hs-identifier hs-var">stdoutLoggingContext</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679115063"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-122"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679115063"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#stdoutLoggingExec"><span class="hs-identifier hs-var">stdoutLoggingExec</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115064"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-123"></a><span>
|
||||
</span><a name="line-124"></a><span class="hs-comment">-- | updates the config to use stderr logging</span><span>
|
||||
</span><a name="line-125"></a><span class="hs-identifier">withStderrLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.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">IO</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-126"></a><a name="withStderrLogging"><a href="SwaggerPetstore.Core.html#withStderrLogging"><span class="hs-identifier">withStderrLogging</span></a></a><span> </span><a name="local-6989586621679115247"><a href="#local-6989586621679115247"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-127"></a><span> </span><a name="local-6989586621679115248"><a href="#local-6989586621679115248"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Logging.html#stderrLoggingContext"><span class="hs-identifier hs-var">stderrLoggingContext</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679115247"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-128"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679115247"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#stderrLoggingExec"><span class="hs-identifier hs-var">stderrLoggingExec</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115248"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-126"></a><a name="withStderrLogging"><a href="SwaggerPetstore.Core.html#withStderrLogging"><span class="hs-identifier">withStderrLogging</span></a></a><span> </span><a name="local-6989586621679115065"><a href="#local-6989586621679115065"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-127"></a><span> </span><a name="local-6989586621679115066"><a href="#local-6989586621679115066"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="SwaggerPetstore.Logging.html#stderrLoggingContext"><span class="hs-identifier hs-var">stderrLoggingContext</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configLogContext</span><span> </span><a href="#local-6989586621679115065"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-128"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679115065"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#stderrLoggingExec"><span class="hs-identifier hs-var">stderrLoggingExec</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier">configLogContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115066"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-129"></a><span>
|
||||
</span><a name="line-130"></a><span class="hs-comment">-- | updates the config to disable logging</span><span>
|
||||
</span><a name="line-131"></a><span class="hs-identifier">withNoLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-132"></a><a name="withNoLogging"><a href="SwaggerPetstore.Core.html#withNoLogging"><span class="hs-identifier">withNoLogging</span></a></a><span> </span><a name="local-6989586621679115249"><a href="#local-6989586621679115249"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115249"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#runNullLogExec"><span class="hs-identifier hs-var">runNullLogExec</span></a><span class="hs-special">}</span><span>
|
||||
</span><a name="line-132"></a><a name="withNoLogging"><a href="SwaggerPetstore.Core.html#withNoLogging"><span class="hs-identifier">withNoLogging</span></a></a><span> </span><a name="local-6989586621679115067"><a href="#local-6989586621679115067"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115067"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">configLogExecWithContext</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Logging.html#runNullLogExec"><span class="hs-identifier hs-var">runNullLogExec</span></a><span class="hs-special">}</span><span>
|
||||
</span><a name="line-133"></a><span> </span><span>
|
||||
</span><a name="line-134"></a><span class="hs-comment">-- * SwaggerPetstoreRequest</span><span>
|
||||
</span><a name="line-135"></a><span>
|
||||
@@ -141,7 +141,7 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-141"></a><span class="hs-comment">-- * contentType - 'MimeType' associated with request body</span><span>
|
||||
</span><a name="line-142"></a><span class="hs-comment">-- * res - response model</span><span>
|
||||
</span><a name="line-143"></a><span class="hs-comment">-- * accept - 'MimeType' associated with response body</span><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">data</span><span> </span><a name="SwaggerPetstoreRequest"><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier">SwaggerPetstoreRequest</span></a></a><span> </span><a name="local-6989586621679114394"><a href="#local-6989586621679114394"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679114395"><a href="#local-6989586621679114395"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679114396"><a href="#local-6989586621679114396"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679114397"><a href="#local-6989586621679114397"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="SwaggerPetstoreRequest"><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier">SwaggerPetstoreRequest</span></a></a><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">data</span><span> </span><a name="SwaggerPetstoreRequest"><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier">SwaggerPetstoreRequest</span></a></a><span> </span><a name="local-6989586621679114212"><a href="#local-6989586621679114212"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679114213"><a href="#local-6989586621679114213"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679114214"><a href="#local-6989586621679114214"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679114215"><a href="#local-6989586621679114215"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="SwaggerPetstoreRequest"><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier">SwaggerPetstoreRequest</span></a></a><span>
|
||||
</span><a name="line-145"></a><span> </span><span class="hs-special">{</span><span> </span><a name="rMethod"><a href="SwaggerPetstore.Core.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-146"></a><span> </span><span class="hs-special">,</span><span> </span><a name="rUrlPath"><a href="SwaggerPetstore.Core.html#rUrlPath"><span class="hs-identifier">rUrlPath</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-147"></a><span> </span><span class="hs-special">,</span><span> </span><a name="rParams"><a href="SwaggerPetstore.Core.html#rParams"><span class="hs-identifier">rParams</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span> </span><span class="hs-comment">-- ^ params of SwaggerPetstoreRequest</span><span>
|
||||
@@ -150,47 +150,47 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-150"></a><span> </span><span class="hs-keyword">deriving</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">Show</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-151"></a><span>
|
||||
</span><a name="line-152"></a><span class="hs-comment">-- | 'rMethod' Lens</span><span>
|
||||
</span><a name="line-153"></a><span class="hs-identifier">rMethodL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115236"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115237"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115238"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115239"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</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><a name="line-154"></a><a name="rMethodL"><a href="SwaggerPetstore.Core.html#rMethodL"><span class="hs-identifier">rMethodL</span></a></a><span> </span><a name="local-6989586621679115250"><a href="#local-6989586621679115250"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</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-6989586621679115255"><a href="#local-6989586621679115255"><span class="hs-identifier">rMethod</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115255"><span class="hs-identifier hs-var">rMethod</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-6989586621679115250"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115251"><span class="hs-identifier hs-var">rMethod</span></a><span>
|
||||
</span><a name="line-153"></a><span class="hs-identifier">rMethodL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115054"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115055"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115056"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115057"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</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><a name="line-154"></a><a name="rMethodL"><a href="SwaggerPetstore.Core.html#rMethodL"><span class="hs-identifier">rMethodL</span></a></a><span> </span><a name="local-6989586621679115068"><a href="#local-6989586621679115068"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</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-6989586621679115073"><a href="#local-6989586621679115073"><span class="hs-identifier">rMethod</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115073"><span class="hs-identifier hs-var">rMethod</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-6989586621679115068"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115069"><span class="hs-identifier hs-var">rMethod</span></a><span>
|
||||
</span><a name="line-155"></a><span class="hs-pragma">{-# INLINE rMethodL #-}</span><span>
|
||||
</span><a name="line-156"></a><span>
|
||||
</span><a name="line-157"></a><span class="hs-comment">-- | 'rUrlPath' Lens</span><span>
|
||||
</span><a name="line-158"></a><span class="hs-identifier">rUrlPathL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115232"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115233"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115234"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115235"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</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><a name="line-159"></a><a name="rUrlPathL"><a href="SwaggerPetstore.Core.html#rUrlPathL"><span class="hs-identifier">rUrlPathL</span></a></a><span> </span><a name="local-6989586621679115269"><a href="#local-6989586621679115269"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</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-6989586621679115274"><a href="#local-6989586621679115274"><span class="hs-identifier">rUrlPath</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115274"><span class="hs-identifier hs-var">rUrlPath</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-6989586621679115269"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115271"><span class="hs-identifier hs-var">rUrlPath</span></a><span>
|
||||
</span><a name="line-158"></a><span class="hs-identifier">rUrlPathL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115050"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115051"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115052"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115053"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</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><a name="line-159"></a><a name="rUrlPathL"><a href="SwaggerPetstore.Core.html#rUrlPathL"><span class="hs-identifier">rUrlPathL</span></a></a><span> </span><a name="local-6989586621679115087"><a href="#local-6989586621679115087"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</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-6989586621679115092"><a href="#local-6989586621679115092"><span class="hs-identifier">rUrlPath</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115092"><span class="hs-identifier hs-var">rUrlPath</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-6989586621679115087"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115089"><span class="hs-identifier hs-var">rUrlPath</span></a><span>
|
||||
</span><a name="line-160"></a><span class="hs-pragma">{-# INLINE rUrlPathL #-}</span><span>
|
||||
</span><a name="line-161"></a><span>
|
||||
</span><a name="line-162"></a><span class="hs-comment">-- | 'rParams' Lens</span><span>
|
||||
</span><a name="line-163"></a><span class="hs-identifier">rParamsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115228"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115229"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115230"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115231"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span>
|
||||
</span><a name="line-164"></a><a name="rParamsL"><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier">rParamsL</span></a></a><span> </span><a name="local-6989586621679115275"><a href="#local-6989586621679115275"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</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-6989586621679115280"><a href="#local-6989586621679115280"><span class="hs-identifier">rParams</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115280"><span class="hs-identifier hs-var">rParams</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-6989586621679115275"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115278"><span class="hs-identifier hs-var">rParams</span></a><span>
|
||||
</span><a name="line-163"></a><span class="hs-identifier">rParamsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115046"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115047"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115048"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115049"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span>
|
||||
</span><a name="line-164"></a><a name="rParamsL"><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier">rParamsL</span></a></a><span> </span><a name="local-6989586621679115093"><a href="#local-6989586621679115093"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</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-6989586621679115098"><a href="#local-6989586621679115098"><span class="hs-identifier">rParams</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115098"><span class="hs-identifier hs-var">rParams</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-6989586621679115093"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115096"><span class="hs-identifier hs-var">rParams</span></a><span>
|
||||
</span><a name="line-165"></a><span class="hs-pragma">{-# INLINE rParamsL #-}</span><span>
|
||||
</span><a name="line-166"></a><span>
|
||||
</span><a name="line-167"></a><span class="hs-comment">-- | 'rParams' Lens</span><span>
|
||||
</span><a name="line-168"></a><span class="hs-identifier">rAuthTypesL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115224"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115225"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115226"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115227"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</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">TypeRep</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-169"></a><a name="rAuthTypesL"><a href="SwaggerPetstore.Core.html#rAuthTypesL"><span class="hs-identifier">rAuthTypesL</span></a></a><span> </span><a name="local-6989586621679115281"><a href="#local-6989586621679115281"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</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-6989586621679115286"><a href="#local-6989586621679115286"><span class="hs-identifier">rAuthTypes</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115286"><span class="hs-identifier hs-var">rAuthTypes</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-6989586621679115281"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115285"><span class="hs-identifier hs-var">rAuthTypes</span></a><span>
|
||||
</span><a name="line-168"></a><span class="hs-identifier">rAuthTypesL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115042"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115043"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115044"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115045"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</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">TypeRep</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-169"></a><a name="rAuthTypesL"><a href="SwaggerPetstore.Core.html#rAuthTypesL"><span class="hs-identifier">rAuthTypesL</span></a></a><span> </span><a name="local-6989586621679115099"><a href="#local-6989586621679115099"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</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-6989586621679115104"><a href="#local-6989586621679115104"><span class="hs-identifier">rAuthTypes</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115104"><span class="hs-identifier hs-var">rAuthTypes</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-6989586621679115099"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115103"><span class="hs-identifier hs-var">rAuthTypes</span></a><span>
|
||||
</span><a name="line-170"></a><span class="hs-pragma">{-# INLINE rAuthTypesL #-}</span><span>
|
||||
</span><a name="line-171"></a><span>
|
||||
</span><a name="line-172"></a><span class="hs-comment">-- * HasBodyParam</span><span>
|
||||
</span><a name="line-173"></a><span>
|
||||
</span><a name="line-174"></a><span class="hs-comment">-- | Designates the body parameter of a request</span><span>
|
||||
</span><a name="line-175"></a><span class="hs-keyword">class</span><span> </span><a name="HasBodyParam"><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier">HasBodyParam</span></a></a><span> </span><a name="local-6989586621679114387"><a href="#local-6989586621679114387"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679114388"><a href="#local-6989586621679114388"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-176"></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-6989586621679114389"><a href="#local-6989586621679114389"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679114390"><a href="#local-6989586621679114390"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679114391"><a href="#local-6989586621679114391"><span class="hs-identifier">accept</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-6989586621679114387"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114389"><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-6989586621679114389"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114388"><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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114387"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114389"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114390"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114391"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114388"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114387"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114389"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114390"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114391"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-8214565720323887751"><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier">setBodyParam</span></a></a><span> </span><a name="local-6989586621679114392"><a href="#local-6989586621679114392"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679114393"><a href="#local-6989586621679114393"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-178"></a><span> </span><a href="#local-6989586621679114392"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679114389"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679114393"><span class="hs-identifier hs-var">xs</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
|
||||
</span><a name="line-175"></a><span class="hs-keyword">class</span><span> </span><a name="HasBodyParam"><a href="SwaggerPetstore.Core.html#HasBodyParam"><span class="hs-identifier">HasBodyParam</span></a></a><span> </span><a name="local-6989586621679114205"><a href="#local-6989586621679114205"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679114206"><a href="#local-6989586621679114206"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-176"></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-6989586621679114207"><a href="#local-6989586621679114207"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679114208"><a href="#local-6989586621679114208"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679114209"><a href="#local-6989586621679114209"><span class="hs-identifier">accept</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-6989586621679114205"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114207"><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-6989586621679114207"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114206"><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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114205"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114207"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114208"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114209"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114206"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114205"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114207"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114208"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114209"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-8214565720323887569"><a href="SwaggerPetstore.Core.html#setBodyParam"><span class="hs-identifier">setBodyParam</span></a></a><span> </span><a name="local-6989586621679114210"><a href="#local-6989586621679114210"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679114211"><a href="#local-6989586621679114211"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-178"></a><span> </span><a href="#local-6989586621679114210"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679114207"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679114211"><span class="hs-identifier hs-var">xs</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="SwaggerPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
|
||||
</span><a name="line-179"></a><span>
|
||||
</span><a name="line-180"></a><span class="hs-comment">-- * HasOptionalParam</span><span>
|
||||
</span><a name="line-181"></a><span>
|
||||
</span><a name="line-182"></a><span class="hs-comment">-- | Designates the optional parameters of a request</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-keyword">class</span><span> </span><a name="HasOptionalParam"><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier">HasOptionalParam</span></a></a><span> </span><a name="local-6989586621679114379"><a href="#local-6989586621679114379"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679114380"><a href="#local-6989586621679114380"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-keyword">class</span><span> </span><a name="HasOptionalParam"><a href="SwaggerPetstore.Core.html#HasOptionalParam"><span class="hs-identifier">HasOptionalParam</span></a></a><span> </span><a name="local-6989586621679114197"><a href="#local-6989586621679114197"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679114198"><a href="#local-6989586621679114198"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-184"></a><span> </span><span class="hs-pragma">{-# MINIMAL applyOptionalParam | (-&-) #-}</span><span>
|
||||
</span><a name="line-185"></a><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-comment">-- | Apply an optional parameter to a request</span><span>
|
||||
</span><a name="line-187"></a><span> </span><span class="hs-identifier">applyOptionalParam</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114379"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114381"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114382"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114383"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114380"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114379"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114381"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114382"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114383"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-188"></a><span> </span><a name="local-8214565720323887748"><a href="SwaggerPetstore.Core.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.Core.html#-%26-"><span class="hs-operator hs-var">-&-</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-187"></a><span> </span><span class="hs-identifier">applyOptionalParam</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114197"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114199"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114200"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114201"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114198"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114197"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114199"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114200"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114201"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-188"></a><span> </span><a name="local-8214565720323887566"><a href="SwaggerPetstore.Core.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.Core.html#-%26-"><span class="hs-operator hs-var">-&-</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-189"></a><span> </span><span class="hs-pragma">{-# INLINE applyOptionalParam #-}</span><span>
|
||||
</span><a name="line-190"></a><span>
|
||||
</span><a name="line-191"></a><span> </span><span class="hs-comment">-- | infix operator \/ alias for 'addOptionalParam'</span><span>
|
||||
</span><a name="line-192"></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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114379"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114384"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114385"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114386"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114380"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114379"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114384"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114385"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114386"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-193"></a><span> </span><span class="hs-special">(</span><a name="local-8214565720323887749"><a href="SwaggerPetstore.Core.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.Core.html#applyOptionalParam"><span class="hs-identifier hs-var">applyOptionalParam</span></a><span>
|
||||
</span><a name="line-192"></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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114197"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114202"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114203"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114204"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114198"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114197"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114202"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114203"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114204"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-193"></a><span> </span><span class="hs-special">(</span><a name="local-8214565720323887567"><a href="SwaggerPetstore.Core.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.Core.html#applyOptionalParam"><span class="hs-identifier hs-var">applyOptionalParam</span></a><span>
|
||||
</span><a name="line-194"></a><span> </span><span class="hs-pragma">{-# INLINE (-&-) #-}</span><span>
|
||||
</span><a name="line-195"></a><span>
|
||||
</span><a name="line-196"></a><span class="hs-keyword">infixl</span><span> </span><span class="hs-number">2</span><span> </span><span class="hs-operator">-&-</span><span>
|
||||
@@ -205,17 +205,17 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-205"></a><span>
|
||||
</span><a name="line-206"></a><span class="hs-comment">-- | 'paramsQuery' Lens</span><span>
|
||||
</span><a name="line-207"></a><span class="hs-identifier">paramsQueryL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</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">Query</span><span>
|
||||
</span><a name="line-208"></a><a name="paramsQueryL"><a href="SwaggerPetstore.Core.html#paramsQueryL"><span class="hs-identifier">paramsQueryL</span></a></a><span> </span><a name="local-6989586621679115287"><a href="#local-6989586621679115287"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</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-6989586621679115291"><a href="#local-6989586621679115291"><span class="hs-identifier">paramsQuery</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115291"><span class="hs-identifier hs-var">paramsQuery</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-6989586621679115287"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115288"><span class="hs-identifier hs-var">paramsQuery</span></a><span>
|
||||
</span><a name="line-208"></a><a name="paramsQueryL"><a href="SwaggerPetstore.Core.html#paramsQueryL"><span class="hs-identifier">paramsQueryL</span></a></a><span> </span><a name="local-6989586621679115105"><a href="#local-6989586621679115105"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</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-6989586621679115109"><a href="#local-6989586621679115109"><span class="hs-identifier">paramsQuery</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115109"><span class="hs-identifier hs-var">paramsQuery</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-6989586621679115105"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115106"><span class="hs-identifier hs-var">paramsQuery</span></a><span>
|
||||
</span><a name="line-209"></a><span class="hs-pragma">{-# INLINE paramsQueryL #-}</span><span>
|
||||
</span><a name="line-210"></a><span>
|
||||
</span><a name="line-211"></a><span class="hs-comment">-- | 'paramsHeaders' Lens</span><span>
|
||||
</span><a name="line-212"></a><span class="hs-identifier">paramsHeadersL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</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">RequestHeaders</span><span>
|
||||
</span><a name="line-213"></a><a name="paramsHeadersL"><a href="SwaggerPetstore.Core.html#paramsHeadersL"><span class="hs-identifier">paramsHeadersL</span></a></a><span> </span><a name="local-6989586621679115292"><a href="#local-6989586621679115292"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</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-6989586621679115296"><a href="#local-6989586621679115296"><span class="hs-identifier">paramsHeaders</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115296"><span class="hs-identifier hs-var">paramsHeaders</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-6989586621679115292"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115294"><span class="hs-identifier hs-var">paramsHeaders</span></a><span>
|
||||
</span><a name="line-213"></a><a name="paramsHeadersL"><a href="SwaggerPetstore.Core.html#paramsHeadersL"><span class="hs-identifier">paramsHeadersL</span></a></a><span> </span><a name="local-6989586621679115110"><a href="#local-6989586621679115110"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</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-6989586621679115114"><a href="#local-6989586621679115114"><span class="hs-identifier">paramsHeaders</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115114"><span class="hs-identifier hs-var">paramsHeaders</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-6989586621679115110"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115112"><span class="hs-identifier hs-var">paramsHeaders</span></a><span>
|
||||
</span><a name="line-214"></a><span class="hs-pragma">{-# INLINE paramsHeadersL #-}</span><span>
|
||||
</span><a name="line-215"></a><span>
|
||||
</span><a name="line-216"></a><span class="hs-comment">-- | 'paramsBody' Lens</span><span>
|
||||
</span><a name="line-217"></a><span class="hs-identifier">paramsBodyL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBody"><span class="hs-identifier hs-type">ParamBody</span></a><span>
|
||||
</span><a name="line-218"></a><a name="paramsBodyL"><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier">paramsBodyL</span></a></a><span> </span><a name="local-6989586621679115297"><a href="#local-6989586621679115297"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</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-6989586621679115301"><a href="#local-6989586621679115301"><span class="hs-identifier">paramsBody</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115301"><span class="hs-identifier hs-var">paramsBody</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-6989586621679115297"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115300"><span class="hs-identifier hs-var">paramsBody</span></a><span>
|
||||
</span><a name="line-218"></a><a name="paramsBodyL"><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier">paramsBodyL</span></a></a><span> </span><a name="local-6989586621679115115"><a href="#local-6989586621679115115"><span class="hs-identifier">f</span></a></a><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</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-6989586621679115119"><a href="#local-6989586621679115119"><span class="hs-identifier">paramsBody</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679115119"><span class="hs-identifier hs-var">paramsBody</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-6989586621679115115"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679115118"><span class="hs-identifier hs-var">paramsBody</span></a><span>
|
||||
</span><a name="line-219"></a><span class="hs-pragma">{-# INLINE paramsBodyL #-}</span><span>
|
||||
</span><a name="line-220"></a><span>
|
||||
</span><a name="line-221"></a><span class="hs-comment">-- | Request Body</span><span>
|
||||
@@ -231,90 +231,90 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-231"></a><span>
|
||||
</span><a name="line-232"></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-233"></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-234"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115220"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115221"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115222"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115223"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ req: Request Type, res: Response Type</span><span>
|
||||
</span><a name="line-235"></a><a name="_mkRequest"><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier">_mkRequest</span></a></a><span> </span><a name="local-6989586621679115302"><a href="#local-6989586621679115302"><span class="hs-identifier">m</span></a></a><span> </span><a name="local-6989586621679115303"><a href="#local-6989586621679115303"><span class="hs-identifier">u</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115302"><span class="hs-identifier hs-var">m</span></a><span> </span><a href="#local-6989586621679115303"><span class="hs-identifier hs-var">u</span></a><span> </span><a href="SwaggerPetstore.Core.html#_mkParams"><span class="hs-identifier hs-var">_mkParams</span></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-234"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115038"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115039"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115040"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115041"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ req: Request Type, res: Response Type</span><span>
|
||||
</span><a name="line-235"></a><a name="_mkRequest"><a href="SwaggerPetstore.Core.html#_mkRequest"><span class="hs-identifier">_mkRequest</span></a></a><span> </span><a name="local-6989586621679115120"><a href="#local-6989586621679115120"><span class="hs-identifier">m</span></a></a><span> </span><a name="local-6989586621679115121"><a href="#local-6989586621679115121"><span class="hs-identifier">u</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-var">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115120"><span class="hs-identifier hs-var">m</span></a><span> </span><a href="#local-6989586621679115121"><span class="hs-identifier hs-var">u</span></a><span> </span><a href="SwaggerPetstore.Core.html#_mkParams"><span class="hs-identifier hs-var">_mkParams</span></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-236"></a><span>
|
||||
</span><a name="line-237"></a><span class="hs-identifier">_mkParams</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span>
|
||||
</span><a name="line-238"></a><a name="_mkParams"><a href="SwaggerPetstore.Core.html#_mkParams"><span class="hs-identifier">_mkParams</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.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.Core.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a><span>
|
||||
</span><a name="line-239"></a><span>
|
||||
</span><a name="line-240"></a><span class="hs-identifier">setHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115216"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115217"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115218"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115219"><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">Header</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115216"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115217"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115218"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115219"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-241"></a><a name="setHeader"><a href="SwaggerPetstore.Core.html#setHeader"><span class="hs-identifier">setHeader</span></a></a><span> </span><a name="local-6989586621679115304"><a href="#local-6989586621679115304"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115305"><a href="#local-6989586621679115305"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-242"></a><span> </span><a href="#local-6989586621679115304"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679115305"><span class="hs-identifier hs-var">header</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-243"></a><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">over</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsHeadersL"><span class="hs-identifier hs-var">paramsHeadersL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115305"><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 class="hs-special">)</span><span>
|
||||
</span><a name="line-240"></a><span class="hs-identifier">setHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115034"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115035"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115036"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115037"><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">Header</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115034"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115035"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115036"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115037"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-241"></a><a name="setHeader"><a href="SwaggerPetstore.Core.html#setHeader"><span class="hs-identifier">setHeader</span></a></a><span> </span><a name="local-6989586621679115122"><a href="#local-6989586621679115122"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115123"><a href="#local-6989586621679115123"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-242"></a><span> </span><a href="#local-6989586621679115122"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679115123"><span class="hs-identifier hs-var">header</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-243"></a><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">over</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsHeadersL"><span class="hs-identifier hs-var">paramsHeadersL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115123"><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 class="hs-special">)</span><span>
|
||||
</span><a name="line-244"></a><span>
|
||||
</span><a name="line-245"></a><span class="hs-identifier">removeHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115212"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115213"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115214"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115215"><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">HeaderName</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115212"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115213"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115214"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115215"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-246"></a><a name="removeHeader"><a href="SwaggerPetstore.Core.html#removeHeader"><span class="hs-identifier">removeHeader</span></a></a><span> </span><a name="local-6989586621679115321"><a href="#local-6989586621679115321"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115322"><a href="#local-6989586621679115322"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-247"></a><span> </span><a href="#local-6989586621679115321"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-245"></a><span class="hs-identifier">removeHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115030"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115031"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115032"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115033"><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">HeaderName</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115030"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115031"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115032"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115033"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-246"></a><a name="removeHeader"><a href="SwaggerPetstore.Core.html#removeHeader"><span class="hs-identifier">removeHeader</span></a></a><span> </span><a name="local-6989586621679115139"><a href="#local-6989586621679115139"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115140"><a href="#local-6989586621679115140"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-247"></a><span> </span><a href="#local-6989586621679115139"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-248"></a><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">over</span><span>
|
||||
</span><a name="line-249"></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsHeadersL"><span class="hs-identifier hs-var">paramsHeadersL</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-250"></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">filter</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679115719"><a href="#local-6989586621679115719"><span class="hs-identifier">h</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115323"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679115719"><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-6989586621679115322"><span class="hs-identifier hs-var">header</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-250"></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">filter</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679115537"><a href="#local-6989586621679115537"><span class="hs-identifier">h</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115141"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679115537"><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-6989586621679115140"><span class="hs-identifier hs-var">header</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-251"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-252"></a><span> </span><a name="local-6989586621679115323"><a href="#local-6989586621679115323"><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-252"></a><span> </span><a name="local-6989586621679115141"><a href="#local-6989586621679115141"><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-253"></a><span>
|
||||
</span><a name="line-254"></a><span>
|
||||
</span><a name="line-255"></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-6989586621679115208"><a href="#local-6989586621679115208"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115209"><a href="#local-6989586621679115209"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679115210"><a href="#local-6989586621679115210"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679115211"><a href="#local-6989586621679115211"><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-6989586621679115209"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115208"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115209"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115210"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115211"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115208"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115209"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115210"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115211"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-256"></a><a name="_setContentTypeHeader"><a href="SwaggerPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier">_setContentTypeHeader</span></a></a><span> </span><a name="local-6989586621679115720"><a href="#local-6989586621679115720"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-257"></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-6989586621679115209"><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-258"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679115721"><a href="#local-6989586621679115721"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115720"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679115721"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-259"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115720"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-255"></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-6989586621679115026"><a href="#local-6989586621679115026"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115027"><a href="#local-6989586621679115027"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679115028"><a href="#local-6989586621679115028"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679115029"><a href="#local-6989586621679115029"><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-6989586621679115027"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115026"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115027"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115028"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115029"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115026"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115027"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115028"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115029"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-256"></a><a name="_setContentTypeHeader"><a href="SwaggerPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier">_setContentTypeHeader</span></a></a><span> </span><a name="local-6989586621679115538"><a href="#local-6989586621679115538"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-257"></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-6989586621679115027"><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-258"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679115539"><a href="#local-6989586621679115539"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115538"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679115539"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-259"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115538"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-260"></a><span>
|
||||
</span><a name="line-261"></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-6989586621679115204"><a href="#local-6989586621679115204"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115205"><a href="#local-6989586621679115205"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679115206"><a href="#local-6989586621679115206"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679115207"><a href="#local-6989586621679115207"><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-6989586621679115207"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115204"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115205"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115206"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115207"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115204"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115205"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115206"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115207"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-262"></a><a name="_setAcceptHeader"><a href="SwaggerPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier">_setAcceptHeader</span></a></a><span> </span><a name="local-6989586621679115722"><a href="#local-6989586621679115722"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-263"></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-6989586621679115207"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span> </span><span>
|
||||
</span><a name="line-264"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679115723"><a href="#local-6989586621679115723"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115722"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679115723"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-265"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115722"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-261"></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-6989586621679115022"><a href="#local-6989586621679115022"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115023"><a href="#local-6989586621679115023"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679115024"><a href="#local-6989586621679115024"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679115025"><a href="#local-6989586621679115025"><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-6989586621679115025"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115022"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115023"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115024"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115025"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115022"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115023"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115024"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115025"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-262"></a><a name="_setAcceptHeader"><a href="SwaggerPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier">_setAcceptHeader</span></a></a><span> </span><a name="local-6989586621679115540"><a href="#local-6989586621679115540"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-263"></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-6989586621679115025"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span> </span><span>
|
||||
</span><a name="line-264"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679115541"><a href="#local-6989586621679115541"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115540"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-6989586621679115541"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-265"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115540"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="SwaggerPetstore.Core.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-266"></a><span>
|
||||
</span><a name="line-267"></a><span class="hs-identifier">setQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115200"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115201"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115202"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115203"><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">QueryItem</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115200"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115201"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115202"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115203"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-268"></a><a name="setQuery"><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier">setQuery</span></a></a><span> </span><a name="local-6989586621679115724"><a href="#local-6989586621679115724"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115725"><a href="#local-6989586621679115725"><span class="hs-identifier">query</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-269"></a><span> </span><a href="#local-6989586621679115724"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-267"></a><span class="hs-identifier">setQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115018"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115019"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115020"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115021"><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">QueryItem</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115018"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115019"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115020"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115021"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-268"></a><a name="setQuery"><a href="SwaggerPetstore.Core.html#setQuery"><span class="hs-identifier">setQuery</span></a></a><span> </span><a name="local-6989586621679115542"><a href="#local-6989586621679115542"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115543"><a href="#local-6989586621679115543"><span class="hs-identifier">query</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-269"></a><span> </span><a href="#local-6989586621679115542"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-270"></a><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">over</span><span>
|
||||
</span><a name="line-271"></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsQueryL"><span class="hs-identifier hs-var">paramsQueryL</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-272"></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><a href="#local-6989586621679115725"><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 class="hs-special">)</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">filter</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679115727"><a href="#local-6989586621679115727"><span class="hs-identifier">q</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115726"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679115727"><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-6989586621679115726"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679115725"><span class="hs-identifier hs-var">query</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-272"></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><a href="#local-6989586621679115543"><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 class="hs-special">)</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">filter</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679115545"><a href="#local-6989586621679115545"><span class="hs-identifier">q</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115544"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679115545"><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-6989586621679115544"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679115543"><span class="hs-identifier hs-var">query</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-273"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-274"></a><span> </span><a name="local-6989586621679115726"><a href="#local-6989586621679115726"><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-274"></a><span> </span><a name="local-6989586621679115544"><a href="#local-6989586621679115544"><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-275"></a><span>
|
||||
</span><a name="line-276"></a><span class="hs-identifier">addForm</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115196"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115197"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115198"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115199"><span class="hs-identifier hs-type">accept</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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115196"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115197"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115198"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115199"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-277"></a><a name="addForm"><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier">addForm</span></a></a><span> </span><a name="local-6989586621679115728"><a href="#local-6989586621679115728"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115729"><a href="#local-6989586621679115729"><span class="hs-identifier">newform</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-278"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679115730"><a href="#local-6989586621679115730"><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><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679115728"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-279"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679115731"><a href="#local-6989586621679115731"><span class="hs-identifier">_form</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115731"><span class="hs-identifier hs-var">_form</span></a><span>
|
||||
</span><a name="line-276"></a><span class="hs-identifier">addForm</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115014"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115015"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115016"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115017"><span class="hs-identifier hs-type">accept</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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115014"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115015"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115016"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115017"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-277"></a><a name="addForm"><a href="SwaggerPetstore.Core.html#addForm"><span class="hs-identifier">addForm</span></a></a><span> </span><a name="local-6989586621679115546"><a href="#local-6989586621679115546"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115547"><a href="#local-6989586621679115547"><span class="hs-identifier">newform</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-278"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679115548"><a href="#local-6989586621679115548"><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><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679115546"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-279"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679115549"><a href="#local-6989586621679115549"><span class="hs-identifier">_form</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115549"><span class="hs-identifier hs-var">_form</span></a><span>
|
||||
</span><a name="line-280"></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-281"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679115728"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115729"><span class="hs-identifier hs-var">newform</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679115730"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-281"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679115546"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115547"><span class="hs-identifier hs-var">newform</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679115548"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-282"></a><span>
|
||||
</span><a name="line-283"></a><span class="hs-identifier">_addMultiFormPart</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115192"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115193"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115194"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115195"><span class="hs-identifier hs-type">accept</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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115192"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115193"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115194"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115195"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-284"></a><a name="_addMultiFormPart"><a href="SwaggerPetstore.Core.html#_addMultiFormPart"><span class="hs-identifier">_addMultiFormPart</span></a></a><span> </span><a name="local-6989586621679115732"><a href="#local-6989586621679115732"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115733"><a href="#local-6989586621679115733"><span class="hs-identifier">newpart</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-285"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679115734"><a href="#local-6989586621679115734"><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><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679115732"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-286"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679115735"><a href="#local-6989586621679115735"><span class="hs-identifier">_parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115735"><span class="hs-identifier hs-var">_parts</span></a><span>
|
||||
</span><a name="line-283"></a><span class="hs-identifier">_addMultiFormPart</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115010"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115011"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115012"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115013"><span class="hs-identifier hs-type">accept</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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115010"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115011"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115012"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115013"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-284"></a><a name="_addMultiFormPart"><a href="SwaggerPetstore.Core.html#_addMultiFormPart"><span class="hs-identifier">_addMultiFormPart</span></a></a><span> </span><a name="local-6989586621679115550"><a href="#local-6989586621679115550"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115551"><a href="#local-6989586621679115551"><span class="hs-identifier">newpart</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-285"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679115552"><a href="#local-6989586621679115552"><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><span class="hs-special">(</span><span class="hs-identifier">rParams</span><span> </span><a href="#local-6989586621679115550"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-286"></a><span> </span><a href="SwaggerPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679115553"><a href="#local-6989586621679115553"><span class="hs-identifier">_parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115553"><span class="hs-identifier hs-var">_parts</span></a><span>
|
||||
</span><a name="line-287"></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-288"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679115732"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115733"><span class="hs-identifier hs-var">newpart</span></a><span> </span><span class="hs-glyph">:</span><span> </span><a href="#local-6989586621679115734"><span class="hs-identifier hs-var">parts</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-288"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679115550"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115551"><span class="hs-identifier hs-var">newpart</span></a><span> </span><span class="hs-glyph">:</span><span> </span><a href="#local-6989586621679115552"><span class="hs-identifier hs-var">parts</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-289"></a><span>
|
||||
</span><a name="line-290"></a><span class="hs-identifier">_setBodyBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115188"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115189"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115190"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115191"><span class="hs-identifier hs-type">accept</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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115188"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115189"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115190"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115191"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-291"></a><a name="_setBodyBS"><a href="SwaggerPetstore.Core.html#_setBodyBS"><span class="hs-identifier">_setBodyBS</span></a></a><span> </span><a name="local-6989586621679115736"><a href="#local-6989586621679115736"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115737"><a href="#local-6989586621679115737"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-292"></a><span> </span><a href="#local-6989586621679115736"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a href="#local-6989586621679115737"><span class="hs-identifier hs-var">body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-290"></a><span class="hs-identifier">_setBodyBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115006"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115007"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115008"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115009"><span class="hs-identifier hs-type">accept</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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115006"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115007"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115008"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115009"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-291"></a><a name="_setBodyBS"><a href="SwaggerPetstore.Core.html#_setBodyBS"><span class="hs-identifier">_setBodyBS</span></a></a><span> </span><a name="local-6989586621679115554"><a href="#local-6989586621679115554"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115555"><a href="#local-6989586621679115555"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-292"></a><span> </span><a href="#local-6989586621679115554"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a href="#local-6989586621679115555"><span class="hs-identifier hs-var">body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-293"></a><span>
|
||||
</span><a name="line-294"></a><span class="hs-identifier">_setBodyLBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115184"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115185"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115186"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115187"><span class="hs-identifier hs-type">accept</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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115184"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115185"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115186"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115187"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-295"></a><a name="_setBodyLBS"><a href="SwaggerPetstore.Core.html#_setBodyLBS"><span class="hs-identifier">_setBodyLBS</span></a></a><span> </span><a name="local-6989586621679115738"><a href="#local-6989586621679115738"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115739"><a href="#local-6989586621679115739"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-296"></a><span> </span><a href="#local-6989586621679115738"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a href="#local-6989586621679115739"><span class="hs-identifier hs-var">body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-294"></a><span class="hs-identifier">_setBodyLBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115002"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115003"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115004"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115005"><span class="hs-identifier hs-type">accept</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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115002"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115003"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115004"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115005"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-295"></a><a name="_setBodyLBS"><a href="SwaggerPetstore.Core.html#_setBodyLBS"><span class="hs-identifier">_setBodyLBS</span></a></a><span> </span><a name="local-6989586621679115556"><a href="#local-6989586621679115556"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115557"><a href="#local-6989586621679115557"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span>
|
||||
</span><a name="line-296"></a><span> </span><a href="#local-6989586621679115556"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">set</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#rParamsL"><span class="hs-identifier hs-var">rParamsL</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#paramsBodyL"><span class="hs-identifier hs-var">paramsBodyL</span></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a href="#local-6989586621679115557"><span class="hs-identifier hs-var">body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-297"></a><span>
|
||||
</span><a name="line-298"></a><span class="hs-identifier">_hasAuthType</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679115179"><span class="hs-identifier hs-type">authMethod</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115180"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115181"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115182"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115183"><span class="hs-identifier hs-type">accept</span></a><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-6989586621679115179"><span class="hs-identifier hs-type">authMethod</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679115180"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679115181"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115182"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115183"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-299"></a><a name="_hasAuthType"><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier">_hasAuthType</span></a></a><span> </span><a name="local-6989586621679115740"><a href="#local-6989586621679115740"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115741"><a href="#local-6989586621679115741"><span class="hs-identifier">proxy</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-300"></a><span> </span><a href="#local-6989586621679115740"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">over</span><span> </span><a href="SwaggerPetstore.Core.html#rAuthTypesL"><span class="hs-identifier hs-var">rAuthTypesL</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">typeRep</span><span> </span><a href="#local-6989586621679115741"><span class="hs-identifier hs-var">proxy</span></a><span> </span><span class="hs-glyph">:</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-298"></a><span class="hs-identifier">_hasAuthType</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679114997"><span class="hs-identifier hs-type">authMethod</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114998"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114999"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115000"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115001"><span class="hs-identifier hs-type">accept</span></a><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-6989586621679114997"><span class="hs-identifier hs-type">authMethod</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114998"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114999"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679115000"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679115001"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-299"></a><a name="_hasAuthType"><a href="SwaggerPetstore.Core.html#_hasAuthType"><span class="hs-identifier">_hasAuthType</span></a></a><span> </span><a name="local-6989586621679115558"><a href="#local-6989586621679115558"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115559"><a href="#local-6989586621679115559"><span class="hs-identifier">proxy</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-300"></a><span> </span><a href="#local-6989586621679115558"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><span class="hs-identifier hs-var">L</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">over</span><span> </span><a href="SwaggerPetstore.Core.html#rAuthTypesL"><span class="hs-identifier hs-var">rAuthTypesL</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">typeRep</span><span> </span><a href="#local-6989586621679115559"><span class="hs-identifier hs-var">proxy</span></a><span> </span><span class="hs-glyph">:</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-301"></a><span>
|
||||
</span><a name="line-302"></a><span class="hs-comment">-- ** Params Utils</span><span>
|
||||
</span><a name="line-303"></a><span>
|
||||
</span><a name="line-304"></a><span class="hs-identifier">toPath</span><span>
|
||||
</span><a name="line-305"></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-6989586621679115178"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-306"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679115178"><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-305"></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-6989586621679114996"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-306"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679114996"><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-307"></a><a name="toPath"><a href="SwaggerPetstore.Core.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-308"></a><span>
|
||||
</span><a name="line-309"></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-6989586621679115177"><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-6989586621679115177"><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-310"></a><a name="toHeader"><a href="SwaggerPetstore.Core.html#toHeader"><span class="hs-identifier">toHeader</span></a></a><span> </span><a name="local-6989586621679115742"><a href="#local-6989586621679115742"><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-6989586621679115742"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-309"></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-6989586621679114995"><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-6989586621679114995"><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-310"></a><a name="toHeader"><a href="SwaggerPetstore.Core.html#toHeader"><span class="hs-identifier">toHeader</span></a></a><span> </span><a name="local-6989586621679115560"><a href="#local-6989586621679115560"><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-6989586621679115560"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-311"></a><span>
|
||||
</span><a name="line-312"></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-6989586621679115176"><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-6989586621679115176"><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-313"></a><a name="toForm"><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier">toForm</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679115743"><a href="#local-6989586621679115743"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679115744"><a href="#local-6989586621679115744"><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-6989586621679115743"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><a href="#local-6989586621679115744"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-312"></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-6989586621679114994"><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-6989586621679114994"><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-313"></a><a name="toForm"><a href="SwaggerPetstore.Core.html#toForm"><span class="hs-identifier">toForm</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679115561"><a href="#local-6989586621679115561"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679115562"><a href="#local-6989586621679115562"><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-6989586621679115561"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><a href="#local-6989586621679115562"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-314"></a><span>
|
||||
</span><a name="line-315"></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-6989586621679115175"><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-6989586621679115175"><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-316"></a><a name="toQuery"><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier">toQuery</span></a></a><span> </span><a name="local-6989586621679115745"><a href="#local-6989586621679115745"><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-6989586621679115746"><span class="hs-identifier hs-var">toQueryParam</span></a><span> </span><a href="#local-6989586621679115745"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-317"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679115746"><a href="#local-6989586621679115746"><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-315"></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-6989586621679114993"><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-6989586621679114993"><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-316"></a><a name="toQuery"><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier">toQuery</span></a></a><span> </span><a name="local-6989586621679115563"><a href="#local-6989586621679115563"><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-6989586621679115564"><span class="hs-identifier hs-var">toQueryParam</span></a><span> </span><a href="#local-6989586621679115563"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-317"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679115564"><a href="#local-6989586621679115564"><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-318"></a><span>
|
||||
</span><a name="line-319"></a><span class="hs-comment">-- *** Swagger `CollectionFormat` Utils</span><span>
|
||||
</span><a name="line-320"></a><span>
|
||||
@@ -326,38 +326,38 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-326"></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="PipeSeparated"><a href="SwaggerPetstore.Core.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-327"></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="MultiParamArray"><a href="SwaggerPetstore.Core.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-328"></a><span>
|
||||
</span><a name="line-329"></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-6989586621679115174"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679115174"><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-330"></a><a name="toHeaderColl"><a href="SwaggerPetstore.Core.html#toHeaderColl"><span class="hs-identifier">toHeaderColl</span></a></a><span> </span><a name="local-6989586621679115747"><a href="#local-6989586621679115747"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115748"><a href="#local-6989586621679115748"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679115747"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><a href="#local-6989586621679115748"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-329"></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-6989586621679114992"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679114992"><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-330"></a><a name="toHeaderColl"><a href="SwaggerPetstore.Core.html#toHeaderColl"><span class="hs-identifier">toHeaderColl</span></a></a><span> </span><a name="local-6989586621679115565"><a href="#local-6989586621679115565"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115566"><a href="#local-6989586621679115566"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679115565"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><a href="#local-6989586621679115566"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-331"></a><span>
|
||||
</span><a name="line-332"></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-6989586621679115173"><span class="hs-identifier hs-type">v</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679115173"><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-333"></a><a name="toFormColl"><a href="SwaggerPetstore.Core.html#toFormColl"><span class="hs-identifier">toFormColl</span></a></a><span> </span><a name="local-6989586621679115749"><a href="#local-6989586621679115749"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115750"><a href="#local-6989586621679115750"><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-6989586621679115752"><span class="hs-identifier hs-var">unpack</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679115749"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.Core.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-6989586621679115751"><span class="hs-identifier hs-var">pack</span></a><span> </span><a href="#local-6989586621679115750"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-332"></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-6989586621679114991"><span class="hs-identifier hs-type">v</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679114991"><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-333"></a><a name="toFormColl"><a href="SwaggerPetstore.Core.html#toFormColl"><span class="hs-identifier">toFormColl</span></a></a><span> </span><a name="local-6989586621679115567"><a href="#local-6989586621679115567"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115568"><a href="#local-6989586621679115568"><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-6989586621679115570"><span class="hs-identifier hs-var">unpack</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="SwaggerPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679115567"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.Core.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-6989586621679115569"><span class="hs-identifier hs-var">pack</span></a><span> </span><a href="#local-6989586621679115568"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-334"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-335"></a><span> </span><a name="local-6989586621679115751"><a href="#local-6989586621679115751"><span class="hs-identifier">pack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679115753"><a href="#local-6989586621679115753"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679115754"><a href="#local-6989586621679115754"><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-6989586621679115753"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679115754"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-336"></a><span> </span><a name="local-6989586621679115752"><a href="#local-6989586621679115752"><span class="hs-identifier">unpack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679115755"><a href="#local-6989586621679115755"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679115756"><a href="#local-6989586621679115756"><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-6989586621679115755"><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-6989586621679115756"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-335"></a><span> </span><a name="local-6989586621679115569"><a href="#local-6989586621679115569"><span class="hs-identifier">pack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679115571"><a href="#local-6989586621679115571"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679115572"><a href="#local-6989586621679115572"><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-6989586621679115571"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679115572"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-336"></a><span> </span><a name="local-6989586621679115570"><a href="#local-6989586621679115570"><span class="hs-identifier">unpack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679115573"><a href="#local-6989586621679115573"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679115574"><a href="#local-6989586621679115574"><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-6989586621679115573"><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-6989586621679115574"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-337"></a><span>
|
||||
</span><a name="line-338"></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-6989586621679115172"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679115172"><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-339"></a><a name="toQueryColl"><a href="SwaggerPetstore.Core.html#toQueryColl"><span class="hs-identifier">toQueryColl</span></a></a><span> </span><a name="local-6989586621679115757"><a href="#local-6989586621679115757"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115758"><a href="#local-6989586621679115758"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_toCollA"><span class="hs-identifier hs-var">_toCollA</span></a><span> </span><a href="#local-6989586621679115757"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><a href="#local-6989586621679115758"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-338"></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-6989586621679114990"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679114990"><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-339"></a><a name="toQueryColl"><a href="SwaggerPetstore.Core.html#toQueryColl"><span class="hs-identifier">toQueryColl</span></a></a><span> </span><a name="local-6989586621679115575"><a href="#local-6989586621679115575"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115576"><a href="#local-6989586621679115576"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_toCollA"><span class="hs-identifier hs-var">_toCollA</span></a><span> </span><a href="#local-6989586621679115575"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="SwaggerPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><a href="#local-6989586621679115576"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-340"></a><span>
|
||||
</span><a name="line-341"></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-6989586621679115169"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679115169"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679115170"><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-6989586621679115171"><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-6989586621679115169"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679115170"><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-6989586621679115171"><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-342"></a><a name="_toColl"><a href="SwaggerPetstore.Core.html#_toColl"><span class="hs-identifier">_toColl</span></a></a><span> </span><a name="local-6989586621679115759"><a href="#local-6989586621679115759"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115760"><a href="#local-6989586621679115760"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679115761"><a href="#local-6989586621679115761"><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.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679115759"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679115762"><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-6989586621679115761"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-343"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679115762"><a href="#local-6989586621679115762"><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-6989586621679115760"><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-341"></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-6989586621679114987"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.Core.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-6989586621679114987"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679114988"><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-6989586621679114989"><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-6989586621679114987"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679114988"><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-6989586621679114989"><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-342"></a><a name="_toColl"><a href="SwaggerPetstore.Core.html#_toColl"><span class="hs-identifier">_toColl</span></a></a><span> </span><a name="local-6989586621679115577"><a href="#local-6989586621679115577"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115578"><a href="#local-6989586621679115578"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679115579"><a href="#local-6989586621679115579"><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.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679115577"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679115580"><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-6989586621679115579"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-343"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679115580"><a href="#local-6989586621679115580"><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-6989586621679115578"><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-344"></a><span> </span><span class="hs-pragma">{-# INLINE fencode #-}</span><span>
|
||||
</span><a name="line-345"></a><span>
|
||||
</span><a name="line-346"></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-6989586621679115165"><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-6989586621679115166"><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-6989586621679115166"><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.Core.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-6989586621679115165"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115166"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679115167"><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-6989586621679115168"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679115166"><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-6989586621679115165"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115166"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679115167"><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-6989586621679115168"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679115166"><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-347"></a><a name="_toCollA"><a href="SwaggerPetstore.Core.html#_toCollA"><span class="hs-identifier">_toCollA</span></a></a><span> </span><a name="local-6989586621679115763"><a href="#local-6989586621679115763"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115764"><a href="#local-6989586621679115764"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679115765"><a href="#local-6989586621679115765"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679115763"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679115764"><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-6989586621679115765"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-346"></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-6989586621679114983"><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-6989586621679114984"><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-6989586621679114984"><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.Core.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-6989586621679114983"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114984"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679114985"><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-6989586621679114986"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679114984"><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-6989586621679114983"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114984"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679114985"><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-6989586621679114986"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679114984"><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-347"></a><a name="_toCollA"><a href="SwaggerPetstore.Core.html#_toCollA"><span class="hs-identifier">_toCollA</span></a></a><span> </span><a name="local-6989586621679115581"><a href="#local-6989586621679115581"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115582"><a href="#local-6989586621679115582"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679115583"><a href="#local-6989586621679115583"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679115581"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679115582"><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-6989586621679115583"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-348"></a><span>
|
||||
</span><a name="line-349"></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-6989586621679114809"><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-6989586621679114810"><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-6989586621679114811"><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-6989586621679114811"><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.Core.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-6989586621679114810"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114811"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679114812"><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-6989586621679114813"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679114811"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679114809"><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-6989586621679114809"><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-6989586621679114810"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114811"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679114812"><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-6989586621679114813"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679114811"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679114809"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-350"></a><a name="_toCollA%27"><a href="SwaggerPetstore.Core.html#_toCollA%27"><span class="hs-identifier">_toCollA'</span></a></a><span> </span><a name="local-6989586621679115766"><a href="#local-6989586621679115766"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115767"><a href="#local-6989586621679115767"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679115768"><a href="#local-6989586621679115768"><span class="hs-identifier">one</span></a></a><span> </span><a name="local-6989586621679115769"><a href="#local-6989586621679115769"><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-6989586621679115766"><span class="hs-identifier hs-var">c</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-351"></a><span> </span><a href="SwaggerPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115770"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115768"><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-352"></a><span> </span><a href="SwaggerPetstore.Core.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115770"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115768"><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-353"></a><span> </span><a href="SwaggerPetstore.Core.html#TabSeparated"><span class="hs-identifier hs-var">TabSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115770"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115768"><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-354"></a><span> </span><a href="SwaggerPetstore.Core.html#PipeSeparated"><span class="hs-identifier hs-var">PipeSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115770"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115768"><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-355"></a><span> </span><a href="SwaggerPetstore.Core.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115772"><span class="hs-identifier hs-var">expandList</span></a><span>
|
||||
</span><a name="line-349"></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-6989586621679114627"><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-6989586621679114628"><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-6989586621679114629"><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-6989586621679114629"><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.Core.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-6989586621679114628"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114629"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679114630"><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-6989586621679114631"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679114629"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679114627"><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-6989586621679114627"><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-6989586621679114628"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114629"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679114630"><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-6989586621679114631"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679114629"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679114627"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-350"></a><a name="_toCollA%27"><a href="SwaggerPetstore.Core.html#_toCollA%27"><span class="hs-identifier">_toCollA'</span></a></a><span> </span><a name="local-6989586621679115584"><a href="#local-6989586621679115584"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679115585"><a href="#local-6989586621679115585"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679115586"><a href="#local-6989586621679115586"><span class="hs-identifier">one</span></a></a><span> </span><a name="local-6989586621679115587"><a href="#local-6989586621679115587"><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-6989586621679115584"><span class="hs-identifier hs-var">c</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-351"></a><span> </span><a href="SwaggerPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115588"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115586"><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-352"></a><span> </span><a href="SwaggerPetstore.Core.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115588"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115586"><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-353"></a><span> </span><a href="SwaggerPetstore.Core.html#TabSeparated"><span class="hs-identifier hs-var">TabSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115588"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115586"><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-354"></a><span> </span><a href="SwaggerPetstore.Core.html#PipeSeparated"><span class="hs-identifier hs-var">PipeSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115588"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115586"><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-355"></a><span> </span><a href="SwaggerPetstore.Core.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679115590"><span class="hs-identifier hs-var">expandList</span></a><span>
|
||||
</span><a name="line-356"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-357"></a><span> </span><a name="local-6989586621679115770"><a href="#local-6989586621679115770"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679115773"><a href="#local-6989586621679115773"><span class="hs-identifier">sep</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-358"></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-6989586621679115774"><a href="#local-6989586621679115774"><span class="hs-identifier">sk</span></a></a><span class="hs-special">,</span><span> </span><a name="local-6989586621679115775"><a href="#local-6989586621679115775"><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-6989586621679115776"><a href="#local-6989586621679115776"><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-6989586621679115774"><span class="hs-identifier hs-var">sk</span></a><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115771"><span class="hs-identifier hs-var">combine</span></a><span> </span><a href="#local-6989586621679115773"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679115775"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><*></span><span> </span><a href="#local-6989586621679115776"><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-6989586621679115775"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><|></span><span> </span><a href="#local-6989586621679115776"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679115772"><span class="hs-identifier hs-var">expandList</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-359"></a><span> </span><a name="local-6989586621679115771"><a href="#local-6989586621679115771"><span class="hs-identifier">combine</span></a></a><span> </span><a name="local-6989586621679115777"><a href="#local-6989586621679115777"><span class="hs-identifier">sep</span></a></a><span> </span><a name="local-6989586621679115778"><a href="#local-6989586621679115778"><span class="hs-identifier">x</span></a></a><span> </span><a name="local-6989586621679115779"><a href="#local-6989586621679115779"><span class="hs-identifier">y</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115778"><span class="hs-identifier hs-var">x</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679115777"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679115779"><span class="hs-identifier hs-var">y</span></a><span>
|
||||
</span><a name="line-360"></a><span> </span><a name="local-6989586621679115772"><a href="#local-6989586621679115772"><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-6989586621679115767"><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-6989586621679115769"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-357"></a><span> </span><a name="local-6989586621679115588"><a href="#local-6989586621679115588"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679115591"><a href="#local-6989586621679115591"><span class="hs-identifier">sep</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-358"></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-6989586621679115592"><a href="#local-6989586621679115592"><span class="hs-identifier">sk</span></a></a><span class="hs-special">,</span><span> </span><a name="local-6989586621679115593"><a href="#local-6989586621679115593"><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-6989586621679115594"><a href="#local-6989586621679115594"><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-6989586621679115592"><span class="hs-identifier hs-var">sk</span></a><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115589"><span class="hs-identifier hs-var">combine</span></a><span> </span><a href="#local-6989586621679115591"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679115593"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><*></span><span> </span><a href="#local-6989586621679115594"><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-6989586621679115593"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><|></span><span> </span><a href="#local-6989586621679115594"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679115590"><span class="hs-identifier hs-var">expandList</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-359"></a><span> </span><a name="local-6989586621679115589"><a href="#local-6989586621679115589"><span class="hs-identifier">combine</span></a></a><span> </span><a name="local-6989586621679115595"><a href="#local-6989586621679115595"><span class="hs-identifier">sep</span></a></a><span> </span><a name="local-6989586621679115596"><a href="#local-6989586621679115596"><span class="hs-identifier">x</span></a></a><span> </span><a name="local-6989586621679115597"><a href="#local-6989586621679115597"><span class="hs-identifier">y</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115596"><span class="hs-identifier hs-var">x</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679115595"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679115597"><span class="hs-identifier hs-var">y</span></a><span>
|
||||
</span><a name="line-360"></a><span> </span><a name="local-6989586621679115590"><a href="#local-6989586621679115590"><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-6989586621679115585"><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-6989586621679115587"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-361"></a><span> </span><span class="hs-pragma">{-# INLINE go #-}</span><span>
|
||||
</span><a name="line-362"></a><span> </span><span class="hs-pragma">{-# INLINE expandList #-}</span><span>
|
||||
</span><a name="line-363"></a><span> </span><span class="hs-pragma">{-# INLINE combine #-}</span><span>
|
||||
@@ -365,18 +365,18 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-365"></a><span class="hs-comment">-- * AuthMethods</span><span>
|
||||
</span><a name="line-366"></a><span>
|
||||
</span><a name="line-367"></a><span class="hs-comment">-- | Provides a method to apply auth methods to requests</span><span>
|
||||
</span><a name="line-368"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span> </span><a href="#local-6989586621679113941"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span>
|
||||
</span><a name="line-369"></a><span> </span><a name="AuthMethod"><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier">AuthMethod</span></a></a><span> </span><a name="local-6989586621679113941"><a href="#local-6989586621679113941"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-368"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span> </span><a href="#local-6989586621679113759"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span>
|
||||
</span><a name="line-369"></a><span> </span><a name="AuthMethod"><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier">AuthMethod</span></a></a><span> </span><a name="local-6989586621679113759"><a href="#local-6989586621679113759"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-370"></a><span> </span><span class="hs-identifier">applyAuthMethod</span><span>
|
||||
</span><a name="line-371"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-372"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679113941"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-373"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679113942"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679113943"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679113944"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679113945"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-374"></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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679113942"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679113943"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679113944"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679113945"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-372"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679113759"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-373"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679113760"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679113761"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679113762"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679113763"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-374"></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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679113760"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679113761"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679113762"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679113763"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-375"></a><span>
|
||||
</span><a name="line-376"></a><span class="hs-comment">-- | An existential wrapper for any AuthMethod</span><span>
|
||||
</span><a name="line-377"></a><span class="hs-keyword">data</span><span> </span><a name="AnyAuthMethod"><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier">AnyAuthMethod</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679113940"><a href="#local-6989586621679113940"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679113940"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="AnyAuthMethod"><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier">AnyAuthMethod</span></a></a><span> </span><a href="#local-6989586621679113940"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">deriving</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">Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-377"></a><span class="hs-keyword">data</span><span> </span><a name="AnyAuthMethod"><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier">AnyAuthMethod</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679113758"><a href="#local-6989586621679113758"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679113758"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="AnyAuthMethod"><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier">AnyAuthMethod</span></a></a><span> </span><a href="#local-6989586621679113758"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">deriving</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">Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-378"></a><span>
|
||||
</span><a name="line-379"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-type">AnyAuthMethod</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323887729"><a href="SwaggerPetstore.Core.html#applyAuthMethod"><span class="hs-identifier">applyAuthMethod</span></a></a><span> </span><a name="local-6989586621679114787"><a href="#local-6989586621679114787"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a name="local-6989586621679114788"><a href="#local-6989586621679114788"><span class="hs-identifier">a</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679114789"><a href="#local-6989586621679114789"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a><span> </span><a href="#local-6989586621679114787"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679114788"><span class="hs-identifier hs-var">a</span></a><span> </span><a href="#local-6989586621679114789"><span class="hs-identifier hs-var">req</span></a><span>
|
||||
</span><a name="line-379"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-type">AnyAuthMethod</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323887547"><a href="SwaggerPetstore.Core.html#applyAuthMethod"><span class="hs-identifier">applyAuthMethod</span></a></a><span> </span><a name="local-6989586621679114605"><a href="#local-6989586621679114605"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a name="local-6989586621679114606"><a href="#local-6989586621679114606"><span class="hs-identifier">a</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679114607"><a href="#local-6989586621679114607"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a><span> </span><a href="#local-6989586621679114605"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679114606"><span class="hs-identifier hs-var">a</span></a><span> </span><a href="#local-6989586621679114607"><span class="hs-identifier hs-var">req</span></a><span>
|
||||
</span><a name="line-380"></a><span>
|
||||
</span><a name="line-381"></a><span class="hs-comment">-- | indicates exceptions related to AuthMethods</span><span>
|
||||
</span><a name="line-382"></a><span class="hs-keyword">data</span><span> </span><a name="AuthMethodException"><a href="SwaggerPetstore.Core.html#AuthMethodException"><span class="hs-identifier">AuthMethodException</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="AuthMethodException"><a href="SwaggerPetstore.Core.html#AuthMethodException"><span class="hs-identifier">AuthMethodException</span></a></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">deriving</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">Show</span><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">Typeable</span><span class="hs-special">)</span><span>
|
||||
@@ -385,37 +385,37 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-385"></a><span>
|
||||
</span><a name="line-386"></a><span class="hs-comment">-- | apply all matching AuthMethods in config to request</span><span>
|
||||
</span><a name="line-387"></a><span class="hs-identifier">_applyAuthMethods</span><span>
|
||||
</span><a name="line-388"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114805"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114806"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114807"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114808"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-388"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114623"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114624"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114625"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114626"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-389"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-type">SwaggerPetstoreConfig</span></a><span>
|
||||
</span><a name="line-390"></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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114805"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114806"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114807"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114808"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-391"></a><a name="_applyAuthMethods"><a href="SwaggerPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier">_applyAuthMethods</span></a></a><span> </span><a name="local-6989586621679115780"><a href="#local-6989586621679115780"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115781"><a href="#local-6989586621679115781"><span class="hs-identifier">config</span></a></a><span class="hs-glyph">@</span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-var">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-special">{</span><span class="hs-identifier">configAuthMethods</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">as</span><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-392"></a><span> </span><span class="hs-identifier hs-var">foldlM</span><span> </span><a href="#local-6989586621679115783"><span class="hs-identifier hs-var">go</span></a><span> </span><a href="#local-6989586621679115780"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">as</span><span>
|
||||
</span><a name="line-390"></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.Core.html#SwaggerPetstoreRequest"><span class="hs-identifier hs-type">SwaggerPetstoreRequest</span></a><span> </span><a href="#local-6989586621679114623"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679114624"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679114625"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679114626"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-391"></a><a name="_applyAuthMethods"><a href="SwaggerPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier">_applyAuthMethods</span></a></a><span> </span><a name="local-6989586621679115598"><a href="#local-6989586621679115598"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679115599"><a href="#local-6989586621679115599"><span class="hs-identifier">config</span></a></a><span class="hs-glyph">@</span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#SwaggerPetstoreConfig"><span class="hs-identifier hs-var">SwaggerPetstoreConfig</span></a><span> </span><span class="hs-special">{</span><span class="hs-identifier">configAuthMethods</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">as</span><span class="hs-special">}</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-392"></a><span> </span><span class="hs-identifier hs-var">foldlM</span><span> </span><a href="#local-6989586621679115601"><span class="hs-identifier hs-var">go</span></a><span> </span><a href="#local-6989586621679115598"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">as</span><span>
|
||||
</span><a name="line-393"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-394"></a><span> </span><a name="local-6989586621679115783"><a href="#local-6989586621679115783"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679115784"><a href="#local-6989586621679115784"><span class="hs-identifier">r</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a name="local-6989586621679115785"><a href="#local-6989586621679115785"><span class="hs-identifier">a</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a><span> </span><a href="#local-6989586621679115781"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679115785"><span class="hs-identifier hs-var">a</span></a><span> </span><a href="#local-6989586621679115784"><span class="hs-identifier hs-var">r</span></a><span>
|
||||
</span><a name="line-394"></a><span> </span><a name="local-6989586621679115601"><a href="#local-6989586621679115601"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679115602"><a href="#local-6989586621679115602"><span class="hs-identifier">r</span></a></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a name="local-6989586621679115603"><a href="#local-6989586621679115603"><span class="hs-identifier">a</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a><span> </span><a href="#local-6989586621679115599"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679115603"><span class="hs-identifier hs-var">a</span></a><span> </span><a href="#local-6989586621679115602"><span class="hs-identifier hs-var">r</span></a><span>
|
||||
</span><a name="line-395"></a><span> </span><span>
|
||||
</span><a name="line-396"></a><span class="hs-comment">-- * Utils</span><span>
|
||||
</span><a name="line-397"></a><span>
|
||||
</span><a name="line-398"></a><span class="hs-comment">-- | Removes Null fields. (OpenAPI-Specification 2.0 does not allow Null in JSON)</span><span>
|
||||
</span><a name="line-399"></a><span class="hs-identifier">_omitNulls</span><span> </span><span class="hs-glyph">::</span><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> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Value</span><span class="hs-special">)</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Value</span><span>
|
||||
</span><a name="line-400"></a><a name="_omitNulls"><a href="SwaggerPetstore.Core.html#_omitNulls"><span class="hs-identifier">_omitNulls</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">object</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">filter</span><span> </span><a href="#local-6989586621679115786"><span class="hs-identifier hs-var">notNull</span></a><span>
|
||||
</span><a name="line-400"></a><a name="_omitNulls"><a href="SwaggerPetstore.Core.html#_omitNulls"><span class="hs-identifier">_omitNulls</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">object</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">filter</span><span> </span><a href="#local-6989586621679115604"><span class="hs-identifier hs-var">notNull</span></a><span>
|
||||
</span><a name="line-401"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-402"></a><span> </span><a name="local-6989586621679115786"><a href="#local-6989586621679115786"><span class="hs-identifier">notNull</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">_</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Null</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">False</span><span>
|
||||
</span><a name="line-402"></a><span> </span><a name="local-6989586621679115604"><a href="#local-6989586621679115604"><span class="hs-identifier">notNull</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">_</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Null</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">False</span><span>
|
||||
</span><a name="line-403"></a><span> </span><span class="hs-identifier">notNull</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">True</span><span>
|
||||
</span><a name="line-404"></a><span>
|
||||
</span><a name="line-405"></a><span class="hs-comment">-- | Encodes fields using WH.toQueryParam</span><span>
|
||||
</span><a name="line-406"></a><span class="hs-identifier">_toFormItem</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</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-6989586621679114802"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Functor</span><span> </span><a href="#local-6989586621679114803"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679114804"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114803"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679114802"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114803"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114804"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </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-407"></a><a name="_toFormItem"><a href="SwaggerPetstore.Core.html#_toFormItem"><span class="hs-identifier">_toFormItem</span></a></a><span> </span><a name="local-6989586621679115787"><a href="#local-6989586621679115787"><span class="hs-identifier">name</span></a></a><span> </span><a name="local-6989586621679115788"><a href="#local-6989586621679115788"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115787"><span class="hs-identifier hs-var">name</span></a><span class="hs-special">,</span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">:</span><span class="hs-special">[</span><span class="hs-special">]</span><span class="hs-special">)</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><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679115788"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-406"></a><span class="hs-identifier">_toFormItem</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</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-6989586621679114620"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Functor</span><span> </span><a href="#local-6989586621679114621"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679114622"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114621"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679114620"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114621"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114622"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </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-407"></a><a name="_toFormItem"><a href="SwaggerPetstore.Core.html#_toFormItem"><span class="hs-identifier">_toFormItem</span></a></a><span> </span><a name="local-6989586621679115605"><a href="#local-6989586621679115605"><span class="hs-identifier">name</span></a></a><span> </span><a name="local-6989586621679115606"><a href="#local-6989586621679115606"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679115605"><span class="hs-identifier hs-var">name</span></a><span class="hs-special">,</span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">:</span><span class="hs-special">[</span><span class="hs-special">]</span><span class="hs-special">)</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><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679115606"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-408"></a><span>
|
||||
</span><a name="line-409"></a><span class="hs-comment">-- | Collapse (Just "") to Nothing</span><span>
|
||||
</span><a name="line-410"></a><span class="hs-identifier">_emptyToNothing</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">String</span><span>
|
||||
</span><a name="line-411"></a><a name="_emptyToNothing"><a href="SwaggerPetstore.Core.html#_emptyToNothing"><span class="hs-identifier">_emptyToNothing</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-string">""</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-412"></a><span class="hs-identifier">_emptyToNothing</span><span> </span><a name="local-6989586621679115789"><a href="#local-6989586621679115789"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115789"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-412"></a><span class="hs-identifier">_emptyToNothing</span><span> </span><a name="local-6989586621679115607"><a href="#local-6989586621679115607"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115607"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-413"></a><span class="hs-pragma">{-# INLINE _emptyToNothing #-}</span><span>
|
||||
</span><a name="line-414"></a><span>
|
||||
</span><a name="line-415"></a><span class="hs-comment">-- | Collapse (Just mempty) to Nothing</span><span>
|
||||
</span><a name="line-416"></a><span class="hs-identifier">_memptyToNothing</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-6989586621679114801"><span class="hs-identifier hs-type">a</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">Eq</span><span> </span><a href="#local-6989586621679114801"><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">Maybe</span><span> </span><a href="#local-6989586621679114801"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="#local-6989586621679114801"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-417"></a><a name="_memptyToNothing"><a href="SwaggerPetstore.Core.html#_memptyToNothing"><span class="hs-identifier">_memptyToNothing</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679115790"><a href="#local-6989586621679115790"><span class="hs-identifier">x</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">|</span><span> </span><a href="#local-6989586621679115790"><span class="hs-identifier hs-var">x</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 hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mempty</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-418"></a><span class="hs-identifier">_memptyToNothing</span><span> </span><a name="local-6989586621679115791"><a href="#local-6989586621679115791"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115791"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-416"></a><span class="hs-identifier">_memptyToNothing</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-6989586621679114619"><span class="hs-identifier hs-type">a</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">Eq</span><span> </span><a href="#local-6989586621679114619"><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">Maybe</span><span> </span><a href="#local-6989586621679114619"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="#local-6989586621679114619"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-417"></a><a name="_memptyToNothing"><a href="SwaggerPetstore.Core.html#_memptyToNothing"><span class="hs-identifier">_memptyToNothing</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679115608"><a href="#local-6989586621679115608"><span class="hs-identifier">x</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">|</span><span> </span><a href="#local-6989586621679115608"><span class="hs-identifier hs-var">x</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 hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">mempty</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-418"></a><span class="hs-identifier">_memptyToNothing</span><span> </span><a name="local-6989586621679115609"><a href="#local-6989586621679115609"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679115609"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-419"></a><span class="hs-pragma">{-# INLINE _memptyToNothing #-}</span><span>
|
||||
</span><a name="line-420"></a><span>
|
||||
</span><a name="line-421"></a><span class="hs-comment">-- * DateTime Formatting</span><span>
|
||||
@@ -425,33 +425,33 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-425"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromJSON</span><span> </span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-426"></a><span> </span><a name="local-8214565720323785374"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">withText</span><span> </span><span class="hs-string">"DateTime"</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_readDateTime"><span class="hs-identifier hs-var">_readDateTime</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-427"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToJSON</span><span> </span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-428"></a><span> </span><a name="local-8214565720323785243"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679114786"><a href="#local-6989586621679114786"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toJSON</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679114786"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-428"></a><span> </span><a name="local-8214565720323785243"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679114604"><a href="#local-6989586621679114604"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toJSON</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679114604"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-429"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromHttpApiData</span><span> </span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-430"></a><span> </span><a name="local-8214565720323801327"><span class="hs-identifier">parseUrlPiece</span></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">left</span><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 href="SwaggerPetstore.Core.html#_readDateTime"><span class="hs-identifier hs-var">_readDateTime</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span>
|
||||
</span><a name="line-431"></a><span class="hs-keyword">instance</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="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-432"></a><span> </span><a name="local-8214565720323801323"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679114785"><a href="#local-6989586621679114785"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><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">pack</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679114785"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-432"></a><span> </span><a name="local-8214565720323801323"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679114603"><a href="#local-6989586621679114603"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><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">pack</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679114603"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-433"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-434"></a><span> </span><a name="local-8214565720323791630"><span class="hs-identifier">show</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679114784"><a href="#local-6989586621679114784"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679114784"><span class="hs-identifier hs-var">t</span></a><span>
|
||||
</span><a name="line-434"></a><span> </span><a name="local-8214565720323791630"><span class="hs-identifier">show</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679114602"><a href="#local-6989586621679114602"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679114602"><span class="hs-identifier hs-var">t</span></a><span>
|
||||
</span><a name="line-435"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="SwaggerPetstore.Core.html#DateTime"><span class="hs-identifier hs-type">DateTime</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-436"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-436"></a><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-437"></a><span>
|
||||
</span><a name="line-438"></a><span class="hs-comment">-- | @_parseISO8601@</span><span>
|
||||
</span><a name="line-439"></a><span class="hs-identifier">_readDateTime</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-6989586621679114799"><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-6989586621679114800"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Alternative</span><span> </span><a href="#local-6989586621679114800"><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-6989586621679114800"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679114799"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-439"></a><span class="hs-identifier">_readDateTime</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-6989586621679114617"><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-6989586621679114618"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Alternative</span><span> </span><a href="#local-6989586621679114618"><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-6989586621679114618"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679114617"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-440"></a><a name="_readDateTime"><a href="SwaggerPetstore.Core.html#_readDateTime"><span class="hs-identifier">_readDateTime</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-441"></a><span> </span><a href="SwaggerPetstore.Core.html#_parseISO8601"><span class="hs-identifier hs-var">_parseISO8601</span></a><span>
|
||||
</span><a name="line-442"></a><span class="hs-pragma">{-# INLINE _readDateTime #-}</span><span>
|
||||
</span><a name="line-443"></a><span>
|
||||
</span><a name="line-444"></a><span class="hs-comment">-- | @TI.formatISO8601Millis@</span><span>
|
||||
</span><a name="line-445"></a><span class="hs-identifier">_showDateTime</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114798"><span class="hs-identifier hs-type">t</span></a><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">UTCTime</span><span class="hs-special">,</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-6989586621679114798"><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="#local-6989586621679114798"><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-445"></a><span class="hs-identifier">_showDateTime</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679114616"><span class="hs-identifier hs-type">t</span></a><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">UTCTime</span><span class="hs-special">,</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-6989586621679114616"><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="#local-6989586621679114616"><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-446"></a><a name="_showDateTime"><a href="SwaggerPetstore.Core.html#_showDateTime"><span class="hs-identifier">_showDateTime</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-447"></a><span> </span><span class="hs-identifier hs-var">TI</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">formatISO8601Millis</span><span>
|
||||
</span><a name="line-448"></a><span class="hs-pragma">{-# INLINE _showDateTime #-}</span><span>
|
||||
</span><a name="line-449"></a><span>
|
||||
</span><a name="line-450"></a><span class="hs-comment">-- | parse an ISO8601 date-time string</span><span>
|
||||
</span><a name="line-451"></a><span class="hs-identifier">_parseISO8601</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-6989586621679114796"><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-6989586621679114797"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Alternative</span><span> </span><a href="#local-6989586621679114797"><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-6989586621679114797"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679114796"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-452"></a><a name="_parseISO8601"><a href="SwaggerPetstore.Core.html#_parseISO8601"><span class="hs-identifier">_parseISO8601</span></a></a><span> </span><a name="local-6989586621679115792"><a href="#local-6989586621679115792"><span class="hs-identifier">t</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-451"></a><span class="hs-identifier">_parseISO8601</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-6989586621679114614"><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-6989586621679114615"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Alternative</span><span> </span><a href="#local-6989586621679114615"><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-6989586621679114615"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679114614"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-452"></a><a name="_parseISO8601"><a href="SwaggerPetstore.Core.html#_parseISO8601"><span class="hs-identifier">_parseISO8601</span></a></a><span> </span><a name="local-6989586621679115610"><a href="#local-6989586621679115610"><span class="hs-identifier">t</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-453"></a><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">asum</span><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-454"></a><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">flip</span><span> </span><span class="hs-special">(</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 class="hs-special">)</span><span> </span><a href="#local-6989586621679115792"><span class="hs-identifier hs-var">t</span></a><span> </span><span class="hs-operator hs-var"><$></span><span>
|
||||
</span><a name="line-454"></a><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">flip</span><span> </span><span class="hs-special">(</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 class="hs-special">)</span><span> </span><a href="#local-6989586621679115610"><span class="hs-identifier hs-var">t</span></a><span> </span><span class="hs-operator hs-var"><$></span><span>
|
||||
</span><a name="line-455"></a><span> </span><span class="hs-special">[</span><span class="hs-string">"%FT%T%QZ"</span><span class="hs-special">,</span><span> </span><span class="hs-string">"%FT%T%Q%z"</span><span class="hs-special">,</span><span> </span><span class="hs-string">"%FT%T%Q%Z"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-456"></a><span class="hs-pragma">{-# INLINE _parseISO8601 #-}</span><span>
|
||||
</span><a name="line-457"></a><span>
|
||||
@@ -462,24 +462,24 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-462"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromJSON</span><span> </span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-463"></a><span> </span><a name="local-8214565720323785374"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">withText</span><span> </span><span class="hs-string">"Date"</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_readDate"><span class="hs-identifier hs-var">_readDate</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-464"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToJSON</span><span> </span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-465"></a><span> </span><a name="local-8214565720323785243"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679114783"><a href="#local-6989586621679114783"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toJSON</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679114783"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-465"></a><span> </span><a name="local-8214565720323785243"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679114601"><a href="#local-6989586621679114601"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">toJSON</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679114601"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-466"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromHttpApiData</span><span> </span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-467"></a><span> </span><a name="local-8214565720323801327"><span class="hs-identifier">parseUrlPiece</span></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">left</span><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 href="SwaggerPetstore.Core.html#_readDate"><span class="hs-identifier hs-var">_readDate</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">unpack</span><span>
|
||||
</span><a name="line-468"></a><span class="hs-keyword">instance</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="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-469"></a><span> </span><a name="local-8214565720323801323"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679114782"><a href="#local-6989586621679114782"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><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">pack</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679114782"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-469"></a><span> </span><a name="local-8214565720323801323"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679114600"><a href="#local-6989586621679114600"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><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">pack</span><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679114600"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-470"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-471"></a><span> </span><a name="local-8214565720323791630"><span class="hs-identifier">show</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679114781"><a href="#local-6989586621679114781"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679114781"><span class="hs-identifier hs-var">t</span></a><span>
|
||||
</span><a name="line-471"></a><span> </span><a name="local-8214565720323791630"><span class="hs-identifier">show</span></a><span> </span><span class="hs-special">(</span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679114599"><a href="#local-6989586621679114599"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679114599"><span class="hs-identifier hs-var">t</span></a><span>
|
||||
</span><a name="line-472"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="SwaggerPetstore.Core.html#Date"><span class="hs-identifier hs-type">Date</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-473"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-473"></a><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-474"></a><span>
|
||||
</span><a name="line-475"></a><span class="hs-comment">-- | @TI.parseTimeM True TI.defaultTimeLocale "%Y-%m-%d"@</span><span>
|
||||
</span><a name="line-476"></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-6989586621679114794"><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-6989586621679114795"><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-6989586621679114795"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679114794"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-476"></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-6989586621679114612"><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-6989586621679114613"><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-6989586621679114613"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679114612"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-477"></a><a name="_readDate"><a href="SwaggerPetstore.Core.html#_readDate"><span class="hs-identifier">_readDate</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-478"></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-479"></a><span class="hs-pragma">{-# INLINE _readDate #-}</span><span>
|
||||
</span><a name="line-480"></a><span>
|
||||
</span><a name="line-481"></a><span class="hs-comment">-- | @TI.formatTime TI.defaultTimeLocale "%Y-%m-%d"@</span><span>
|
||||
</span><a name="line-482"></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-6989586621679114793"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679114793"><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-482"></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-6989586621679114611"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679114611"><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-483"></a><a name="_showDate"><a href="SwaggerPetstore.Core.html#_showDate"><span class="hs-identifier">_showDate</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-484"></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-485"></a><span class="hs-pragma">{-# INLINE _showDate #-}</span><span>
|
||||
@@ -502,10 +502,10 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-502"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-503"></a><span> </span><a name="local-8214565720323791630"><span class="hs-identifier">show</span></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">unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a><span>
|
||||
</span><a name="line-504"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="SwaggerPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-505"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-505"></a><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-506"></a><span>
|
||||
</span><a name="line-507"></a><span class="hs-comment">-- | read base64 encoded characters</span><span>
|
||||
</span><a name="line-508"></a><span class="hs-identifier">_readByteArray</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679114792"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114792"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="SwaggerPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a><span>
|
||||
</span><a name="line-508"></a><span class="hs-identifier">_readByteArray</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679114610"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114610"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="SwaggerPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a><span>
|
||||
</span><a name="line-509"></a><a name="_readByteArray"><a href="SwaggerPetstore.Core.html#_readByteArray"><span class="hs-identifier">_readByteArray</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">either</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fail</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#ByteArray"><span class="hs-identifier hs-var">ByteArray</span></a><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL64</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</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><a name="line-510"></a><span class="hs-pragma">{-# INLINE _readByteArray #-}</span><span>
|
||||
</span><a name="line-511"></a><span>
|
||||
@@ -529,9 +529,9 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-529"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Show</span><span> </span><a href="SwaggerPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-530"></a><span> </span><a name="local-8214565720323791630"><span class="hs-identifier">show</span></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">unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a><span>
|
||||
</span><a name="line-531"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="SwaggerPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-532"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">unBinary</span><span>
|
||||
</span><a name="line-532"></a><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">unBinary</span><span>
|
||||
</span><a name="line-533"></a><span>
|
||||
</span><a name="line-534"></a><span class="hs-identifier">_readBinaryBase64</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679114791"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114791"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="SwaggerPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a><span>
|
||||
</span><a name="line-534"></a><span class="hs-identifier">_readBinaryBase64</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Monad</span><span> </span><a href="#local-6989586621679114609"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679114609"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="SwaggerPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a><span>
|
||||
</span><a name="line-535"></a><a name="_readBinaryBase64"><a href="SwaggerPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier">_readBinaryBase64</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">either</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fail</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="SwaggerPetstore.Core.html#Binary"><span class="hs-identifier hs-var">Binary</span></a><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL64</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">decode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</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><a name="line-536"></a><span class="hs-pragma">{-# INLINE _readBinaryBase64 #-}</span><span>
|
||||
</span><a name="line-537"></a><span>
|
||||
@@ -541,6 +541,6 @@ Module : SwaggerPetstore.Core
|
||||
</span><a name="line-541"></a><span>
|
||||
</span><a name="line-542"></a><span class="hs-comment">-- * Lens Type Aliases</span><span>
|
||||
</span><a name="line-543"></a><span>
|
||||
</span><a name="line-544"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_%27"><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier">Lens_'</span></a></a><span> </span><a name="local-6989586621679112908"><a href="#local-6989586621679112908"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679112909"><a href="#local-6989586621679112909"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a><span> </span><a href="#local-6989586621679112908"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679112908"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679112909"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679112909"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-545"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_"><a href="SwaggerPetstore.Core.html#Lens_"><span class="hs-identifier">Lens_</span></a></a><span> </span><a name="local-6989586621679112903"><a href="#local-6989586621679112903"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679112904"><a href="#local-6989586621679112904"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679112905"><a href="#local-6989586621679112905"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679112906"><a href="#local-6989586621679112906"><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-6989586621679112907"><a href="#local-6989586621679112907"><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-6989586621679112907"><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-6989586621679112905"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679112907"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679112906"><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-6989586621679112903"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679112907"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679112904"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-544"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_%27"><a href="SwaggerPetstore.Core.html#Lens_%27"><span class="hs-identifier">Lens_'</span></a></a><span> </span><a name="local-6989586621679112726"><a href="#local-6989586621679112726"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679112727"><a href="#local-6989586621679112727"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.Core.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a><span> </span><a href="#local-6989586621679112726"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679112726"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679112727"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679112727"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-545"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_"><a href="SwaggerPetstore.Core.html#Lens_"><span class="hs-identifier">Lens_</span></a></a><span> </span><a name="local-6989586621679112721"><a href="#local-6989586621679112721"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679112722"><a href="#local-6989586621679112722"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679112723"><a href="#local-6989586621679112723"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679112724"><a href="#local-6989586621679112724"><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-6989586621679112725"><a href="#local-6989586621679112725"><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-6989586621679112725"><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-6989586621679112723"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679112725"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679112724"><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-6989586621679112721"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679112725"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679112722"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-546"></a></pre></body></html>
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
@@ -45,19 +45,19 @@ Module : SwaggerPetstore.MimeTypes
|
||||
</span><a name="line-45"></a><span>
|
||||
</span><a name="line-46"></a><span class="hs-comment">-- * ContentType MimeType</span><span>
|
||||
</span><a name="line-47"></a><span>
|
||||
</span><a name="line-48"></a><span class="hs-keyword">data</span><span> </span><a name="ContentType"><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><a name="local-6989586621679076477"><a href="#local-6989586621679076477"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076477"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="ContentType"><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unContentType"><a href="SwaggerPetstore.MimeTypes.html#unContentType"><span class="hs-identifier">unContentType</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076477"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-48"></a><span class="hs-keyword">data</span><span> </span><a name="ContentType"><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><a name="local-6989586621679076473"><a href="#local-6989586621679076473"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076473"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="ContentType"><a href="SwaggerPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unContentType"><a href="SwaggerPetstore.MimeTypes.html#unContentType"><span class="hs-identifier">unContentType</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076473"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-49"></a><span>
|
||||
</span><a name="line-50"></a><span class="hs-comment">-- * Accept MimeType</span><span>
|
||||
</span><a name="line-51"></a><span>
|
||||
</span><a name="line-52"></a><span class="hs-keyword">data</span><span> </span><a name="Accept"><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><a name="local-6989586621679076476"><a href="#local-6989586621679076476"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076476"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Accept"><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unAccept"><a href="SwaggerPetstore.MimeTypes.html#unAccept"><span class="hs-identifier">unAccept</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076476"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-52"></a><span class="hs-keyword">data</span><span> </span><a name="Accept"><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><a name="local-6989586621679076472"><a href="#local-6989586621679076472"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076472"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Accept"><a href="SwaggerPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unAccept"><a href="SwaggerPetstore.MimeTypes.html#unAccept"><span class="hs-identifier">unAccept</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076472"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-53"></a><span>
|
||||
</span><a name="line-54"></a><span class="hs-comment">-- * Consumes Class</span><span>
|
||||
</span><a name="line-55"></a><span>
|
||||
</span><a name="line-56"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076475"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Consumes"><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier">Consumes</span></a></a><span> </span><a name="local-6989586621679076474"><a href="#local-6989586621679076474"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679076475"><a href="#local-6989586621679076475"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-56"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076471"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Consumes"><a href="SwaggerPetstore.MimeTypes.html#Consumes"><span class="hs-identifier">Consumes</span></a></a><span> </span><a name="local-6989586621679076470"><a href="#local-6989586621679076470"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679076471"><a href="#local-6989586621679076471"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-57"></a><span>
|
||||
</span><a name="line-58"></a><span class="hs-comment">-- * Produces Class</span><span>
|
||||
</span><a name="line-59"></a><span>
|
||||
</span><a name="line-60"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076473"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Produces"><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier">Produces</span></a></a><span> </span><a name="local-6989586621679076472"><a href="#local-6989586621679076472"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679076473"><a href="#local-6989586621679076473"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-60"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076469"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Produces"><a href="SwaggerPetstore.MimeTypes.html#Produces"><span class="hs-identifier">Produces</span></a></a><span> </span><a name="local-6989586621679076468"><a href="#local-6989586621679076468"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679076469"><a href="#local-6989586621679076469"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-61"></a><span>
|
||||
</span><a name="line-62"></a><span class="hs-comment">-- * Default Mime Types</span><span>
|
||||
</span><a name="line-63"></a><span>
|
||||
@@ -77,153 +77,129 @@ Module : SwaggerPetstore.MimeTypes
|
||||
</span><a name="line-77"></a><span>
|
||||
</span><a name="line-78"></a><span class="hs-comment">-- * MimeType Class</span><span>
|
||||
</span><a name="line-79"></a><span>
|
||||
</span><a name="line-80"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span> </span><a href="#local-6989586621679076332"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeType"><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier">MimeType</span></a></a><span> </span><a name="local-6989586621679076332"><a href="#local-6989586621679076332"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-80"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span> </span><a href="#local-6989586621679076018"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeType"><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier">MimeType</span></a></a><span> </span><a name="local-6989586621679076018"><a href="#local-6989586621679076018"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-81"></a><span> </span><span class="hs-pragma">{-# MINIMAL mimeType | mimeTypes #-}</span><span>
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span> </span><span class="hs-identifier">mimeTypes</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-6989586621679076332"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-84"></a><span> </span><a name="local-8214565720323850703"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><a name="local-6989586621679076468"><a href="#local-6989586621679076468"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-85"></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><a href="#local-6989586621679076468"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-86"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679076469"><a href="#local-6989586621679076469"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679076469"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-83"></a><span> </span><span class="hs-identifier">mimeTypes</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-6989586621679076018"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-84"></a><span> </span><a name="local-8214565720323850699"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><a name="local-6989586621679076464"><a href="#local-6989586621679076464"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-85"></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><a href="#local-6989586621679076464"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-86"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679076465"><a href="#local-6989586621679076465"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679076465"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-87"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-88"></a><span>
|
||||
</span><a name="line-89"></a><span> </span><span class="hs-identifier">mimeType</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-6989586621679076332"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span>
|
||||
</span><a name="line-90"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><a name="local-6989586621679076470"><a href="#local-6989586621679076470"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-91"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><a href="#local-6989586621679076470"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-89"></a><span> </span><span class="hs-identifier">mimeType</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-6989586621679076018"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span>
|
||||
</span><a name="line-90"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><a name="local-6989586621679076466"><a href="#local-6989586621679076466"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-91"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><a href="#local-6989586621679076466"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-92"></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-93"></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679076471"><a href="#local-6989586621679076471"><span class="hs-identifier">x</span></a></a><span class="hs-glyph">:</span><span class="hs-identifier">_</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679076471"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-93"></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679076467"><a href="#local-6989586621679076467"><span class="hs-identifier">x</span></a></a><span class="hs-glyph">:</span><span class="hs-identifier">_</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679076467"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-94"></a><span>
|
||||
</span><a name="line-95"></a><span> </span><span class="hs-identifier">mimeType'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076332"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span>
|
||||
</span><a name="line-96"></a><span> </span><a name="local-8214565720323850705"><a href="SwaggerPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="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-6989586621679076332"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-97"></a><span> </span><span class="hs-identifier">mimeTypes'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076332"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-98"></a><span> </span><a name="local-8214565720323850706"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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-6989586621679076332"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-95"></a><span> </span><span class="hs-identifier">mimeType'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076018"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span>
|
||||
</span><a name="line-96"></a><span> </span><a name="local-8214565720323850701"><a href="SwaggerPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="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-6989586621679076018"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-97"></a><span> </span><span class="hs-identifier">mimeTypes'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076018"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-98"></a><span> </span><a name="local-8214565720323850702"><a href="SwaggerPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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-6989586621679076018"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-99"></a><span>
|
||||
</span><a name="line-100"></a><span class="hs-comment">-- Default MimeType Instances</span><span>
|
||||
</span><a name="line-101"></a><span>
|
||||
</span><a name="line-102"></a><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
|
||||
</span><a name="line-103"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-104"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/json"</span><span>
|
||||
</span><a name="line-104"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/json"</span><span>
|
||||
</span><a name="line-105"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-106"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-107"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/xml"</span><span>
|
||||
</span><a name="line-107"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/xml"</span><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-109"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-110"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/x-www-form-urlencoded"</span><span>
|
||||
</span><a name="line-110"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/x-www-form-urlencoded"</span><span>
|
||||
</span><a name="line-111"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
||||
</span><a name="line-112"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-113"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"multipart/form-data"</span><span>
|
||||
</span><a name="line-113"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"multipart/form-data"</span><span>
|
||||
</span><a name="line-114"></a><span class="hs-comment">-- | @text/plain; charset=utf-8@</span><span>
|
||||
</span><a name="line-115"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-116"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"text/plain"</span><span>
|
||||
</span><a name="line-116"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"text/plain"</span><span>
|
||||
</span><a name="line-117"></a><span class="hs-comment">-- | @application/octet-stream@</span><span>
|
||||
</span><a name="line-118"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-119"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/octet-stream"</span><span>
|
||||
</span><a name="line-119"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/octet-stream"</span><span>
|
||||
</span><a name="line-120"></a><span class="hs-comment">-- | @"*/*"@</span><span>
|
||||
</span><a name="line-121"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-122"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"*/*"</span><span>
|
||||
</span><a name="line-122"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"*/*"</span><span>
|
||||
</span><a name="line-123"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-124"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-124"></a><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-125"></a><span>
|
||||
</span><a name="line-126"></a><span class="hs-comment">-- * MimeRender Class</span><span>
|
||||
</span><a name="line-127"></a><span>
|
||||
</span><a name="line-128"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076329"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeRender"><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier">MimeRender</span></a></a><span> </span><a name="local-6989586621679076329"><a href="#local-6989586621679076329"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679076330"><a href="#local-6989586621679076330"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-129"></a><span> </span><span class="hs-identifier">mimeRender</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-6989586621679076329"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679076330"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
|
||||
</span><a name="line-130"></a><span> </span><span class="hs-identifier">mimeRender'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076329"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679076330"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
|
||||
</span><a name="line-131"></a><span> </span><a name="local-8214565720323850701"><a href="SwaggerPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679076331"><a href="#local-6989586621679076331"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</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-6989586621679076329"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679076331"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-128"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076015"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeRender"><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier">MimeRender</span></a></a><span> </span><a name="local-6989586621679076015"><a href="#local-6989586621679076015"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679076016"><a href="#local-6989586621679076016"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-129"></a><span> </span><span class="hs-identifier">mimeRender</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-6989586621679076015"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679076016"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
|
||||
</span><a name="line-130"></a><span> </span><span class="hs-identifier">mimeRender'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076015"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679076016"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
|
||||
</span><a name="line-131"></a><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679076017"><a href="#local-6989586621679076017"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</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-6989586621679076015"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679076017"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-132"></a><span>
|
||||
</span><a name="line-133"></a><span>
|
||||
</span><a name="line-134"></a><span class="hs-identifier">mimeRenderDefaultMultipartFormData</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-6989586621679081801"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679081801"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
|
||||
</span><a name="line-134"></a><span class="hs-identifier">mimeRenderDefaultMultipartFormData</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-6989586621679081795"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679081795"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ByteString</span><span>
|
||||
</span><a name="line-135"></a><a name="mimeRenderDefaultMultipartFormData"><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier">mimeRenderDefaultMultipartFormData</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</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-136"></a><span>
|
||||
</span><a name="line-137"></a><span class="hs-comment">-- Default MimeRender Instances</span><span>
|
||||
</span><a name="line-138"></a><span>
|
||||
</span><a name="line-139"></a><span class="hs-comment">-- | `A.encode`</span><span>
|
||||
</span><a name="line-140"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToJSON</span><span> </span><a href="#local-6989586621679081800"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679081800"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encode</span><span>
|
||||
</span><a name="line-140"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToJSON</span><span> </span><a href="#local-6989586621679078837"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679078837"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encode</span><span>
|
||||
</span><a name="line-141"></a><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span><span>
|
||||
</span><a name="line-142"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToForm</span><span> </span><a href="#local-6989586621679081799"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679081799"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlEncodeAsForm</span><span>
|
||||
</span><a name="line-142"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToForm</span><span> </span><a href="#local-6989586621679078836"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679078836"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlEncodeAsForm</span><span>
|
||||
</span><a name="line-143"></a><span>
|
||||
</span><a name="line-144"></a><span class="hs-comment">-- | @P.id@</span><span>
|
||||
</span><a name="line-145"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
|
||||
</span><a name="line-145"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
|
||||
</span><a name="line-146"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
|
||||
</span><a name="line-147"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</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><a name="line-147"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</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><a name="line-148"></a><span class="hs-comment">-- | @BCL.pack@</span><span>
|
||||
</span><a name="line-149"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span>
|
||||
</span><a name="line-149"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span>
|
||||
</span><a name="line-150"></a><span>
|
||||
</span><a name="line-151"></a><span class="hs-comment">-- | @P.id@</span><span>
|
||||
</span><a name="line-152"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
|
||||
</span><a name="line-152"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
|
||||
</span><a name="line-153"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
|
||||
</span><a name="line-154"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</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><a name="line-154"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromStrict</span><span> </span><span class="hs-operator hs-var">.</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><a name="line-155"></a><span class="hs-comment">-- | @BCL.pack@</span><span>
|
||||
</span><a name="line-156"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span>
|
||||
</span><a name="line-156"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">pack</span><span>
|
||||
</span><a name="line-157"></a><span>
|
||||
</span><a name="line-158"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
|
||||
</span><a name="line-158"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">id</span><span>
|
||||
</span><a name="line-159"></a><span>
|
||||
</span><a name="line-160"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Char</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-162"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Double</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-163"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Float</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-165"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-166"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-167"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-160"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Char</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-162"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Double</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-163"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Float</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-165"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-166"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-167"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-168"></a><span>
|
||||
</span><a name="line-169"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
|
||||
</span><a name="line-170"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">const</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">empty</span><span>
|
||||
</span><a name="line-170"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850696"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">const</span><span> </span><span class="hs-identifier hs-var">BCL</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">empty</span><span>
|
||||
</span><a name="line-171"></a><span>
|
||||
</span><a name="line-172"></a><span>
|
||||
</span><a name="line-173"></a><span class="hs-comment">-- * MimeUnrender Class</span><span>
|
||||
</span><a name="line-174"></a><span>
|
||||
</span><a name="line-175"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076133"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeUnrender"><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier">MimeUnrender</span></a></a><span> </span><a name="local-6989586621679076133"><a href="#local-6989586621679076133"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679076134"><a href="#local-6989586621679076134"><span class="hs-identifier">o</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-176"></a><span> </span><span class="hs-identifier">mimeUnrender</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-6989586621679076133"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</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><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679076134"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-177"></a><span> </span><span class="hs-identifier">mimeUnrender'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076133"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</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><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679076134"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-178"></a><span> </span><a name="local-8214565720323850698"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679076328"><a href="#local-6989586621679076328"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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-6989586621679076133"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679076328"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-175"></a><span class="hs-keyword">class</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679075819"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeUnrender"><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier">MimeUnrender</span></a></a><span> </span><a name="local-6989586621679075819"><a href="#local-6989586621679075819"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679075820"><a href="#local-6989586621679075820"><span class="hs-identifier">o</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-176"></a><span> </span><span class="hs-identifier">mimeUnrender</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-6989586621679075819"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</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><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679075820"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-177"></a><span> </span><span class="hs-identifier">mimeUnrender'</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679075819"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL</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><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679075820"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-178"></a><span> </span><a name="local-8214565720323850694"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679076014"><a href="#local-6989586621679076014"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P</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-6989586621679075819"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679076014"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-179"></a><span>
|
||||
</span><a name="line-180"></a><span class="hs-comment">-- Default MimeUnrender Instances</span><span>
|
||||
</span><a name="line-181"></a><span>
|
||||
</span><a name="line-182"></a><span class="hs-comment">-- | @A.eitherDecode@</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromJSON</span><span> </span><a href="#local-6989586621679081798"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679081798"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">eitherDecode</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromJSON</span><span> </span><a href="#local-6989586621679076475"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679076475"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">eitherDecode</span><span>
|
||||
</span><a name="line-184"></a><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span><span>
|
||||
</span><a name="line-185"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromForm</span><span> </span><a href="#local-6989586621679081797"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679081797"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</span><span> </span><span class="hs-identifier hs-var">T</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">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlDecodeAsForm</span><span>
|
||||
</span><a name="line-185"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromForm</span><span> </span><a href="#local-6989586621679076474"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679076474"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</span><span> </span><span class="hs-identifier hs-var">T</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">WH</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">urlDecodeAsForm</span><span>
|
||||
</span><a name="line-186"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span>
|
||||
</span><a name="line-187"></a><span>
|
||||
</span><a name="line-188"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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">id</span><span>
|
||||
</span><a name="line-188"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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">id</span><span>
|
||||
</span><a name="line-189"></a><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span><span>
|
||||
</span><a name="line-190"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</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><span class="hs-operator hs-var">.</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-operator hs-var">.</span><span> </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 name="line-190"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</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><span class="hs-operator hs-var">.</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-operator hs-var">.</span><span> </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 name="line-191"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
|
||||
</span><a name="line-192"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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><a name="line-192"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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><a name="line-193"></a><span>
|
||||
</span><a name="line-194"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span>
|
||||
</span><a name="line-195"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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">id</span><span>
|
||||
</span><a name="line-195"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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">id</span><span>
|
||||
</span><a name="line-196"></a><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span><span>
|
||||
</span><a name="line-197"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</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><span class="hs-operator hs-var">.</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-operator hs-var">.</span><span> </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 name="line-197"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><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-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">left</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><span class="hs-operator hs-var">.</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-operator hs-var">.</span><span> </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 name="line-198"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
|
||||
</span><a name="line-199"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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><a name="line-199"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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><a name="line-200"></a><span>
|
||||
</span><a name="line-201"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
|
||||
</span><a name="line-202"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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">const</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a><span>
|
||||
</span><a name="line-202"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850693"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">Right</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">const</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a><span>
|
||||
</span><a name="line-203"></a><span>
|
||||
</span><a name="line-204"></a><span>
|
||||
</span><a name="line-205"></a><span class="hs-comment">-- * Custom Mime Types</span><span>
|
||||
</span><a name="line-206"></a><span>
|
||||
</span><a name="line-207"></a><span class="hs-comment">-- ** MimeJsonCharsetutf8</span><span>
|
||||
</span><a name="line-208"></a><span>
|
||||
</span><a name="line-209"></a><span class="hs-keyword">data</span><span> </span><a name="MimeJsonCharsetutf8"><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier">MimeJsonCharsetutf8</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeJsonCharsetutf8"><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier">MimeJsonCharsetutf8</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-210"></a><span>
|
||||
</span><a name="line-211"></a><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
|
||||
</span><a name="line-212"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier hs-type">MimeJsonCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-213"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/json; charset=utf-8"</span><span>
|
||||
</span><a name="line-214"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">ToJSON</span><span> </span><a href="#local-6989586621679078839"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier hs-type">MimeJsonCharsetutf8</span></a><span> </span><a href="#local-6989586621679078839"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850700"><a href="SwaggerPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">encode</span><span>
|
||||
</span><a name="line-215"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">FromJSON</span><span> </span><a href="#local-6989586621679076478"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeJsonCharsetutf8"><span class="hs-identifier hs-type">MimeJsonCharsetutf8</span></a><span> </span><a href="#local-6989586621679076478"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850697"><a href="SwaggerPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">eitherDecode</span><span>
|
||||
</span><a name="line-216"></a><span class="hs-comment">-- instance MimeRender MimeJsonCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-217"></a><span class="hs-comment">-- instance MimeUnrender MimeJsonCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-218"></a><span>
|
||||
</span><a name="line-219"></a><span class="hs-comment">-- ** MimeXmlCharsetutf8</span><span>
|
||||
</span><a name="line-220"></a><span>
|
||||
</span><a name="line-221"></a><span class="hs-keyword">data</span><span> </span><a name="MimeXmlCharsetutf8"><a href="SwaggerPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier">MimeXmlCharsetutf8</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeXmlCharsetutf8"><a href="SwaggerPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier">MimeXmlCharsetutf8</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P</span><span class="hs-operator hs-type">.</span><span class="hs-identifier hs-type">Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-222"></a><span>
|
||||
</span><a name="line-223"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-224"></a><span class="hs-keyword">instance</span><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="SwaggerPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-225"></a><span> </span><a name="local-8214565720323850704"><a href="SwaggerPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P</span><span class="hs-operator hs-var">.</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-string">"application/xml; charset=utf-8"</span><span>
|
||||
</span><a name="line-226"></a><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-227"></a><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-228"></a><span>
|
||||
</span><a name="line-229"></a></pre></body></html>
|
||||
</span><a name="line-205"></a></pre></body></html>
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@@ -3,7 +3,7 @@
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
OpenAPI spec version: 2.0
|
||||
OpenAPI Version: 3.0.1
|
||||
Swagger Petstore API version: 1.0.0
|
||||
Contact: apiteam@swagger.io
|
||||
Generated by Swagger Codegen (https://github.com/swagger-api/swagger-codegen.git)
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
Reference in New Issue
Block a user