mirror of
https://github.com/OpenAPITools/openapi-generator.git
synced 2025-12-06 08:26:08 +00:00
[haskell-http-client] bump deps to LTS 14.3 (#3762)
This commit is contained in:
committed by
William Cheng
parent
f94ff32b0c
commit
45d70e1bf3
@@ -69,9 +69,9 @@ Module : OpenAPIPetstore.API.AnotherFake
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier hs-type">Op123testSpecialTags</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-72"></a><a name="op123testSpecialTags"><a href="OpenAPIPetstore.API.AnotherFake.html#op123testSpecialTags"><span class="hs-identifier">op123testSpecialTags</span></a></a><span> </span><a name="local-6989586621679177967"><a href="#local-6989586621679177967"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></a><a name="op123testSpecialTags"><a href="OpenAPIPetstore.API.AnotherFake.html#op123testSpecialTags"><span class="hs-identifier">op123testSpecialTags</span></a></a><span> </span><a name="local-6989586621679177260"><a href="#local-6989586621679177260"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-73"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/another-fake/dummy"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-74"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679177967"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-74"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679177260"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-75"></a><span>
|
||||
</span><a name="line-76"></a><span class="hs-keyword">data</span><span> </span><a name="Op123testSpecialTags"><a href="OpenAPIPetstore.API.AnotherFake.html#Op123testSpecialTags"><span class="hs-identifier">Op123testSpecialTags</span></a></a><span>
|
||||
</span><a name="line-77"></a><span>
|
||||
|
||||
@@ -66,13 +66,13 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- this route creates an XmlItem</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-68"></a><span class="hs-identifier">createXmlItem</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="#local-6989586621679175837"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679175837"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#XmlItem"><span class="hs-identifier hs-type">XmlItem</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175837"><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-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="#local-6989586621679175031"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679175031"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#XmlItem"><span class="hs-identifier hs-type">XmlItem</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175031"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#XmlItem"><span class="hs-identifier hs-type">XmlItem</span></a><span> </span><span class="hs-comment">-- ^ "xmlItem" - XmlItem Body</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="#local-6989586621679175837"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-73"></a><a name="createXmlItem"><a href="OpenAPIPetstore.API.Fake.html#createXmlItem"><span class="hs-identifier">createXmlItem</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679175838"><a href="#local-6989586621679175838"><span class="hs-identifier">xmlItem</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="#local-6989586621679175031"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-73"></a><a name="createXmlItem"><a href="OpenAPIPetstore.API.Fake.html#createXmlItem"><span class="hs-identifier">createXmlItem</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679175032"><a href="#local-6989586621679175032"><span class="hs-identifier">xmlItem</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-74"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/create_xml_item"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175838"><span class="hs-identifier hs-var">xmlItem</span></a><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175032"><span class="hs-identifier hs-var">xmlItem</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="CreateXmlItem"><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier">CreateXmlItem</span></a></a><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
@@ -82,11 +82,11 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-83"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
</span><a name="line-84"></a><span class="hs-comment">-- | @text/xml@</span><span>
|
||||
</span><a name="line-85"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxml"><span class="hs-identifier hs-type">MimeTextxml</span></a><span>
|
||||
</span><a name="line-85"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-type">MimeTextXml</span></a><span>
|
||||
</span><a name="line-86"></a><span class="hs-comment">-- | @text/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-87"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextxmlCharsetutf8</span></a><span>
|
||||
</span><a name="line-87"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf8</span></a><span>
|
||||
</span><a name="line-88"></a><span class="hs-comment">-- | @text/xml; charset=utf-16@</span><span>
|
||||
</span><a name="line-89"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextxmlCharsetutf16</span></a><span>
|
||||
</span><a name="line-89"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf16</span></a><span>
|
||||
</span><a name="line-90"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-91"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#CreateXmlItem"><span class="hs-identifier hs-type">CreateXmlItem</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a><span>
|
||||
</span><a name="line-92"></a><span class="hs-comment">-- | @application/xml; charset=utf-16@</span><span>
|
||||
@@ -102,10 +102,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-102"></a><span class="hs-comment">-- Test serialization of outer boolean types</span><span>
|
||||
</span><a name="line-103"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-104"></a><span class="hs-identifier">fakeOuterBooleanSerialize</span><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679175835"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-106"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175835"><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-107"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679175836"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-108"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679175835"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><a href="#local-6989586621679175836"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679175029"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-106"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175029"><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-107"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679175030"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-108"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679175029"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><a href="#local-6989586621679175030"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-109"></a><a name="fakeOuterBooleanSerialize"><a href="OpenAPIPetstore.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-110"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/boolean"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-111"></a><span>
|
||||
@@ -115,10 +115,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-115"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="OpenAPIPetstore.Model.html#BodyBool"><span class="hs-identifier hs-type">BodyBool</span></a><span>
|
||||
</span><a name="line-116"></a><span>
|
||||
</span><a name="line-117"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-118"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175828"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679175828"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-118"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175022"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679175022"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-119"></a><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="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175827"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679175827"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-121"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175021"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterBooleanSerialize"><span class="hs-identifier hs-type">FakeOuterBooleanSerialize</span></a><span> </span><a href="#local-6989586621679175021"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-122"></a><span>
|
||||
</span><a name="line-123"></a><span>
|
||||
</span><a name="line-124"></a><span class="hs-comment">-- *** fakeOuterCompositeSerialize</span><span>
|
||||
@@ -128,10 +128,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-128"></a><span class="hs-comment">-- Test serialization of object with outer number type</span><span>
|
||||
</span><a name="line-129"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-130"></a><span class="hs-identifier">fakeOuterCompositeSerialize</span><span>
|
||||
</span><a name="line-131"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679175833"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-132"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175833"><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-133"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679175834"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-134"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679175833"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><a href="#local-6989586621679175834"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-131"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679175027"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-132"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175027"><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-133"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679175028"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-134"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679175027"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span> </span><a href="#local-6989586621679175028"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-135"></a><a name="fakeOuterCompositeSerialize"><a href="OpenAPIPetstore.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-136"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/composite"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-137"></a><span>
|
||||
@@ -141,10 +141,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-141"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="OpenAPIPetstore.Model.html#OuterComposite"><span class="hs-identifier hs-type">OuterComposite</span></a><span>
|
||||
</span><a name="line-142"></a><span>
|
||||
</span><a name="line-143"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175826"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679175826"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175020"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679175020"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-145"></a><span>
|
||||
</span><a name="line-146"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-147"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175825"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679175825"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-147"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175019"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterCompositeSerialize"><span class="hs-identifier hs-type">FakeOuterCompositeSerialize</span></a><span> </span><a href="#local-6989586621679175019"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-148"></a><span>
|
||||
</span><a name="line-149"></a><span>
|
||||
</span><a name="line-150"></a><span class="hs-comment">-- *** fakeOuterNumberSerialize</span><span>
|
||||
@@ -154,10 +154,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-154"></a><span class="hs-comment">-- Test serialization of outer number types</span><span>
|
||||
</span><a name="line-155"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-156"></a><span class="hs-identifier">fakeOuterNumberSerialize</span><span>
|
||||
</span><a name="line-157"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679175831"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-158"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175831"><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-159"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679175832"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-160"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679175831"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-identifier hs-type">Double</span><span> </span><a href="#local-6989586621679175832"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-157"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679175025"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-158"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175025"><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-159"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679175026"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-160"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679175025"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-identifier hs-type">Double</span><span> </span><a href="#local-6989586621679175026"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-161"></a><a name="fakeOuterNumberSerialize"><a href="OpenAPIPetstore.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-162"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/number"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-163"></a><span>
|
||||
@@ -167,10 +167,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-167"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="OpenAPIPetstore.Model.html#BodyDouble"><span class="hs-identifier hs-type">BodyDouble</span></a><span>
|
||||
</span><a name="line-168"></a><span>
|
||||
</span><a name="line-169"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-170"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175824"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679175824"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-170"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175018"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679175018"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-171"></a><span>
|
||||
</span><a name="line-172"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-173"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175823"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679175823"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-173"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175017"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterNumberSerialize"><span class="hs-identifier hs-type">FakeOuterNumberSerialize</span></a><span> </span><a href="#local-6989586621679175017"><span class="hs-identifier hs-type">mtype</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">-- *** fakeOuterStringSerialize</span><span>
|
||||
@@ -180,10 +180,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-180"></a><span class="hs-comment">-- Test serialization of outer string types</span><span>
|
||||
</span><a name="line-181"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-182"></a><span class="hs-identifier">fakeOuterStringSerialize</span><span>
|
||||
</span><a name="line-183"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679175829"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-184"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175829"><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-185"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679175830"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679175829"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><a href="#local-6989586621679175830"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-183"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679175023"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-184"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679175023"><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-185"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679175024"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679175023"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><a href="#local-6989586621679175024"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-187"></a><a name="fakeOuterStringSerialize"><a href="OpenAPIPetstore.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-188"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/outer/string"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-189"></a><span>
|
||||
@@ -193,10 +193,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-193"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="OpenAPIPetstore.Model.html#BodyText"><span class="hs-identifier hs-type">BodyText</span></a><span>
|
||||
</span><a name="line-194"></a><span>
|
||||
</span><a name="line-195"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-196"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175822"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679175822"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-196"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175016"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679175016"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-197"></a><span>
|
||||
</span><a name="line-198"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-199"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175821"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679175821"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-199"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679175015"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#FakeOuterStringSerialize"><span class="hs-identifier hs-type">FakeOuterStringSerialize</span></a><span> </span><a href="#local-6989586621679175015"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-200"></a><span>
|
||||
</span><a name="line-201"></a><span>
|
||||
</span><a name="line-202"></a><span class="hs-comment">-- *** testBodyWithFileSchema</span><span>
|
||||
@@ -209,9 +209,9 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-209"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestBodyWithFileSchema"><span class="hs-identifier hs-type">TestBodyWithFileSchema</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#FileSchemaTestClass"><span class="hs-identifier hs-type">FileSchemaTestClass</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-210"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#FileSchemaTestClass"><span class="hs-identifier hs-type">FileSchemaTestClass</span></a><span> </span><span class="hs-comment">-- ^ "body"</span><span>
|
||||
</span><a name="line-211"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestBodyWithFileSchema"><span class="hs-identifier hs-type">TestBodyWithFileSchema</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-212"></a><a name="testBodyWithFileSchema"><a href="OpenAPIPetstore.API.Fake.html#testBodyWithFileSchema"><span class="hs-identifier">testBodyWithFileSchema</span></a></a><span> </span><a name="local-6989586621679175839"><a href="#local-6989586621679175839"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-212"></a><a name="testBodyWithFileSchema"><a href="OpenAPIPetstore.API.Fake.html#testBodyWithFileSchema"><span class="hs-identifier">testBodyWithFileSchema</span></a></a><span> </span><a name="local-6989586621679175033"><a href="#local-6989586621679175033"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-213"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/body-with-file-schema"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-214"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175839"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-214"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175033"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-215"></a><span>
|
||||
</span><a name="line-216"></a><span class="hs-keyword">data</span><span> </span><a name="TestBodyWithFileSchema"><a href="OpenAPIPetstore.API.Fake.html#TestBodyWithFileSchema"><span class="hs-identifier">TestBodyWithFileSchema</span></a></a><span>
|
||||
</span><a name="line-217"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestBodyWithFileSchema"><span class="hs-identifier hs-type">TestBodyWithFileSchema</span></a><span> </span><a href="OpenAPIPetstore.Model.html#FileSchemaTestClass"><span class="hs-identifier hs-type">FileSchemaTestClass</span></a><span>
|
||||
@@ -231,10 +231,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-231"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-comment">-- ^ "body"</span><span>
|
||||
</span><a name="line-232"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-233"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier hs-type">TestBodyWithQueryParams</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-234"></a><a name="testBodyWithQueryParams"><a href="OpenAPIPetstore.API.Fake.html#testBodyWithQueryParams"><span class="hs-identifier">testBodyWithQueryParams</span></a></a><span> </span><a name="local-6989586621679175840"><a href="#local-6989586621679175840"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Query"><span class="hs-identifier hs-var">Query</span></a><span> </span><a name="local-6989586621679175841"><a href="#local-6989586621679175841"><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-234"></a><a name="testBodyWithQueryParams"><a href="OpenAPIPetstore.API.Fake.html#testBodyWithQueryParams"><span class="hs-identifier">testBodyWithQueryParams</span></a></a><span> </span><a name="local-6989586621679175034"><a href="#local-6989586621679175034"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Query"><span class="hs-identifier hs-var">Query</span></a><span> </span><a name="local-6989586621679175035"><a href="#local-6989586621679175035"><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-235"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/body-with-query-params"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-236"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175840"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-237"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"query"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175841"><span class="hs-identifier hs-var">query</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-236"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175034"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-237"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"query"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175035"><span class="hs-identifier hs-var">query</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-238"></a><span>
|
||||
</span><a name="line-239"></a><span class="hs-keyword">data</span><span> </span><a name="TestBodyWithQueryParams"><a href="OpenAPIPetstore.API.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier">TestBodyWithQueryParams</span></a></a><span>
|
||||
</span><a name="line-240"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestBodyWithQueryParams"><span class="hs-identifier hs-type">TestBodyWithQueryParams</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span>
|
||||
@@ -257,9 +257,9 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-257"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-258"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><a name="line-259"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier hs-type">TestClientModel</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-260"></a><a name="testClientModel"><a href="OpenAPIPetstore.API.Fake.html#testClientModel"><span class="hs-identifier">testClientModel</span></a></a><span> </span><a name="local-6989586621679175842"><a href="#local-6989586621679175842"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-260"></a><a name="testClientModel"><a href="OpenAPIPetstore.API.Fake.html#testClientModel"><span class="hs-identifier">testClientModel</span></a></a><span> </span><a name="local-6989586621679175036"><a href="#local-6989586621679175036"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-261"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-262"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175842"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-262"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175036"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-263"></a><span>
|
||||
</span><a name="line-264"></a><span class="hs-keyword">data</span><span> </span><a name="TestClientModel"><a href="OpenAPIPetstore.API.Fake.html#TestClientModel"><span class="hs-identifier">TestClientModel</span></a></a><span>
|
||||
</span><a name="line-265"></a><span>
|
||||
@@ -290,65 +290,65 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-290"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-291"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-292"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-293"></a><a name="testEndpointParameters"><a href="OpenAPIPetstore.API.Fake.html#testEndpointParameters"><span class="hs-identifier">testEndpointParameters</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Number"><span class="hs-identifier hs-var">Number</span></a><span> </span><a name="local-6989586621679175843"><a href="#local-6989586621679175843"><span class="hs-identifier">number</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamDouble"><span class="hs-identifier hs-var">ParamDouble</span></a><span> </span><a name="local-6989586621679175844"><a href="#local-6989586621679175844"><span class="hs-identifier">double</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PatternWithoutDelimiter"><span class="hs-identifier hs-var">PatternWithoutDelimiter</span></a><span> </span><a name="local-6989586621679175845"><a href="#local-6989586621679175845"><span class="hs-identifier">patternWithoutDelimiter</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Byte"><span class="hs-identifier hs-var">Byte</span></a><span> </span><a name="local-6989586621679175846"><a href="#local-6989586621679175846"><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-293"></a><a name="testEndpointParameters"><a href="OpenAPIPetstore.API.Fake.html#testEndpointParameters"><span class="hs-identifier">testEndpointParameters</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Number"><span class="hs-identifier hs-var">Number</span></a><span> </span><a name="local-6989586621679175037"><a href="#local-6989586621679175037"><span class="hs-identifier">number</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamDouble"><span class="hs-identifier hs-var">ParamDouble</span></a><span> </span><a name="local-6989586621679175038"><a href="#local-6989586621679175038"><span class="hs-identifier">double</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PatternWithoutDelimiter"><span class="hs-identifier hs-var">PatternWithoutDelimiter</span></a><span> </span><a name="local-6989586621679175039"><a href="#local-6989586621679175039"><span class="hs-identifier">patternWithoutDelimiter</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Byte"><span class="hs-identifier hs-var">Byte</span></a><span> </span><a name="local-6989586621679175040"><a href="#local-6989586621679175040"><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-294"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-295"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthBasicHttpBasicTest"><span class="hs-identifier hs-type">AuthBasicHttpBasicTest</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-296"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175843"><span class="hs-identifier hs-var">number</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-297"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175844"><span class="hs-identifier hs-var">double</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-298"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175845"><span class="hs-identifier hs-var">patternWithoutDelimiter</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-299"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175846"><span class="hs-identifier hs-var">byte</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-296"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175037"><span class="hs-identifier hs-var">number</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-297"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175038"><span class="hs-identifier hs-var">double</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-298"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175039"><span class="hs-identifier hs-var">patternWithoutDelimiter</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-299"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175040"><span class="hs-identifier hs-var">byte</span></a><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="TestEndpointParameters"><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier">TestEndpointParameters</span></a></a><span>
|
||||
</span><a name="line-302"></a><span>
|
||||
</span><a name="line-303"></a><span class="hs-comment">-- | /Optional Param/ "integer" - None</span><span>
|
||||
</span><a name="line-304"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-305"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175819"><a href="#local-6989586621679175819"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamInteger"><span class="hs-identifier hs-var">ParamInteger</span></a><span> </span><a name="local-6989586621679175820"><a href="#local-6989586621679175820"><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-6989586621679175819"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175820"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-305"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175013"><a href="#local-6989586621679175013"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamInteger"><span class="hs-identifier hs-var">ParamInteger</span></a><span> </span><a name="local-6989586621679175014"><a href="#local-6989586621679175014"><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-6989586621679175013"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175014"><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/ "int32" - None</span><span>
|
||||
</span><a name="line-309"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-310"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175817"><a href="#local-6989586621679175817"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Int32"><span class="hs-identifier hs-var">Int32</span></a><span> </span><a name="local-6989586621679175818"><a href="#local-6989586621679175818"><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-6989586621679175817"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175818"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-310"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175011"><a href="#local-6989586621679175011"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Int32"><span class="hs-identifier hs-var">Int32</span></a><span> </span><a name="local-6989586621679175012"><a href="#local-6989586621679175012"><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-6989586621679175011"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175012"><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/ "int64" - None</span><span>
|
||||
</span><a name="line-314"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-315"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175815"><a href="#local-6989586621679175815"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Int64"><span class="hs-identifier hs-var">Int64</span></a><span> </span><a name="local-6989586621679175816"><a href="#local-6989586621679175816"><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-6989586621679175815"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175816"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-315"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175009"><a href="#local-6989586621679175009"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Int64"><span class="hs-identifier hs-var">Int64</span></a><span> </span><a name="local-6989586621679175010"><a href="#local-6989586621679175010"><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-6989586621679175009"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175010"><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/ "float" - None</span><span>
|
||||
</span><a name="line-319"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-320"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175813"><a href="#local-6989586621679175813"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamFloat"><span class="hs-identifier hs-var">ParamFloat</span></a><span> </span><a name="local-6989586621679175814"><a href="#local-6989586621679175814"><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-6989586621679175813"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175814"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-320"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175007"><a href="#local-6989586621679175007"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamFloat"><span class="hs-identifier hs-var">ParamFloat</span></a><span> </span><a name="local-6989586621679175008"><a href="#local-6989586621679175008"><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-6989586621679175007"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175008"><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 class="hs-comment">-- | /Optional Param/ "string" - None</span><span>
|
||||
</span><a name="line-324"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-325"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175811"><a href="#local-6989586621679175811"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamString"><span class="hs-identifier hs-var">ParamString</span></a><span> </span><a name="local-6989586621679175812"><a href="#local-6989586621679175812"><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-6989586621679175811"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175812"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-325"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175005"><a href="#local-6989586621679175005"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamString"><span class="hs-identifier hs-var">ParamString</span></a><span> </span><a name="local-6989586621679175006"><a href="#local-6989586621679175006"><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-6989586621679175005"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175006"><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/ "binary" - None</span><span>
|
||||
</span><a name="line-329"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-330"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175809"><a href="#local-6989586621679175809"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamBinary"><span class="hs-identifier hs-var">ParamBinary</span></a><span> </span><a name="local-6989586621679175810"><a href="#local-6989586621679175810"><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-6989586621679175809"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partFileSource</span><span> </span><span class="hs-string">"binary"</span><span> </span><a href="#local-6989586621679175810"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-330"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175003"><a href="#local-6989586621679175003"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamBinary"><span class="hs-identifier hs-var">ParamBinary</span></a><span> </span><a name="local-6989586621679175004"><a href="#local-6989586621679175004"><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-6989586621679175003"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partFileSource</span><span> </span><span class="hs-string">"binary"</span><span> </span><a href="#local-6989586621679175004"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-332"></a><span>
|
||||
</span><a name="line-333"></a><span class="hs-comment">-- | /Optional Param/ "date" - None</span><span>
|
||||
</span><a name="line-334"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-335"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175807"><a href="#local-6989586621679175807"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamDate"><span class="hs-identifier hs-var">ParamDate</span></a><span> </span><a name="local-6989586621679175808"><a href="#local-6989586621679175808"><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-6989586621679175807"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175808"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-335"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175001"><a href="#local-6989586621679175001"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamDate"><span class="hs-identifier hs-var">ParamDate</span></a><span> </span><a name="local-6989586621679175002"><a href="#local-6989586621679175002"><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-6989586621679175001"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175002"><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/ "dateTime" - None</span><span>
|
||||
</span><a name="line-339"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-340"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175805"><a href="#local-6989586621679175805"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamDateTime"><span class="hs-identifier hs-var">ParamDateTime</span></a><span> </span><a name="local-6989586621679175806"><a href="#local-6989586621679175806"><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-6989586621679175805"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175806"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-340"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174999"><a href="#local-6989586621679174999"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ParamDateTime"><span class="hs-identifier hs-var">ParamDateTime</span></a><span> </span><a name="local-6989586621679175000"><a href="#local-6989586621679175000"><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-6989586621679174999"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175000"><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">-- | /Optional Param/ "password" - None</span><span>
|
||||
</span><a name="line-344"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-345"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175803"><a href="#local-6989586621679175803"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679175804"><a href="#local-6989586621679175804"><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-346"></a><span> </span><a href="#local-6989586621679175803"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175804"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-345"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174997"><a href="#local-6989586621679174997"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679174998"><a href="#local-6989586621679174998"><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-346"></a><span> </span><a href="#local-6989586621679174997"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679174998"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-347"></a><span>
|
||||
</span><a name="line-348"></a><span class="hs-comment">-- | /Optional Param/ "callback" - None</span><span>
|
||||
</span><a name="line-349"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.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-350"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175801"><a href="#local-6989586621679175801"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Callback"><span class="hs-identifier hs-var">Callback</span></a><span> </span><a name="local-6989586621679175802"><a href="#local-6989586621679175802"><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-351"></a><span> </span><a href="#local-6989586621679175801"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175802"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-350"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174995"><a href="#local-6989586621679174995"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Callback"><span class="hs-identifier hs-var">Callback</span></a><span> </span><a name="local-6989586621679174996"><a href="#local-6989586621679174996"><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-351"></a><span> </span><a href="#local-6989586621679174995"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679174996"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-352"></a><span>
|
||||
</span><a name="line-353"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-354"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEndpointParameters"><span class="hs-identifier hs-type">TestEndpointParameters</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span>
|
||||
@@ -374,43 +374,43 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-374"></a><span>
|
||||
</span><a name="line-375"></a><span class="hs-comment">-- | /Optional Param/ "enum_form_string_array" - Form parameter enum test (string array)</span><span>
|
||||
</span><a name="line-376"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.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-377"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175799"><a href="#local-6989586621679175799"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumFormStringArray"><span class="hs-identifier hs-var">EnumFormStringArray</span></a><span> </span><a name="local-6989586621679175800"><a href="#local-6989586621679175800"><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-378"></a><span> </span><a href="#local-6989586621679175799"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toFormColl"><span class="hs-identifier hs-var">toFormColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679175800"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-377"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174993"><a href="#local-6989586621679174993"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumFormStringArray"><span class="hs-identifier hs-var">EnumFormStringArray</span></a><span> </span><a name="local-6989586621679174994"><a href="#local-6989586621679174994"><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-378"></a><span> </span><a href="#local-6989586621679174993"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toFormColl"><span class="hs-identifier hs-var">toFormColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679174994"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-379"></a><span>
|
||||
</span><a name="line-380"></a><span class="hs-comment">-- | /Optional Param/ "enum_form_string" - Form parameter enum test (string)</span><span>
|
||||
</span><a name="line-381"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.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-382"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175797"><a href="#local-6989586621679175797"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumFormString"><span class="hs-identifier hs-var">EnumFormString</span></a><span> </span><a name="local-6989586621679175798"><a href="#local-6989586621679175798"><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-383"></a><span> </span><a href="#local-6989586621679175797"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175798"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-382"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174991"><a href="#local-6989586621679174991"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumFormString"><span class="hs-identifier hs-var">EnumFormString</span></a><span> </span><a name="local-6989586621679174992"><a href="#local-6989586621679174992"><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-383"></a><span> </span><a href="#local-6989586621679174991"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679174992"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-384"></a><span>
|
||||
</span><a name="line-385"></a><span class="hs-comment">-- | /Optional Param/ "enum_header_string_array" - Header parameter enum test (string array)</span><span>
|
||||
</span><a name="line-386"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.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-387"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175795"><a href="#local-6989586621679175795"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumHeaderStringArray"><span class="hs-identifier hs-var">EnumHeaderStringArray</span></a><span> </span><a name="local-6989586621679175796"><a href="#local-6989586621679175796"><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-388"></a><span> </span><a href="#local-6989586621679175795"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toHeaderColl"><span class="hs-identifier hs-var">toHeaderColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679175796"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-387"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174989"><a href="#local-6989586621679174989"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumHeaderStringArray"><span class="hs-identifier hs-var">EnumHeaderStringArray</span></a><span> </span><a name="local-6989586621679174990"><a href="#local-6989586621679174990"><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-388"></a><span> </span><a href="#local-6989586621679174989"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toHeaderColl"><span class="hs-identifier hs-var">toHeaderColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679174990"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-389"></a><span>
|
||||
</span><a name="line-390"></a><span class="hs-comment">-- | /Optional Param/ "enum_header_string" - Header parameter enum test (string)</span><span>
|
||||
</span><a name="line-391"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.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-392"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175793"><a href="#local-6989586621679175793"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumHeaderString"><span class="hs-identifier hs-var">EnumHeaderString</span></a><span> </span><a name="local-6989586621679175794"><a href="#local-6989586621679175794"><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-393"></a><span> </span><a href="#local-6989586621679175793"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175794"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-392"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174987"><a href="#local-6989586621679174987"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumHeaderString"><span class="hs-identifier hs-var">EnumHeaderString</span></a><span> </span><a name="local-6989586621679174988"><a href="#local-6989586621679174988"><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-393"></a><span> </span><a href="#local-6989586621679174987"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679174988"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-394"></a><span>
|
||||
</span><a name="line-395"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_string_array" - Query parameter enum test (string array)</span><span>
|
||||
</span><a name="line-396"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.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-397"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175791"><a href="#local-6989586621679175791"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumQueryStringArray"><span class="hs-identifier hs-var">EnumQueryStringArray</span></a><span> </span><a name="local-6989586621679175792"><a href="#local-6989586621679175792"><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-398"></a><span> </span><a href="#local-6989586621679175791"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679175792"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-397"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174985"><a href="#local-6989586621679174985"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumQueryStringArray"><span class="hs-identifier hs-var">EnumQueryStringArray</span></a><span> </span><a name="local-6989586621679174986"><a href="#local-6989586621679174986"><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-398"></a><span> </span><a href="#local-6989586621679174985"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679174986"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-399"></a><span>
|
||||
</span><a name="line-400"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_string" - Query parameter enum test (string)</span><span>
|
||||
</span><a name="line-401"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.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-402"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175789"><a href="#local-6989586621679175789"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumQueryString"><span class="hs-identifier hs-var">EnumQueryString</span></a><span> </span><a name="local-6989586621679175790"><a href="#local-6989586621679175790"><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-403"></a><span> </span><a href="#local-6989586621679175789"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_string"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175790"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-402"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174983"><a href="#local-6989586621679174983"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumQueryString"><span class="hs-identifier hs-var">EnumQueryString</span></a><span> </span><a name="local-6989586621679174984"><a href="#local-6989586621679174984"><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-403"></a><span> </span><a href="#local-6989586621679174983"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_string"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679174984"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-404"></a><span>
|
||||
</span><a name="line-405"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_integer" - Query parameter enum test (double)</span><span>
|
||||
</span><a name="line-406"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.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-407"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175787"><a href="#local-6989586621679175787"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumQueryInteger"><span class="hs-identifier hs-var">EnumQueryInteger</span></a><span> </span><a name="local-6989586621679175788"><a href="#local-6989586621679175788"><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-408"></a><span> </span><a href="#local-6989586621679175787"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_integer"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175788"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-407"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174981"><a href="#local-6989586621679174981"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumQueryInteger"><span class="hs-identifier hs-var">EnumQueryInteger</span></a><span> </span><a name="local-6989586621679174982"><a href="#local-6989586621679174982"><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-408"></a><span> </span><a href="#local-6989586621679174981"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_integer"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679174982"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-409"></a><span>
|
||||
</span><a name="line-410"></a><span class="hs-comment">-- | /Optional Param/ "enum_query_double" - Query parameter enum test (double)</span><span>
|
||||
</span><a name="line-411"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.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-412"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175785"><a href="#local-6989586621679175785"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumQueryDouble"><span class="hs-identifier hs-var">EnumQueryDouble</span></a><span> </span><a name="local-6989586621679175786"><a href="#local-6989586621679175786"><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-413"></a><span> </span><a href="#local-6989586621679175785"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_double"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175786"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-412"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174979"><a href="#local-6989586621679174979"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#EnumQueryDouble"><span class="hs-identifier hs-var">EnumQueryDouble</span></a><span> </span><a name="local-6989586621679174980"><a href="#local-6989586621679174980"><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-413"></a><span> </span><a href="#local-6989586621679174979"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"enum_query_double"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679174980"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-414"></a><span>
|
||||
</span><a name="line-415"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-416"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestEnumParameters"><span class="hs-identifier hs-type">TestEnumParameters</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span>
|
||||
@@ -431,28 +431,28 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-431"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#RequiredBooleanGroup"><span class="hs-identifier hs-type">RequiredBooleanGroup</span></a><span> </span><span class="hs-comment">-- ^ "requiredBooleanGroup" - Required Boolean in group parameters</span><span>
|
||||
</span><a name="line-432"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#RequiredInt64Group"><span class="hs-identifier hs-type">RequiredInt64Group</span></a><span> </span><span class="hs-comment">-- ^ "requiredInt64Group" - Required Integer in group parameters</span><span>
|
||||
</span><a name="line-433"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestGroupParameters"><span class="hs-identifier hs-type">TestGroupParameters</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-434"></a><a name="testGroupParameters"><a href="OpenAPIPetstore.API.Fake.html#testGroupParameters"><span class="hs-identifier">testGroupParameters</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#RequiredStringGroup"><span class="hs-identifier hs-var">RequiredStringGroup</span></a><span> </span><a name="local-6989586621679175847"><a href="#local-6989586621679175847"><span class="hs-identifier">requiredStringGroup</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#RequiredBooleanGroup"><span class="hs-identifier hs-var">RequiredBooleanGroup</span></a><span> </span><a name="local-6989586621679175848"><a href="#local-6989586621679175848"><span class="hs-identifier">requiredBooleanGroup</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#RequiredInt64Group"><span class="hs-identifier hs-var">RequiredInt64Group</span></a><span> </span><a name="local-6989586621679175849"><a href="#local-6989586621679175849"><span class="hs-identifier">requiredInt64Group</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-434"></a><a name="testGroupParameters"><a href="OpenAPIPetstore.API.Fake.html#testGroupParameters"><span class="hs-identifier">testGroupParameters</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#RequiredStringGroup"><span class="hs-identifier hs-var">RequiredStringGroup</span></a><span> </span><a name="local-6989586621679175041"><a href="#local-6989586621679175041"><span class="hs-identifier">requiredStringGroup</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#RequiredBooleanGroup"><span class="hs-identifier hs-var">RequiredBooleanGroup</span></a><span> </span><a name="local-6989586621679175042"><a href="#local-6989586621679175042"><span class="hs-identifier">requiredBooleanGroup</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#RequiredInt64Group"><span class="hs-identifier hs-var">RequiredInt64Group</span></a><span> </span><a name="local-6989586621679175043"><a href="#local-6989586621679175043"><span class="hs-identifier">requiredInt64Group</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-435"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-436"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"required_string_group"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175847"><span class="hs-identifier hs-var">requiredStringGroup</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-437"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"required_boolean_group"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679175848"><span class="hs-identifier hs-var">requiredBooleanGroup</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-438"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"required_int64_group"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175849"><span class="hs-identifier hs-var">requiredInt64Group</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-436"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"required_string_group"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175041"><span class="hs-identifier hs-var">requiredStringGroup</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-437"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"required_boolean_group"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679175042"><span class="hs-identifier hs-var">requiredBooleanGroup</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-438"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"required_int64_group"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175043"><span class="hs-identifier hs-var">requiredInt64Group</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-439"></a><span>
|
||||
</span><a name="line-440"></a><span class="hs-keyword">data</span><span> </span><a name="TestGroupParameters"><a href="OpenAPIPetstore.API.Fake.html#TestGroupParameters"><span class="hs-identifier">TestGroupParameters</span></a></a><span>
|
||||
</span><a name="line-441"></a><span>
|
||||
</span><a name="line-442"></a><span class="hs-comment">-- | /Optional Param/ "string_group" - String in group parameters</span><span>
|
||||
</span><a name="line-443"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestGroupParameters"><span class="hs-identifier hs-type">TestGroupParameters</span></a><span> </span><a href="OpenAPIPetstore.Model.html#StringGroup"><span class="hs-identifier hs-type">StringGroup</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-444"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175783"><a href="#local-6989586621679175783"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#StringGroup"><span class="hs-identifier hs-var">StringGroup</span></a><span> </span><a name="local-6989586621679175784"><a href="#local-6989586621679175784"><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-445"></a><span> </span><a href="#local-6989586621679175783"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"string_group"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175784"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-444"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174977"><a href="#local-6989586621679174977"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#StringGroup"><span class="hs-identifier hs-var">StringGroup</span></a><span> </span><a name="local-6989586621679174978"><a href="#local-6989586621679174978"><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-445"></a><span> </span><a href="#local-6989586621679174977"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"string_group"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679174978"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-446"></a><span>
|
||||
</span><a name="line-447"></a><span class="hs-comment">-- | /Optional Param/ "boolean_group" - Boolean in group parameters</span><span>
|
||||
</span><a name="line-448"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestGroupParameters"><span class="hs-identifier hs-type">TestGroupParameters</span></a><span> </span><a href="OpenAPIPetstore.Model.html#BooleanGroup"><span class="hs-identifier hs-type">BooleanGroup</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-449"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175781"><a href="#local-6989586621679175781"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#BooleanGroup"><span class="hs-identifier hs-var">BooleanGroup</span></a><span> </span><a name="local-6989586621679175782"><a href="#local-6989586621679175782"><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-450"></a><span> </span><a href="#local-6989586621679175781"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"boolean_group"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679175782"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-449"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174975"><a href="#local-6989586621679174975"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#BooleanGroup"><span class="hs-identifier hs-var">BooleanGroup</span></a><span> </span><a name="local-6989586621679174976"><a href="#local-6989586621679174976"><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-450"></a><span> </span><a href="#local-6989586621679174975"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"boolean_group"</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679174976"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-451"></a><span>
|
||||
</span><a name="line-452"></a><span class="hs-comment">-- | /Optional Param/ "int64_group" - Integer in group parameters</span><span>
|
||||
</span><a name="line-453"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestGroupParameters"><span class="hs-identifier hs-type">TestGroupParameters</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Int64Group"><span class="hs-identifier hs-type">Int64Group</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-454"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679175779"><a href="#local-6989586621679175779"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Int64Group"><span class="hs-identifier hs-var">Int64Group</span></a><span> </span><a name="local-6989586621679175780"><a href="#local-6989586621679175780"><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-455"></a><span> </span><a href="#local-6989586621679175779"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"int64_group"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175780"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-454"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174973"><a href="#local-6989586621679174973"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Int64Group"><span class="hs-identifier hs-var">Int64Group</span></a><span> </span><a name="local-6989586621679174974"><a href="#local-6989586621679174974"><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-455"></a><span> </span><a href="#local-6989586621679174973"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"int64_group"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679174974"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-456"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestGroupParameters"><span class="hs-identifier hs-type">TestGroupParameters</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-457"></a><span>
|
||||
</span><a name="line-458"></a><span>
|
||||
@@ -466,9 +466,9 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-466"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#ParamMapMapStringText"><span class="hs-identifier hs-type">ParamMapMapStringText</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-467"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#ParamMapMapStringText"><span class="hs-identifier hs-type">ParamMapMapStringText</span></a><span> </span><span class="hs-comment">-- ^ "param" - request body</span><span>
|
||||
</span><a name="line-468"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier hs-type">TestInlineAdditionalProperties</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-469"></a><a name="testInlineAdditionalProperties"><a href="OpenAPIPetstore.API.Fake.html#testInlineAdditionalProperties"><span class="hs-identifier">testInlineAdditionalProperties</span></a></a><span> </span><a name="local-6989586621679175850"><a href="#local-6989586621679175850"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-469"></a><a name="testInlineAdditionalProperties"><a href="OpenAPIPetstore.API.Fake.html#testInlineAdditionalProperties"><span class="hs-identifier">testInlineAdditionalProperties</span></a></a><span> </span><a name="local-6989586621679175044"><a href="#local-6989586621679175044"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-470"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/inline-additionalProperties"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-471"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175850"><span class="hs-identifier hs-var">param</span></a><span>
|
||||
</span><a name="line-471"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175044"><span class="hs-identifier hs-var">param</span></a><span>
|
||||
</span><a name="line-472"></a><span>
|
||||
</span><a name="line-473"></a><span class="hs-keyword">data</span><span> </span><a name="TestInlineAdditionalProperties"><a href="OpenAPIPetstore.API.Fake.html#TestInlineAdditionalProperties"><span class="hs-identifier">TestInlineAdditionalProperties</span></a></a><span>
|
||||
</span><a name="line-474"></a><span>
|
||||
@@ -492,10 +492,10 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-492"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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-493"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-494"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-495"></a><a name="testJsonFormData"><a href="OpenAPIPetstore.API.Fake.html#testJsonFormData"><span class="hs-identifier">testJsonFormData</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Param"><span class="hs-identifier hs-var">Param</span></a><span> </span><a name="local-6989586621679175851"><a href="#local-6989586621679175851"><span class="hs-identifier">param</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Param2"><span class="hs-identifier hs-var">Param2</span></a><span> </span><a name="local-6989586621679175852"><a href="#local-6989586621679175852"><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-495"></a><a name="testJsonFormData"><a href="OpenAPIPetstore.API.Fake.html#testJsonFormData"><span class="hs-identifier">testJsonFormData</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Param"><span class="hs-identifier hs-var">Param</span></a><span> </span><a name="local-6989586621679175045"><a href="#local-6989586621679175045"><span class="hs-identifier">param</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Param2"><span class="hs-identifier hs-var">Param2</span></a><span> </span><a name="local-6989586621679175046"><a href="#local-6989586621679175046"><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-496"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/jsonFormData"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-497"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175851"><span class="hs-identifier hs-var">param</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-498"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175852"><span class="hs-identifier hs-var">param2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-497"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175045"><span class="hs-identifier hs-var">param</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-498"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679175046"><span class="hs-identifier hs-var">param2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-499"></a><span>
|
||||
</span><a name="line-500"></a><span class="hs-keyword">data</span><span> </span><a name="TestJsonFormData"><a href="OpenAPIPetstore.API.Fake.html#TestJsonFormData"><span class="hs-identifier">TestJsonFormData</span></a></a><span>
|
||||
</span><a name="line-501"></a><span>
|
||||
@@ -504,4 +504,29 @@ Module : OpenAPIPetstore.API.Fake
|
||||
</span><a name="line-504"></a><span>
|
||||
</span><a name="line-505"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestJsonFormData"><span class="hs-identifier hs-type">TestJsonFormData</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-506"></a><span>
|
||||
</span><a name="line-507"></a></pre></body></html>
|
||||
</span><a name="line-507"></a><span>
|
||||
</span><a name="line-508"></a><span class="hs-comment">-- *** testQueryParameterCollectionFormat</span><span>
|
||||
</span><a name="line-509"></a><span>
|
||||
</span><a name="line-510"></a><span class="hs-comment">-- | @PUT \/fake\/test-query-paramters@</span><span>
|
||||
</span><a name="line-511"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-512"></a><span class="hs-comment">-- To test the collection format in query parameters</span><span>
|
||||
</span><a name="line-513"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-514"></a><span class="hs-identifier">testQueryParameterCollectionFormat</span><span>
|
||||
</span><a name="line-515"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Model.html#Pipe"><span class="hs-identifier hs-type">Pipe</span></a><span> </span><span class="hs-comment">-- ^ "pipe"</span><span>
|
||||
</span><a name="line-516"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Ioutil"><span class="hs-identifier hs-type">Ioutil</span></a><span> </span><span class="hs-comment">-- ^ "ioutil"</span><span>
|
||||
</span><a name="line-517"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Http"><span class="hs-identifier hs-type">Http</span></a><span> </span><span class="hs-comment">-- ^ "http"</span><span>
|
||||
</span><a name="line-518"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Url"><span class="hs-identifier hs-type">Url</span></a><span> </span><span class="hs-comment">-- ^ "url"</span><span>
|
||||
</span><a name="line-519"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Context"><span class="hs-identifier hs-type">Context</span></a><span> </span><span class="hs-comment">-- ^ "context"</span><span>
|
||||
</span><a name="line-520"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestQueryParameterCollectionFormat"><span class="hs-identifier hs-type">TestQueryParameterCollectionFormat</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-521"></a><a name="testQueryParameterCollectionFormat"><a href="OpenAPIPetstore.API.Fake.html#testQueryParameterCollectionFormat"><span class="hs-identifier">testQueryParameterCollectionFormat</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Pipe"><span class="hs-identifier hs-var">Pipe</span></a><span> </span><a name="local-6989586621679175047"><a href="#local-6989586621679175047"><span class="hs-identifier">pipe</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Ioutil"><span class="hs-identifier hs-var">Ioutil</span></a><span> </span><a name="local-6989586621679175048"><a href="#local-6989586621679175048"><span class="hs-identifier">ioutil</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Http"><span class="hs-identifier hs-var">Http</span></a><span> </span><a name="local-6989586621679175049"><a href="#local-6989586621679175049"><span class="hs-identifier">http</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Url"><span class="hs-identifier hs-var">Url</span></a><span> </span><a name="local-6989586621679175050"><a href="#local-6989586621679175050"><span class="hs-identifier">url</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Context"><span class="hs-identifier hs-var">Context</span></a><span> </span><a name="local-6989586621679175051"><a href="#local-6989586621679175051"><span class="hs-identifier">context</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-522"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/test-query-paramters"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-523"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"pipe"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175047"><span class="hs-identifier hs-var">pipe</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-524"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"ioutil"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175048"><span class="hs-identifier hs-var">ioutil</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-525"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.Core.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"http"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175049"><span class="hs-identifier hs-var">http</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-526"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"url"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175050"><span class="hs-identifier hs-var">url</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-527"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.Core.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"context"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679175051"><span class="hs-identifier hs-var">context</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-528"></a><span>
|
||||
</span><a name="line-529"></a><span class="hs-keyword">data</span><span> </span><a name="TestQueryParameterCollectionFormat"><a href="OpenAPIPetstore.API.Fake.html#TestQueryParameterCollectionFormat"><span class="hs-identifier">TestQueryParameterCollectionFormat</span></a></a><span>
|
||||
</span><a name="line-530"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Fake.html#TestQueryParameterCollectionFormat"><span class="hs-identifier hs-type">TestQueryParameterCollectionFormat</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-531"></a><span>
|
||||
</span><a name="line-532"></a></pre></body></html>
|
||||
@@ -71,10 +71,10 @@ Module : OpenAPIPetstore.API.FakeClassnameTags123
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><span class="hs-comment">-- ^ "body" - client model</span><span>
|
||||
</span><a name="line-73"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier hs-type">TestClassname</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Client"><span class="hs-identifier hs-type">Client</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-74"></a><a name="testClassname"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier">testClassname</span></a></a><span> </span><a name="local-6989586621679175634"><a href="#local-6989586621679175634"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-74"></a><a name="testClassname"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#testClassname"><span class="hs-identifier">testClassname</span></a></a><span> </span><a name="local-6989586621679174826"><a href="#local-6989586621679174826"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-75"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PATCH"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake_classname_test"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthApiKeyApiKeyQuery"><span class="hs-identifier hs-type">AuthApiKeyApiKeyQuery</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-77"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679175634"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-77"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679174826"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span class="hs-keyword">data</span><span> </span><a name="TestClassname"><a href="OpenAPIPetstore.API.FakeClassnameTags123.html#TestClassname"><span class="hs-identifier">TestClassname</span></a></a><span>
|
||||
</span><a name="line-80"></a><span>
|
||||
|
||||
@@ -66,14 +66,14 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-68"></a><span class="hs-identifier">addPet</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679174591"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679174591"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679174591"><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-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679173778"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679173778"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679173778"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#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-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679174591"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-73"></a><a name="addPet"><a href="OpenAPIPetstore.API.Pet.html#addPet"><span class="hs-identifier">addPet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679174592"><a href="#local-6989586621679174592"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier hs-type">AddPet</span></a><span> </span><a href="#local-6989586621679173778"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-73"></a><a name="addPet"><a href="OpenAPIPetstore.API.Pet.html#addPet"><span class="hs-identifier">addPet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679173779"><a href="#local-6989586621679173779"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-74"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679174592"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679173779"><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="AddPet"><a href="OpenAPIPetstore.API.Pet.html#AddPet"><span class="hs-identifier">AddPet</span></a></a><span>
|
||||
</span><a name="line-79"></a><span>
|
||||
@@ -99,14 +99,14 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-99"></a><span class="hs-identifier">deletePet</span><span>
|
||||
</span><a name="line-100"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.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-101"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-102"></a><a name="deletePet"><a href="OpenAPIPetstore.API.Pet.html#deletePet"><span class="hs-identifier">deletePet</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679174593"><a href="#local-6989586621679174593"><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-103"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679174593"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-102"></a><a name="deletePet"><a href="OpenAPIPetstore.API.Pet.html#deletePet"><span class="hs-identifier">deletePet</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679173780"><a href="#local-6989586621679173780"><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-103"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173780"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-104"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-105"></a><span>
|
||||
</span><a name="line-106"></a><span class="hs-keyword">data</span><span> </span><a name="DeletePet"><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier">DeletePet</span></a></a><span>
|
||||
</span><a name="line-107"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="OpenAPIPetstore.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-108"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174585"><a href="#local-6989586621679174585"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ApiKey"><span class="hs-identifier hs-var">ApiKey</span></a><span> </span><a name="local-6989586621679174586"><a href="#local-6989586621679174586"><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-109"></a><span> </span><a href="#local-6989586621679174585"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679174586"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-108"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679173772"><a href="#local-6989586621679173772"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#ApiKey"><span class="hs-identifier hs-var">ApiKey</span></a><span> </span><a name="local-6989586621679173773"><a href="#local-6989586621679173773"><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-109"></a><span> </span><a href="#local-6989586621679173772"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier hs-var">setHeader</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679173773"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-110"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#DeletePet"><span class="hs-identifier hs-type">DeletePet</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-111"></a><span>
|
||||
</span><a name="line-112"></a><span>
|
||||
@@ -121,13 +121,13 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-121"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-122"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-123"></a><span class="hs-identifier">findPetsByStatus</span><span>
|
||||
</span><a name="line-124"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679174590"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-124"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679173777"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-125"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-126"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">[</span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">]</span><span> </span><a href="#local-6989586621679174590"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-127"></a><a name="findPetsByStatus"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Model.html#Status"><span class="hs-identifier hs-var">Status</span></a><span> </span><a name="local-6989586621679174594"><a href="#local-6989586621679174594"><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-126"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier hs-type">FindPetsByStatus</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">[</span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">]</span><span> </span><a href="#local-6989586621679173777"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-127"></a><a name="findPetsByStatus"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Model.html#Status"><span class="hs-identifier hs-var">Status</span></a><span> </span><a name="local-6989586621679173781"><a href="#local-6989586621679173781"><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-128"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/findByStatus"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-129"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-130"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679174594"><span class="hs-identifier hs-var">status</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-130"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679173781"><span class="hs-identifier hs-var">status</span></a><span class="hs-special">)</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="FindPetsByStatus"><a href="OpenAPIPetstore.API.Pet.html#FindPetsByStatus"><span class="hs-identifier">FindPetsByStatus</span></a></a><span>
|
||||
</span><a name="line-133"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
@@ -147,13 +147,13 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-147"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-148"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-149"></a><span class="hs-identifier">findPetsByTags</span><span>
|
||||
</span><a name="line-150"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679174589"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-150"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679173776"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-151"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-152"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">[</span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">]</span><span> </span><a href="#local-6989586621679174589"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-153"></a><a name="findPetsByTags"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Model.html#Tags"><span class="hs-identifier hs-var">Tags</span></a><span> </span><a name="local-6989586621679174595"><a href="#local-6989586621679174595"><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-152"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#FindPetsByTags"><span class="hs-identifier hs-type">FindPetsByTags</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-special">[</span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">]</span><span> </span><a href="#local-6989586621679173776"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-153"></a><a name="findPetsByTags"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Model.html#Tags"><span class="hs-identifier hs-var">Tags</span></a><span> </span><a name="local-6989586621679173782"><a href="#local-6989586621679173782"><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-154"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/findByTags"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-155"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-156"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679174595"><span class="hs-identifier hs-var">tags</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-156"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier hs-var">toQueryColl</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679173782"><span class="hs-identifier hs-var">tags</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-157"></a><span>
|
||||
</span><a name="line-158"></a><span class="hs-pragma">{-# DEPRECATED</span><span> </span><span class="hs-pragma">findPetsByTags</span><span> </span><span class="hs-pragma">""</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-159"></a><span>
|
||||
@@ -175,11 +175,11 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-175"></a><span class="hs-comment">-- AuthMethod: 'AuthApiKeyApiKey'</span><span>
|
||||
</span><a name="line-176"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-177"></a><span class="hs-identifier">getPetById</span><span>
|
||||
</span><a name="line-178"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679174588"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-178"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679173775"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-179"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-180"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><a href="#local-6989586621679174588"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-181"></a><a name="getPetById"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679174596"><a href="#local-6989586621679174596"><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-182"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679174596"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-180"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#GetPetById"><span class="hs-identifier hs-type">GetPetById</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span> </span><a href="#local-6989586621679173775"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-181"></a><a name="getPetById"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679173783"><a href="#local-6989586621679173783"><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-182"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173783"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-183"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthApiKeyApiKey"><span class="hs-identifier hs-type">AuthApiKeyApiKey</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-184"></a><span>
|
||||
</span><a name="line-185"></a><span class="hs-keyword">data</span><span> </span><a name="GetPetById"><a href="OpenAPIPetstore.API.Pet.html#GetPetById"><span class="hs-identifier">GetPetById</span></a></a><span>
|
||||
@@ -198,14 +198,14 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-198"></a><span class="hs-comment">-- AuthMethod: 'AuthOAuthPetstoreAuth'</span><span>
|
||||
</span><a name="line-199"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-200"></a><span class="hs-identifier">updatePet</span><span>
|
||||
</span><a name="line-201"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679174587"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679174587"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-202"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679174587"><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-201"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679173774"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679173774"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Pet"><span class="hs-identifier hs-type">Pet</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-202"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679173774"><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-203"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-204"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679174587"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-205"></a><a name="updatePet"><a href="OpenAPIPetstore.API.Pet.html#updatePet"><span class="hs-identifier">updatePet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679174597"><a href="#local-6989586621679174597"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-204"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier hs-type">UpdatePet</span></a><span> </span><a href="#local-6989586621679173774"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-205"></a><a name="updatePet"><a href="OpenAPIPetstore.API.Pet.html#updatePet"><span class="hs-identifier">updatePet</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679173784"><a href="#local-6989586621679173784"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-206"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-207"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-208"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679174597"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-208"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679173784"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-209"></a><span>
|
||||
</span><a name="line-210"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePet"><a href="OpenAPIPetstore.API.Pet.html#UpdatePet"><span class="hs-identifier">UpdatePet</span></a></a><span>
|
||||
</span><a name="line-211"></a><span>
|
||||
@@ -232,21 +232,21 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-232"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-233"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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-234"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-235"></a><a name="updatePetWithForm"><a href="OpenAPIPetstore.API.Pet.html#updatePetWithForm"><span class="hs-identifier">updatePetWithForm</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679174598"><a href="#local-6989586621679174598"><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-236"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679174598"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-235"></a><a name="updatePetWithForm"><a href="OpenAPIPetstore.API.Pet.html#updatePetWithForm"><span class="hs-identifier">updatePetWithForm</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679173785"><a href="#local-6989586621679173785"><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-236"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173785"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-237"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-238"></a><span>
|
||||
</span><a name="line-239"></a><span class="hs-keyword">data</span><span> </span><a name="UpdatePetWithForm"><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier">UpdatePetWithForm</span></a></a><span>
|
||||
</span><a name="line-240"></a><span>
|
||||
</span><a name="line-241"></a><span class="hs-comment">-- | /Optional Param/ "name" - Updated name of the pet</span><span>
|
||||
</span><a name="line-242"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="OpenAPIPetstore.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-243"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174583"><a href="#local-6989586621679174583"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Name2"><span class="hs-identifier hs-var">Name2</span></a><span> </span><a name="local-6989586621679174584"><a href="#local-6989586621679174584"><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-6989586621679174583"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679174584"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-243"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679173770"><a href="#local-6989586621679173770"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Name2"><span class="hs-identifier hs-var">Name2</span></a><span> </span><a name="local-6989586621679173771"><a href="#local-6989586621679173771"><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-6989586621679173770"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679173771"><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">-- | /Optional Param/ "status" - Updated status of the pet</span><span>
|
||||
</span><a name="line-247"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="OpenAPIPetstore.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-248"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174581"><a href="#local-6989586621679174581"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#StatusText"><span class="hs-identifier hs-var">StatusText</span></a><span> </span><a name="local-6989586621679174582"><a href="#local-6989586621679174582"><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-6989586621679174581"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679174582"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-248"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679173768"><a href="#local-6989586621679173768"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#StatusText"><span class="hs-identifier hs-var">StatusText</span></a><span> </span><a name="local-6989586621679173769"><a href="#local-6989586621679173769"><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-6989586621679173768"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier hs-var">addForm</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.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-6989586621679173769"><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/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-252"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UpdatePetWithForm"><span class="hs-identifier hs-type">UpdatePetWithForm</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span>
|
||||
@@ -266,21 +266,21 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-266"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-267"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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-268"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="OpenAPIPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-269"></a><a name="uploadFile"><a href="OpenAPIPetstore.API.Pet.html#uploadFile"><span class="hs-identifier">uploadFile</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679174599"><a href="#local-6989586621679174599"><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-270"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679174599"><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-269"></a><a name="uploadFile"><a href="OpenAPIPetstore.API.Pet.html#uploadFile"><span class="hs-identifier">uploadFile</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679173786"><a href="#local-6989586621679173786"><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-270"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/pet/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173786"><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-271"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-272"></a><span>
|
||||
</span><a name="line-273"></a><span class="hs-keyword">data</span><span> </span><a name="UploadFile"><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier">UploadFile</span></a></a><span>
|
||||
</span><a name="line-274"></a><span>
|
||||
</span><a name="line-275"></a><span class="hs-comment">-- | /Optional Param/ "additionalMetadata" - Additional data to pass to server</span><span>
|
||||
</span><a name="line-276"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="OpenAPIPetstore.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-277"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174579"><a href="#local-6989586621679174579"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-var">AdditionalMetadata</span></a><span> </span><a name="local-6989586621679174580"><a href="#local-6989586621679174580"><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-278"></a><span> </span><a href="#local-6989586621679174579"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partLBS</span><span> </span><span class="hs-string">"additionalMetadata"</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a><span> </span><a href="#local-6989586621679174580"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-277"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679173766"><a href="#local-6989586621679173766"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-var">AdditionalMetadata</span></a><span> </span><a name="local-6989586621679173767"><a href="#local-6989586621679173767"><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-278"></a><span> </span><a href="#local-6989586621679173766"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partLBS</span><span> </span><span class="hs-string">"additionalMetadata"</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a><span> </span><a href="#local-6989586621679173767"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-279"></a><span>
|
||||
</span><a name="line-280"></a><span class="hs-comment">-- | /Optional Param/ "file" - file to upload</span><span>
|
||||
</span><a name="line-281"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-type">File2</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-282"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174577"><a href="#local-6989586621679174577"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-var">File2</span></a><span> </span><a name="local-6989586621679174578"><a href="#local-6989586621679174578"><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-6989586621679174577"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partFileSource</span><span> </span><span class="hs-string">"file"</span><span> </span><a href="#local-6989586621679174578"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-282"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679173764"><a href="#local-6989586621679173764"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#File2"><span class="hs-identifier hs-var">File2</span></a><span> </span><a name="local-6989586621679173765"><a href="#local-6989586621679173765"><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-6989586621679173764"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partFileSource</span><span> </span><span class="hs-string">"file"</span><span> </span><a href="#local-6989586621679173765"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-284"></a><span>
|
||||
</span><a name="line-285"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
||||
</span><a name="line-286"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UploadFile"><span class="hs-identifier hs-type">UploadFile</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span>
|
||||
@@ -302,17 +302,17 @@ Module : OpenAPIPetstore.API.Pet
|
||||
</span><a name="line-302"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Model.html#RequiredFile"><span class="hs-identifier hs-type">RequiredFile</span></a><span> </span><span class="hs-comment">-- ^ "requiredFile" - file to upload</span><span>
|
||||
</span><a name="line-303"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.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-304"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="OpenAPIPetstore.Model.html#ApiResponse"><span class="hs-identifier hs-type">ApiResponse</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span>
|
||||
</span><a name="line-305"></a><a name="uploadFileWithRequiredFile"><a href="OpenAPIPetstore.API.Pet.html#uploadFileWithRequiredFile"><span class="hs-identifier">uploadFileWithRequiredFile</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#RequiredFile"><span class="hs-identifier hs-var">RequiredFile</span></a><span> </span><a name="local-6989586621679174600"><a href="#local-6989586621679174600"><span class="hs-identifier">requiredFile</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679174601"><a href="#local-6989586621679174601"><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-306"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679174601"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">,</span><span class="hs-string">"/uploadImageWithRequiredFile"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-305"></a><a name="uploadFileWithRequiredFile"><a href="OpenAPIPetstore.API.Pet.html#uploadFileWithRequiredFile"><span class="hs-identifier">uploadFileWithRequiredFile</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#RequiredFile"><span class="hs-identifier hs-var">RequiredFile</span></a><span> </span><a name="local-6989586621679173787"><a href="#local-6989586621679173787"><span class="hs-identifier">requiredFile</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#PetId"><span class="hs-identifier hs-var">PetId</span></a><span> </span><a name="local-6989586621679173788"><a href="#local-6989586621679173788"><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-306"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/fake/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173788"><span class="hs-identifier hs-var">petId</span></a><span class="hs-special">,</span><span class="hs-string">"/uploadImageWithRequiredFile"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-307"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier hs-var">_hasAuthType</span></a><span class="hs-special">`</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="OpenAPIPetstore.Model.html#AuthOAuthPetstoreAuth"><span class="hs-identifier hs-type">AuthOAuthPetstoreAuth</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-308"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partFileSource</span><span> </span><span class="hs-string">"requiredFile"</span><span> </span><a href="#local-6989586621679174600"><span class="hs-identifier hs-var">requiredFile</span></a><span>
|
||||
</span><a name="line-308"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partFileSource</span><span> </span><span class="hs-string">"requiredFile"</span><span> </span><a href="#local-6989586621679173787"><span class="hs-identifier hs-var">requiredFile</span></a><span>
|
||||
</span><a name="line-309"></a><span>
|
||||
</span><a name="line-310"></a><span class="hs-keyword">data</span><span> </span><a name="UploadFileWithRequiredFile"><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier">UploadFileWithRequiredFile</span></a></a><span>
|
||||
</span><a name="line-311"></a><span>
|
||||
</span><a name="line-312"></a><span class="hs-comment">-- | /Optional Param/ "additionalMetadata" - Additional data to pass to server</span><span>
|
||||
</span><a name="line-313"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier hs-type">HasOptionalParam</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</span></a><span> </span><a href="OpenAPIPetstore.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-314"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679174575"><a href="#local-6989586621679174575"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-var">AdditionalMetadata</span></a><span> </span><a name="local-6989586621679174576"><a href="#local-6989586621679174576"><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-6989586621679174575"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partLBS</span><span> </span><span class="hs-string">"additionalMetadata"</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a><span> </span><a href="#local-6989586621679174576"><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="local-8214565720323894818"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><a name="local-6989586621679173762"><a href="#local-6989586621679173762"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#AdditionalMetadata"><span class="hs-identifier hs-var">AdditionalMetadata</span></a><span> </span><a name="local-6989586621679173763"><a href="#local-6989586621679173763"><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-6989586621679173762"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.partLBS</span><span> </span><span class="hs-string">"additionalMetadata"</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier hs-var">mimeRender'</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-var">MimeMultipartFormData</span></a><span> </span><a href="#local-6989586621679173763"><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">-- | @multipart/form-data@</span><span>
|
||||
</span><a name="line-318"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Pet.html#UploadFileWithRequiredFile"><span class="hs-identifier hs-type">UploadFileWithRequiredFile</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span>
|
||||
|
||||
@@ -68,8 +68,8 @@ Module : OpenAPIPetstore.API.Store
|
||||
</span><a name="line-68"></a><span class="hs-identifier">deleteOrder</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-type">OrderIdText</span></a><span> </span><span class="hs-comment">-- ^ "orderId" - ID of the order that needs to be deleted</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-71"></a><a name="deleteOrder"><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier">deleteOrder</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-var">OrderIdText</span></a><span> </span><a name="local-6989586621679174270"><a href="#local-6989586621679174270"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679174270"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-71"></a><a name="deleteOrder"><a href="OpenAPIPetstore.API.Store.html#deleteOrder"><span class="hs-identifier">deleteOrder</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#OrderIdText"><span class="hs-identifier hs-var">OrderIdText</span></a><span> </span><a name="local-6989586621679173457"><a href="#local-6989586621679173457"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173457"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-73"></a><span>
|
||||
</span><a name="line-74"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteOrder"><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier">DeleteOrder</span></a></a><span>
|
||||
</span><a name="line-75"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#DeleteOrder"><span class="hs-identifier hs-type">DeleteOrder</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
@@ -105,11 +105,11 @@ Module : OpenAPIPetstore.API.Store
|
||||
</span><a name="line-105"></a><span class="hs-comment">-- For valid response try integer IDs with value <= 5 or > 10. Other values will generated exceptions</span><span>
|
||||
</span><a name="line-106"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-107"></a><span class="hs-identifier">getOrderById</span><span>
|
||||
</span><a name="line-108"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679174269"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-108"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679173456"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-109"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-type">OrderId</span></a><span> </span><span class="hs-comment">-- ^ "orderId" - ID of pet that needs to be fetched</span><span>
|
||||
</span><a name="line-110"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><a href="#local-6989586621679174269"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-111"></a><a name="getOrderById"><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier">getOrderById</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-var">OrderId</span></a><span> </span><a name="local-6989586621679174271"><a href="#local-6989586621679174271"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-112"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679174271"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-110"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier hs-type">GetOrderById</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><a href="#local-6989586621679173456"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-111"></a><a name="getOrderById"><a href="OpenAPIPetstore.API.Store.html#getOrderById"><span class="hs-identifier">getOrderById</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#OrderId"><span class="hs-identifier hs-var">OrderId</span></a><span> </span><a name="local-6989586621679173458"><a href="#local-6989586621679173458"><span class="hs-identifier">orderId</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-112"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173458"><span class="hs-identifier hs-var">orderId</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-113"></a><span>
|
||||
</span><a name="line-114"></a><span class="hs-keyword">data</span><span> </span><a name="GetOrderById"><a href="OpenAPIPetstore.API.Store.html#GetOrderById"><span class="hs-identifier">GetOrderById</span></a></a><span>
|
||||
</span><a name="line-115"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
@@ -125,14 +125,14 @@ Module : OpenAPIPetstore.API.Store
|
||||
</span><a name="line-125"></a><span class="hs-comment">-- Place an order for a pet</span><span>
|
||||
</span><a name="line-126"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-127"></a><span class="hs-identifier">placeOrder</span><span>
|
||||
</span><a name="line-128"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679174267"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679174267"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-129"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679174267"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-130"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679174268"><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><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679173454"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679173454"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-129"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679173454"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-130"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679173455"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-131"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><span class="hs-comment">-- ^ "body" - order placed for purchasing the pet</span><span>
|
||||
</span><a name="line-132"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679174267"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><a href="#local-6989586621679174268"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-133"></a><a name="placeOrder"><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier">placeOrder</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679174272"><a href="#local-6989586621679174272"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-132"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679173454"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span> </span><a href="#local-6989586621679173455"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-133"></a><a name="placeOrder"><a href="OpenAPIPetstore.API.Store.html#placeOrder"><span class="hs-identifier">placeOrder</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679173459"><a href="#local-6989586621679173459"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-134"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/store/order"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-135"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679174272"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-135"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679173459"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-136"></a><span>
|
||||
</span><a name="line-137"></a><span class="hs-keyword">data</span><span> </span><a name="PlaceOrder"><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier">PlaceOrder</span></a></a><span>
|
||||
</span><a name="line-138"></a><span>
|
||||
@@ -140,7 +140,7 @@ Module : OpenAPIPetstore.API.Store
|
||||
</span><a name="line-140"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Order"><span class="hs-identifier hs-type">Order</span></a><span>
|
||||
</span><a name="line-141"></a><span>
|
||||
</span><a name="line-142"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-143"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679174266"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679174266"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-143"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679173453"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="#local-6989586621679173453"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-144"></a><span>
|
||||
</span><a name="line-145"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
</span><a name="line-146"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.Store.html#PlaceOrder"><span class="hs-identifier hs-type">PlaceOrder</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span>
|
||||
|
||||
@@ -66,13 +66,13 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-66"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-68"></a><span class="hs-identifier">createUser</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679173566"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679173566"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679173566"><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-69"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679172753"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679172753"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-70"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679172753"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-71"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-comment">-- ^ "body" - Created user object</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679173566"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-73"></a><a name="createUser"><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier">createUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679173567"><a href="#local-6989586621679173567"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679172753"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-73"></a><a name="createUser"><a href="OpenAPIPetstore.API.User.html#createUser"><span class="hs-identifier">createUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679172754"><a href="#local-6989586621679172754"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-74"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679173567"><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="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679172754"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUser"><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier">CreateUser</span></a></a><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
@@ -80,7 +80,7 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-80"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-83"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679173560"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679173560"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-83"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679172747"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="#local-6989586621679172747"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-84"></a><span>
|
||||
</span><a name="line-85"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUser"><span class="hs-identifier hs-type">CreateUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-86"></a><span>
|
||||
@@ -92,13 +92,13 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-92"></a><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><a name="line-93"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-94"></a><span class="hs-identifier">createUsersWithArrayInput</span><span>
|
||||
</span><a name="line-95"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679173565"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679173565"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-96"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679173565"><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><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679172752"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679172752"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-96"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679172752"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-97"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||
</span><a name="line-98"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679173565"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-99"></a><a name="createUsersWithArrayInput"><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier">createUsersWithArrayInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679173568"><a href="#local-6989586621679173568"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-98"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679172752"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-99"></a><a name="createUsersWithArrayInput"><a href="OpenAPIPetstore.API.User.html#createUsersWithArrayInput"><span class="hs-identifier">createUsersWithArrayInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679172755"><a href="#local-6989586621679172755"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-100"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/createWithArray"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-101"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679173568"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-101"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679172755"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-102"></a><span>
|
||||
</span><a name="line-103"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithArrayInput"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier">CreateUsersWithArrayInput</span></a></a><span>
|
||||
</span><a name="line-104"></a><span>
|
||||
@@ -106,7 +106,7 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-106"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span>
|
||||
</span><a name="line-107"></a><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-109"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679173559"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679173559"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-109"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679172746"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="#local-6989586621679172746"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-110"></a><span>
|
||||
</span><a name="line-111"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithArrayInput"><span class="hs-identifier hs-type">CreateUsersWithArrayInput</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-112"></a><span>
|
||||
@@ -118,13 +118,13 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-118"></a><span class="hs-comment">-- Creates list of users with given input array</span><span>
|
||||
</span><a name="line-119"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-120"></a><span class="hs-identifier">createUsersWithListInput</span><span>
|
||||
</span><a name="line-121"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679173564"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679173564"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-122"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679173564"><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-121"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679172751"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679172751"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-122"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679172751"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-123"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span> </span><span class="hs-comment">-- ^ "body" - List of user object</span><span>
|
||||
</span><a name="line-124"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679173564"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-125"></a><a name="createUsersWithListInput"><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier">createUsersWithListInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679173569"><a href="#local-6989586621679173569"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-124"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679172751"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-125"></a><a name="createUsersWithListInput"><a href="OpenAPIPetstore.API.User.html#createUsersWithListInput"><span class="hs-identifier">createUsersWithListInput</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679172756"><a href="#local-6989586621679172756"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-126"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"POST"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/createWithList"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-127"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679173569"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-127"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679172756"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-128"></a><span>
|
||||
</span><a name="line-129"></a><span class="hs-keyword">data</span><span> </span><a name="CreateUsersWithListInput"><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier">CreateUsersWithListInput</span></a></a><span>
|
||||
</span><a name="line-130"></a><span>
|
||||
@@ -132,7 +132,7 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-132"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="OpenAPIPetstore.Model.html#Body"><span class="hs-identifier hs-type">Body</span></a><span>
|
||||
</span><a name="line-133"></a><span>
|
||||
</span><a name="line-134"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-135"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679173558"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679173558"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-135"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679172745"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="#local-6989586621679172745"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-136"></a><span>
|
||||
</span><a name="line-137"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#CreateUsersWithListInput"><span class="hs-identifier hs-type">CreateUsersWithListInput</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-138"></a><span>
|
||||
@@ -148,8 +148,8 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-148"></a><span class="hs-identifier">deleteUser</span><span>
|
||||
</span><a name="line-149"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be deleted</span><span>
|
||||
</span><a name="line-150"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-151"></a><a name="deleteUser"><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier">deleteUser</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679173570"><a href="#local-6989586621679173570"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-152"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173570"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-151"></a><a name="deleteUser"><a href="OpenAPIPetstore.API.User.html#deleteUser"><span class="hs-identifier">deleteUser</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679172757"><a href="#local-6989586621679172757"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-152"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"DELETE"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679172757"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-153"></a><span>
|
||||
</span><a name="line-154"></a><span class="hs-keyword">data</span><span> </span><a name="DeleteUser"><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier">DeleteUser</span></a></a><span>
|
||||
</span><a name="line-155"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#DeleteUser"><span class="hs-identifier hs-type">DeleteUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
@@ -162,11 +162,11 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-162"></a><span class="hs-comment">-- Get user by user name</span><span>
|
||||
</span><a name="line-163"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-164"></a><span class="hs-identifier">getUserByName</span><span>
|
||||
</span><a name="line-165"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679173563"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-165"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679172750"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-166"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The name that needs to be fetched. Use user1 for testing.</span><span>
|
||||
</span><a name="line-167"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><a href="#local-6989586621679173563"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-168"></a><a name="getUserByName"><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier">getUserByName</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679173571"><a href="#local-6989586621679173571"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-169"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173571"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-167"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier hs-type">GetUserByName</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><a href="#local-6989586621679172750"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-168"></a><a name="getUserByName"><a href="OpenAPIPetstore.API.User.html#getUserByName"><span class="hs-identifier">getUserByName</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679172758"><a href="#local-6989586621679172758"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-169"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679172758"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-170"></a><span>
|
||||
</span><a name="line-171"></a><span class="hs-keyword">data</span><span> </span><a name="GetUserByName"><a href="OpenAPIPetstore.API.User.html#GetUserByName"><span class="hs-identifier">GetUserByName</span></a></a><span>
|
||||
</span><a name="line-172"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
@@ -182,14 +182,14 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-182"></a><span class="hs-comment">-- Logs user into the system</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-184"></a><span class="hs-identifier">loginUser</span><span>
|
||||
</span><a name="line-185"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679173562"><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="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier hs-type">Accept</span></a><span> </span><a href="#local-6989586621679172749"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request accept ('MimeType')</span><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - The user name for login</span><span>
|
||||
</span><a name="line-187"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-type">Password</span></a><span> </span><span class="hs-comment">-- ^ "password" - The password for login in clear text</span><span>
|
||||
</span><a name="line-188"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><a href="#local-6989586621679173562"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-189"></a><a name="loginUser"><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier">loginUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679173572"><a href="#local-6989586621679173572"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679173573"><a href="#local-6989586621679173573"><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-188"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier hs-type">LoginUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><a href="#local-6989586621679172749"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-189"></a><a name="loginUser"><a href="OpenAPIPetstore.API.User.html#loginUser"><span class="hs-identifier">loginUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679172759"><a href="#local-6989586621679172759"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Password"><span class="hs-identifier hs-var">Password</span></a><span> </span><a name="local-6989586621679172760"><a href="#local-6989586621679172760"><span class="hs-identifier">password</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-190"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"GET"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/login"</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-191"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"username"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679173572"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-192"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"password"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679173573"><span class="hs-identifier hs-var">password</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-191"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"username"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679172759"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-192"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier hs-var">setQuery</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"password"</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a href="#local-6989586621679172760"><span class="hs-identifier hs-var">password</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-193"></a><span>
|
||||
</span><a name="line-194"></a><span class="hs-keyword">data</span><span> </span><a name="LoginUser"><a href="OpenAPIPetstore.API.User.html#LoginUser"><span class="hs-identifier">LoginUser</span></a></a><span>
|
||||
</span><a name="line-195"></a><span class="hs-comment">-- | @application/xml@</span><span>
|
||||
@@ -222,14 +222,14 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-222"></a><span class="hs-comment">-- This can only be done by the logged in user.</span><span>
|
||||
</span><a name="line-223"></a><span class="hs-comment">-- </span><span>
|
||||
</span><a name="line-224"></a><span class="hs-identifier">updateUser</span><span>
|
||||
</span><a name="line-225"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679173561"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679173561"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-226"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679173561"><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-225"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679172748"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679172748"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-226"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier hs-type">ContentType</span></a><span> </span><a href="#local-6989586621679172748"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-comment">-- ^ request content-type ('MimeType')</span><span>
|
||||
</span><a name="line-227"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span> </span><span class="hs-comment">-- ^ "body" - Updated user object</span><span>
|
||||
</span><a name="line-228"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-type">Username</span></a><span> </span><span class="hs-comment">-- ^ "username" - name that need to be deleted</span><span>
|
||||
</span><a name="line-229"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679173561"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-230"></a><a name="updateUser"><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier">updateUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679173574"><a href="#local-6989586621679173574"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679173575"><a href="#local-6989586621679173575"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-231"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679173575"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-232"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679173574"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-229"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679172748"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-230"></a><a name="updateUser"><a href="OpenAPIPetstore.API.User.html#updateUser"><span class="hs-identifier">updateUser</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679172761"><a href="#local-6989586621679172761"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Model.html#Username"><span class="hs-identifier hs-var">Username</span></a><span> </span><a name="local-6989586621679172762"><a href="#local-6989586621679172762"><span class="hs-identifier">username</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-231"></a><span> </span><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier hs-var">_mkRequest</span></a><span> </span><span class="hs-string">"PUT"</span><span> </span><span class="hs-special">[</span><span class="hs-string">"/user/"</span><span class="hs-special">,</span><a href="OpenAPIPetstore.Core.html#toPath"><span class="hs-identifier hs-var">toPath</span></a><span> </span><a href="#local-6989586621679172762"><span class="hs-identifier hs-var">username</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-232"></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier hs-var">setBodyParam</span></a><span class="hs-special">`</span><span> </span><a href="#local-6989586621679172761"><span class="hs-identifier hs-var">body</span></a><span>
|
||||
</span><a name="line-233"></a><span>
|
||||
</span><a name="line-234"></a><span class="hs-keyword">data</span><span> </span><a name="UpdateUser"><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier">UpdateUser</span></a></a><span>
|
||||
</span><a name="line-235"></a><span>
|
||||
@@ -237,7 +237,7 @@ Module : OpenAPIPetstore.API.User
|
||||
</span><a name="line-237"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier hs-type">HasBodyParam</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="OpenAPIPetstore.Model.html#User"><span class="hs-identifier hs-type">User</span></a><span>
|
||||
</span><a name="line-238"></a><span>
|
||||
</span><a name="line-239"></a><span class="hs-comment">-- | @*/*@</span><span>
|
||||
</span><a name="line-240"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679173557"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679173557"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-240"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679172744"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="#local-6989586621679172744"><span class="hs-identifier hs-type">mtype</span></a><span>
|
||||
</span><a name="line-241"></a><span>
|
||||
</span><a name="line-242"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="OpenAPIPetstore.API.User.html#UpdateUser"><span class="hs-identifier hs-type">UpdateUser</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span>
|
||||
</span><a name="line-243"></a><span>
|
||||
|
||||
@@ -55,20 +55,20 @@ Module : OpenAPIPetstore.Client
|
||||
</span><a name="line-55"></a><span>
|
||||
</span><a name="line-56"></a><span class="hs-comment">-- | send a request returning the raw http response</span><span>
|
||||
</span><a name="line-57"></a><span class="hs-identifier">dispatchLbs</span><span>
|
||||
</span><a name="line-58"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679137011"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679137012"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679137013"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-58"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679132864"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132865"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132866"><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-identifier hs-type">NH.Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||
</span><a name="line-60"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-61"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679137011"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679137013"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679137014"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679137012"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-61"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132864"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132866"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132867"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132865"><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><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH.Response</span><span> </span><span class="hs-identifier hs-type">BCL.ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
||||
</span><a name="line-63"></a><a name="dispatchLbs"><a href="OpenAPIPetstore.Client.html#dispatchLbs"><span class="hs-identifier">dispatchLbs</span></a></a><span> </span><a name="local-6989586621679137015"><a href="#local-6989586621679137015"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679137016"><a href="#local-6989586621679137016"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679137017"><a href="#local-6989586621679137017"><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-64"></a><span> </span><a name="local-6989586621679137018"><a href="#local-6989586621679137018"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679137016"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679137017"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-65"></a><span> </span><a href="OpenAPIPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679137015"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679137016"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679137018"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||
</span><a name="line-63"></a><a name="dispatchLbs"><a href="OpenAPIPetstore.Client.html#dispatchLbs"><span class="hs-identifier">dispatchLbs</span></a></a><span> </span><a name="local-6989586621679132868"><a href="#local-6989586621679132868"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679132869"><a href="#local-6989586621679132869"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679132870"><a href="#local-6989586621679132870"><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-64"></a><span> </span><a name="local-6989586621679132871"><a href="#local-6989586621679132871"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679132869"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132870"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-65"></a><span> </span><a href="OpenAPIPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679132868"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679132869"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132871"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||
</span><a name="line-66"></a><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- ** Mime</span><span>
|
||||
</span><a name="line-68"></a><span>
|
||||
</span><a name="line-69"></a><span class="hs-comment">-- | pair of decoded http body and http response</span><span>
|
||||
</span><a name="line-70"></a><span class="hs-keyword">data</span><span> </span><a name="MimeResult"><a href="OpenAPIPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><a name="local-6989586621679136979"><a href="#local-6989586621679136979"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-71"></a><span> </span><a name="MimeResult"><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679136979"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ decoded http body</span><span>
|
||||
</span><a name="line-70"></a><span class="hs-keyword">data</span><span> </span><a name="MimeResult"><a href="OpenAPIPetstore.Client.html#MimeResult"><span class="hs-identifier">MimeResult</span></a></a><span> </span><a name="local-6989586621679132832"><a href="#local-6989586621679132832"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-71"></a><span> </span><a name="MimeResult"><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679132832"><span class="hs-identifier hs-type">res</span></a><span> </span><span class="hs-comment">-- ^ decoded http body</span><span>
|
||||
</span><a name="line-72"></a><span> </span><span class="hs-special">,</span><span> </span><a name="mimeResultResponse"><a href="OpenAPIPetstore.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.Response</span><span> </span><span class="hs-identifier hs-type">BCL.ByteString</span><span> </span><span class="hs-comment">-- ^ http response </span><span>
|
||||
</span><a name="line-73"></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-74"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">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>
|
||||
@@ -82,137 +82,137 @@ Module : OpenAPIPetstore.Client
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- | send a request returning the 'MimeResult'</span><span>
|
||||
</span><a name="line-84"></a><span class="hs-identifier">dispatchMime</span><span>
|
||||
</span><a name="line-85"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679137007"><a href="#local-6989586621679137007"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679137008"><a href="#local-6989586621679137008"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679137009"><a href="#local-6989586621679137009"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679137010"><a href="#local-6989586621679137010"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679137007"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679137010"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679137010"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679137009"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679137008"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-85"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679132860"><a href="#local-6989586621679132860"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679132861"><a href="#local-6989586621679132861"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679132862"><a href="#local-6989586621679132862"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679132863"><a href="#local-6989586621679132863"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679132860"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132863"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679132863"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679132862"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132861"><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-identifier hs-type">NH.Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||
</span><a name="line-87"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-88"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679137007"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679137008"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679137009"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679137010"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-89"></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="OpenAPIPetstore.Client.html#MimeResult"><span class="hs-identifier hs-type">MimeResult</span></a><span> </span><a href="#local-6989586621679137009"><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-90"></a><a name="dispatchMime"><a href="OpenAPIPetstore.Client.html#dispatchMime"><span class="hs-identifier">dispatchMime</span></a></a><span> </span><a name="local-6989586621679137019"><a href="#local-6989586621679137019"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679137020"><a href="#local-6989586621679137020"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679137021"><a href="#local-6989586621679137021"><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-91"></a><span> </span><a name="local-6989586621679137022"><a href="#local-6989586621679137022"><span class="hs-identifier">httpResponse</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.Client.html#dispatchLbs"><span class="hs-identifier hs-var">dispatchLbs</span></a><span> </span><a href="#local-6989586621679137019"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679137020"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679137021"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-92"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679137023"><a href="#local-6989586621679137023"><span class="hs-identifier">statusCode</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">NH.statusCode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH.responseStatus</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679137022"><span class="hs-identifier hs-var">httpResponse</span></a><span>
|
||||
</span><a name="line-93"></a><span> </span><a name="local-6989586621679137516"><a href="#local-6989586621679137516"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-glyph"><-</span><span>
|
||||
</span><a name="line-94"></a><span> </span><a href="OpenAPIPetstore.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-6989586621679137020"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-95"></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-6989586621679137023"><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-6989586621679137023"><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-88"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132860"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132861"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132862"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132863"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-89"></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="OpenAPIPetstore.Client.html#MimeResult"><span class="hs-identifier hs-type">MimeResult</span></a><span> </span><a href="#local-6989586621679132862"><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-90"></a><a name="dispatchMime"><a href="OpenAPIPetstore.Client.html#dispatchMime"><span class="hs-identifier">dispatchMime</span></a></a><span> </span><a name="local-6989586621679132872"><a href="#local-6989586621679132872"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679132873"><a href="#local-6989586621679132873"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679132874"><a href="#local-6989586621679132874"><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-91"></a><span> </span><a name="local-6989586621679132875"><a href="#local-6989586621679132875"><span class="hs-identifier">httpResponse</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.Client.html#dispatchLbs"><span class="hs-identifier hs-var">dispatchLbs</span></a><span> </span><a href="#local-6989586621679132872"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679132873"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679132874"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-92"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679132876"><a href="#local-6989586621679132876"><span class="hs-identifier">statusCode</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">NH.statusCode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH.responseStatus</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="#local-6989586621679132875"><span class="hs-identifier hs-var">httpResponse</span></a><span>
|
||||
</span><a name="line-93"></a><span> </span><a name="local-6989586621679133376"><a href="#local-6989586621679133376"><span class="hs-identifier">parsedResult</span></a></a><span> </span><span class="hs-glyph"><-</span><span>
|
||||
</span><a name="line-94"></a><span> </span><a href="OpenAPIPetstore.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-6989586621679132873"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-95"></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-6989586621679132876"><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-6989586621679132876"><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-96"></a><span> </span><span class="hs-keyword">then</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-97"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679137513"><a href="#local-6989586621679137513"><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-6989586621679137023"><span class="hs-identifier hs-var">statusCode</span></a><span>
|
||||
</span><a name="line-98"></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.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.pack</span><span> </span><a href="#local-6989586621679137513"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-99"></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="OpenAPIPetstore.Client.html#MimeError"><span class="hs-identifier hs-var">MimeError</span></a><span> </span><a href="#local-6989586621679137513"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679137022"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-100"></a><span> </span><span class="hs-keyword">else</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679137010"><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.responseBody</span><span> </span><a href="#local-6989586621679137022"><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-101"></a><span> </span><span class="hs-identifier hs-var">Left</span><span> </span><a name="local-6989586621679137514"><a href="#local-6989586621679137514"><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-102"></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.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.pack</span><span> </span><a href="#local-6989586621679137514"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-103"></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="OpenAPIPetstore.Client.html#MimeError"><span class="hs-identifier hs-var">MimeError</span></a><span> </span><a href="#local-6989586621679137514"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679137022"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-104"></a><span> </span><span class="hs-identifier hs-var">Right</span><span> </span><a name="local-6989586621679137515"><a href="#local-6989586621679137515"><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-6989586621679137515"><span class="hs-identifier hs-var">r</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a href="#local-6989586621679137516"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a href="#local-6989586621679137022"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-97"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679133373"><a href="#local-6989586621679133373"><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-6989586621679132876"><span class="hs-identifier hs-var">statusCode</span></a><span>
|
||||
</span><a name="line-98"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.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.pack</span><span> </span><a href="#local-6989586621679133373"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-99"></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="OpenAPIPetstore.Client.html#MimeError"><span class="hs-identifier hs-var">MimeError</span></a><span> </span><a href="#local-6989586621679133373"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679132875"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-100"></a><span> </span><span class="hs-keyword">else</span><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679132863"><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.responseBody</span><span> </span><a href="#local-6989586621679132875"><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-101"></a><span> </span><span class="hs-identifier hs-var">Left</span><span> </span><a name="local-6989586621679133374"><a href="#local-6989586621679133374"><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-102"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><span class="hs-string">"Client"</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.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.pack</span><span> </span><a href="#local-6989586621679133374"><span class="hs-identifier hs-var">s</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-103"></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="OpenAPIPetstore.Client.html#MimeError"><span class="hs-identifier hs-var">MimeError</span></a><span> </span><a href="#local-6989586621679133374"><span class="hs-identifier hs-var">s</span></a><span> </span><a href="#local-6989586621679132875"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-104"></a><span> </span><span class="hs-identifier hs-var">Right</span><span> </span><a name="local-6989586621679133375"><a href="#local-6989586621679133375"><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-6989586621679133375"><span class="hs-identifier hs-var">r</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a href="#local-6989586621679133376"><span class="hs-identifier hs-var">parsedResult</span></a><span> </span><a href="#local-6989586621679132875"><span class="hs-identifier hs-var">httpResponse</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-106"></a><span>
|
||||
</span><a name="line-107"></a><span class="hs-comment">-- | like 'dispatchMime', but only returns the decoded http body</span><span>
|
||||
</span><a name="line-108"></a><span class="hs-identifier">dispatchMime'</span><span>
|
||||
</span><a name="line-109"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679137003"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679137004"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679137004"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679137005"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679137006"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-109"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier hs-type">Produces</span></a><span> </span><a href="#local-6989586621679132856"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132857"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="#local-6989586621679132857"><span class="hs-identifier hs-type">accept</span></a><span> </span><a href="#local-6989586621679132858"><span class="hs-identifier hs-type">res</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132859"><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-identifier hs-type">NH.Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||
</span><a name="line-111"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-112"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679137003"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679137006"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679137005"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679137004"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-113"></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="OpenAPIPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679137005"><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-114"></a><a name="dispatchMime%27"><a href="OpenAPIPetstore.Client.html#dispatchMime%27"><span class="hs-identifier">dispatchMime'</span></a></a><span> </span><a name="local-6989586621679137517"><a href="#local-6989586621679137517"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679137518"><a href="#local-6989586621679137518"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679137519"><a href="#local-6989586621679137519"><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-115"></a><span> </span><a href="OpenAPIPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a name="local-6989586621679137520"><a href="#local-6989586621679137520"><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="OpenAPIPetstore.Client.html#dispatchMime"><span class="hs-identifier hs-var">dispatchMime</span></a><span> </span><a href="#local-6989586621679137517"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679137518"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679137519"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-116"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679137520"><span class="hs-identifier hs-var">parsedResult</span></a><span>
|
||||
</span><a name="line-112"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132856"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132859"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132858"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132857"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-113"></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="OpenAPIPetstore.Client.html#MimeError"><span class="hs-identifier hs-type">MimeError</span></a><span> </span><a href="#local-6989586621679132858"><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-114"></a><a name="dispatchMime%27"><a href="OpenAPIPetstore.Client.html#dispatchMime%27"><span class="hs-identifier">dispatchMime'</span></a></a><span> </span><a name="local-6989586621679133377"><a href="#local-6989586621679133377"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679133378"><a href="#local-6989586621679133378"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133379"><a href="#local-6989586621679133379"><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-115"></a><span> </span><a href="OpenAPIPetstore.Client.html#MimeResult"><span class="hs-identifier hs-var">MimeResult</span></a><span> </span><a name="local-6989586621679133380"><a href="#local-6989586621679133380"><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="OpenAPIPetstore.Client.html#dispatchMime"><span class="hs-identifier hs-var">dispatchMime</span></a><span> </span><a href="#local-6989586621679133377"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679133378"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133379"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-116"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679133380"><span class="hs-identifier hs-var">parsedResult</span></a><span>
|
||||
</span><a name="line-117"></a><span>
|
||||
</span><a name="line-118"></a><span class="hs-comment">-- ** Unsafe</span><span>
|
||||
</span><a name="line-119"></a><span>
|
||||
</span><a name="line-120"></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-121"></a><span class="hs-identifier">dispatchLbsUnsafe</span><span>
|
||||
</span><a name="line-122"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679136999"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679137000"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-122"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132852"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132853"><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-identifier hs-type">NH.Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||
</span><a name="line-124"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-125"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679137001"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679137000"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679137002"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679136999"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-125"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132854"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132853"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132855"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132852"><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><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH.Response</span><span> </span><span class="hs-identifier hs-type">BCL.ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
||||
</span><a name="line-127"></a><a name="dispatchLbsUnsafe"><a href="OpenAPIPetstore.Client.html#dispatchLbsUnsafe"><span class="hs-identifier">dispatchLbsUnsafe</span></a></a><span> </span><a name="local-6989586621679137521"><a href="#local-6989586621679137521"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679137522"><a href="#local-6989586621679137522"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679137523"><a href="#local-6989586621679137523"><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-128"></a><span> </span><a name="local-6989586621679137524"><a href="#local-6989586621679137524"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679137522"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679137523"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-129"></a><span> </span><a href="OpenAPIPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679137521"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679137522"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679137524"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||
</span><a name="line-127"></a><a name="dispatchLbsUnsafe"><a href="OpenAPIPetstore.Client.html#dispatchLbsUnsafe"><span class="hs-identifier">dispatchLbsUnsafe</span></a></a><span> </span><a name="local-6989586621679133381"><a href="#local-6989586621679133381"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679133382"><a href="#local-6989586621679133382"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133383"><a href="#local-6989586621679133383"><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-128"></a><span> </span><a name="local-6989586621679133384"><a href="#local-6989586621679133384"><span class="hs-identifier">initReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.Client.html#_toInitRequest"><span class="hs-identifier hs-var">_toInitRequest</span></a><span> </span><a href="#local-6989586621679133382"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133383"><span class="hs-identifier hs-var">request</span></a><span>
|
||||
</span><a name="line-129"></a><span> </span><a href="OpenAPIPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier hs-var">dispatchInitUnsafe</span></a><span> </span><a href="#local-6989586621679133381"><span class="hs-identifier hs-var">manager</span></a><span> </span><a href="#local-6989586621679133382"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679133384"><span class="hs-identifier hs-var">initReq</span></a><span>
|
||||
</span><a name="line-130"></a><span>
|
||||
</span><a name="line-131"></a><span class="hs-comment">-- | dispatch an InitRequest</span><span>
|
||||
</span><a name="line-132"></a><span class="hs-identifier">dispatchInitUnsafe</span><span>
|
||||
</span><a name="line-133"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH.Manager</span><span> </span><span class="hs-comment">-- ^ http-client Connection manager</span><span>
|
||||
</span><a name="line-134"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-135"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679136995"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679136996"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679136997"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679136998"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ init request</span><span>
|
||||
</span><a name="line-135"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132848"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132849"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132850"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132851"><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><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">NH.Response</span><span> </span><span class="hs-identifier hs-type">BCL.ByteString</span><span class="hs-special">)</span><span> </span><span class="hs-comment">-- ^ response</span><span>
|
||||
</span><a name="line-137"></a><a name="dispatchInitUnsafe"><a href="OpenAPIPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier">dispatchInitUnsafe</span></a></a><span> </span><a name="local-6989586621679137525"><a href="#local-6989586621679137525"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679137526"><a href="#local-6989586621679137526"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679137527"><a href="#local-6989586621679137527"><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-138"></a><span> </span><a href="OpenAPIPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><a href="#local-6989586621679137528"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="#local-6989586621679137526"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-139"></a><span> </span><span class="hs-keyword">do</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679137528"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><a href="#local-6989586621679137530"><span class="hs-identifier hs-var">requestLogMsg</span></a><span>
|
||||
</span><a name="line-140"></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679137528"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</span></a><span> </span><a href="#local-6989586621679137531"><span class="hs-identifier hs-var">requestDbgLogMsg</span></a><span>
|
||||
</span><a name="line-141"></a><span> </span><a name="local-6989586621679137622"><a href="#local-6989586621679137622"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P.liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">NH.httpLbs</span><span> </span><a href="#local-6989586621679137527"><span class="hs-identifier hs-var">req</span></a><span> </span><a href="#local-6989586621679137525"><span class="hs-identifier hs-var">manager</span></a><span>
|
||||
</span><a name="line-142"></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679137528"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679137533"><span class="hs-identifier hs-var">responseLogMsg</span></a><span> </span><a href="#local-6989586621679137622"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-143"></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679137528"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.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.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-6989586621679137622"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-144"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679137622"><span class="hs-identifier hs-var">res</span></a><span>
|
||||
</span><a name="line-137"></a><a name="dispatchInitUnsafe"><a href="OpenAPIPetstore.Client.html#dispatchInitUnsafe"><span class="hs-identifier">dispatchInitUnsafe</span></a></a><span> </span><a name="local-6989586621679133385"><a href="#local-6989586621679133385"><span class="hs-identifier">manager</span></a></a><span> </span><a name="local-6989586621679133386"><a href="#local-6989586621679133386"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679133387"><a href="#local-6989586621679133387"><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-138"></a><span> </span><a href="OpenAPIPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier hs-var">runConfigLogWithExceptions</span></a><span> </span><a href="#local-6989586621679133388"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="#local-6989586621679133386"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-139"></a><span> </span><span class="hs-keyword">do</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679133388"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><a href="#local-6989586621679133390"><span class="hs-identifier hs-var">requestLogMsg</span></a><span>
|
||||
</span><a name="line-140"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679133388"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#levelDebug"><span class="hs-identifier hs-var">levelDebug</span></a><span> </span><a href="#local-6989586621679133391"><span class="hs-identifier hs-var">requestDbgLogMsg</span></a><span>
|
||||
</span><a name="line-141"></a><span> </span><a name="local-6989586621679133487"><a href="#local-6989586621679133487"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P.liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">NH.httpLbs</span><span> </span><a href="#local-6989586621679133387"><span class="hs-identifier hs-var">req</span></a><span> </span><a href="#local-6989586621679133385"><span class="hs-identifier hs-var">manager</span></a><span>
|
||||
</span><a name="line-142"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679133388"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#levelInfo"><span class="hs-identifier hs-var">levelInfo</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133393"><span class="hs-identifier hs-var">responseLogMsg</span></a><span> </span><a href="#local-6989586621679133487"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-143"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679133388"><span class="hs-identifier hs-var">src</span></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.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.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-6989586621679133487"><span class="hs-identifier hs-var">res</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-144"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="#local-6989586621679133487"><span class="hs-identifier hs-var">res</span></a><span>
|
||||
</span><a name="line-145"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-146"></a><span> </span><a name="local-6989586621679137528"><a href="#local-6989586621679137528"><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-147"></a><span> </span><a name="local-6989586621679137529"><a href="#local-6989586621679137529"><span class="hs-identifier">endpoint</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-146"></a><span> </span><a name="local-6989586621679133388"><a href="#local-6989586621679133388"><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-147"></a><span> </span><a name="local-6989586621679133389"><a href="#local-6989586621679133389"><span class="hs-identifier">endpoint</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-148"></a><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-149"></a><span> </span><span class="hs-identifier hs-var">BC.unpack</span><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-150"></a><span> </span><span class="hs-identifier">NH.method</span><span> </span><a href="#local-6989586621679137527"><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.host</span><span> </span><a href="#local-6989586621679137527"><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.path</span><span> </span><a href="#local-6989586621679137527"><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.queryString</span><span> </span><a href="#local-6989586621679137527"><span class="hs-identifier hs-var">req</span></a><span>
|
||||
</span><a name="line-151"></a><span> </span><a name="local-6989586621679137530"><a href="#local-6989586621679137530"><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-6989586621679137529"><span class="hs-identifier hs-var">endpoint</span></a><span>
|
||||
</span><a name="line-152"></a><span> </span><a name="local-6989586621679137531"><a href="#local-6989586621679137531"><span class="hs-identifier">requestDbgLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-153"></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.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.requestHeaders</span><span> </span><a href="#local-6989586621679137527"><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-154"></a><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">NH.requestBody</span><span> </span><a href="#local-6989586621679137527"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-155"></a><span> </span><span class="hs-identifier hs-var">NH.RequestBodyLBS</span><span> </span><a name="local-6989586621679137534"><a href="#local-6989586621679137534"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">T.decodeUtf8</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BL.toStrict</span><span> </span><a href="#local-6989586621679137534"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-150"></a><span> </span><span class="hs-identifier">NH.method</span><span> </span><a href="#local-6989586621679133387"><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.host</span><span> </span><a href="#local-6989586621679133387"><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.path</span><span> </span><a href="#local-6989586621679133387"><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.queryString</span><span> </span><a href="#local-6989586621679133387"><span class="hs-identifier hs-var">req</span></a><span>
|
||||
</span><a name="line-151"></a><span> </span><a name="local-6989586621679133390"><a href="#local-6989586621679133390"><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-6989586621679133389"><span class="hs-identifier hs-var">endpoint</span></a><span>
|
||||
</span><a name="line-152"></a><span> </span><a name="local-6989586621679133391"><a href="#local-6989586621679133391"><span class="hs-identifier">requestDbgLogMsg</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-153"></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.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.requestHeaders</span><span> </span><a href="#local-6989586621679133387"><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-154"></a><span> </span><span class="hs-special">(</span><span class="hs-keyword">case</span><span> </span><span class="hs-identifier">NH.requestBody</span><span> </span><a href="#local-6989586621679133387"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-155"></a><span> </span><span class="hs-identifier hs-var">NH.RequestBodyLBS</span><span> </span><a name="local-6989586621679133394"><a href="#local-6989586621679133394"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">T.decodeUtf8</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">BL.toStrict</span><span> </span><a href="#local-6989586621679133394"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-156"></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-157"></a><span> </span><a name="local-6989586621679137532"><a href="#local-6989586621679137532"><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.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.statusCode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH.responseStatus</span><span>
|
||||
</span><a name="line-158"></a><span> </span><a name="local-6989586621679137533"><a href="#local-6989586621679137533"><span class="hs-identifier">responseLogMsg</span></a></a><span> </span><a name="local-6989586621679137535"><a href="#local-6989586621679137535"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-159"></a><span> </span><span class="hs-string">"RES:statusCode="</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679137532"><span class="hs-identifier hs-var">responseStatusCode</span></a><span> </span><a href="#local-6989586621679137535"><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-6989586621679137529"><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-157"></a><span> </span><a name="local-6989586621679133392"><a href="#local-6989586621679133392"><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.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.statusCode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier">NH.responseStatus</span><span>
|
||||
</span><a name="line-158"></a><span> </span><a name="local-6989586621679133393"><a href="#local-6989586621679133393"><span class="hs-identifier">responseLogMsg</span></a></a><span> </span><a name="local-6989586621679133395"><a href="#local-6989586621679133395"><span class="hs-identifier">res</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-159"></a><span> </span><span class="hs-string">"RES:statusCode="</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679133392"><span class="hs-identifier hs-var">responseStatusCode</span></a><span> </span><a href="#local-6989586621679133395"><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-6989586621679133389"><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-160"></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-comment">-- * InitRequest</span><span>
|
||||
</span><a name="line-162"></a><span>
|
||||
</span><a name="line-163"></a><span class="hs-comment">-- | wraps an http-client 'Request' with request/response type parameters</span><span>
|
||||
</span><a name="line-164"></a><span class="hs-keyword">newtype</span><span> </span><a name="InitRequest"><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span> </span><a name="local-6989586621679136975"><a href="#local-6989586621679136975"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679136976"><a href="#local-6989586621679136976"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679136977"><a href="#local-6989586621679136977"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679136978"><a href="#local-6989586621679136978"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="InitRequest"><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-keyword">newtype</span><span> </span><a name="InitRequest"><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span> </span><a name="local-6989586621679132828"><a href="#local-6989586621679132828"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679132829"><a href="#local-6989586621679132829"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679132830"><a href="#local-6989586621679132830"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679132831"><a href="#local-6989586621679132831"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="InitRequest"><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier">InitRequest</span></a></a><span>
|
||||
</span><a name="line-165"></a><span> </span><span class="hs-special">{</span><span> </span><a name="unInitRequest"><a href="OpenAPIPetstore.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.Request</span><span>
|
||||
</span><a name="line-166"></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-167"></a><span>
|
||||
</span><a name="line-168"></a><span class="hs-comment">-- | Build an http-client 'Request' record from the supplied config and request</span><span>
|
||||
</span><a name="line-169"></a><span class="hs-identifier">_toInitRequest</span><span>
|
||||
</span><a name="line-170"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679136991"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679136992"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-170"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132844"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679132845"><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><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-comment">-- ^ config</span><span>
|
||||
</span><a name="line-172"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679136993"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679136992"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679136994"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679136991"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-173"></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="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679136993"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679136992"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679136994"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679136991"><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-174"></a><a name="_toInitRequest"><a href="OpenAPIPetstore.Client.html#_toInitRequest"><span class="hs-identifier">_toInitRequest</span></a></a><span> </span><a name="local-6989586621679137623"><a href="#local-6989586621679137623"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679137624"><a href="#local-6989586621679137624"><span class="hs-identifier">req0</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-175"></a><span> </span><a href="OpenAPIPetstore.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-6989586621679137623"><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-176"></a><span> </span><a name="local-6989586621679137625"><a href="#local-6989586621679137625"><span class="hs-identifier">parsedReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P.liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">NH.parseRequest</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL.unpack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL.append</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679137623"><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.concat</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rUrlPath</span><span> </span><a href="#local-6989586621679137624"><span class="hs-identifier hs-var">req0</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-6989586621679137626"><a href="#local-6989586621679137626"><span class="hs-identifier">req1</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P.liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="OpenAPIPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier hs-var">_applyAuthMethods</span></a><span> </span><a href="#local-6989586621679137624"><span class="hs-identifier hs-var">req0</span></a><span> </span><a href="#local-6989586621679137623"><span class="hs-identifier hs-var">config</span></a><span>
|
||||
</span><a name="line-172"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679132846"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132845"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132847"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132844"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-comment">-- ^ request</span><span>
|
||||
</span><a name="line-173"></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="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132846"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132845"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132847"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132844"><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-174"></a><a name="_toInitRequest"><a href="OpenAPIPetstore.Client.html#_toInitRequest"><span class="hs-identifier">_toInitRequest</span></a></a><span> </span><a name="local-6989586621679133488"><a href="#local-6989586621679133488"><span class="hs-identifier">config</span></a></a><span> </span><a name="local-6989586621679133489"><a href="#local-6989586621679133489"><span class="hs-identifier">req0</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-175"></a><span> </span><a href="OpenAPIPetstore.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-6989586621679133488"><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-176"></a><span> </span><a name="local-6989586621679133490"><a href="#local-6989586621679133490"><span class="hs-identifier">parsedReq</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P.liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">NH.parseRequest</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL.unpack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">BCL.append</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configHost</span><span> </span><a href="#local-6989586621679133488"><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.concat</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">rUrlPath</span><span> </span><a href="#local-6989586621679133489"><span class="hs-identifier hs-var">req0</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-6989586621679133491"><a href="#local-6989586621679133491"><span class="hs-identifier">req1</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P.liftIO</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="OpenAPIPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier hs-var">_applyAuthMethods</span></a><span> </span><a href="#local-6989586621679133489"><span class="hs-identifier hs-var">req0</span></a><span> </span><a href="#local-6989586621679133488"><span class="hs-identifier hs-var">config</span></a><span>
|
||||
</span><a name="line-178"></a><span> </span><span class="hs-identifier hs-var">P.when</span><span>
|
||||
</span><a name="line-179"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configValidateAuthMethods</span><span> </span><a href="#local-6989586621679137623"><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-6989586621679137626"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-180"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">E.throw</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="OpenAPIPetstore.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-6989586621679137626"><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-keyword">let</span><span> </span><a name="local-6989586621679137627"><a href="#local-6989586621679137627"><span class="hs-identifier">req2</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679137626"><span class="hs-identifier hs-var">req1</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier hs-var">_setAcceptHeader</span></a><span>
|
||||
</span><a name="line-182"></a><span> </span><a name="local-6989586621679137628"><a href="#local-6989586621679137628"><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.toHeader</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679137623"><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-6989586621679137627"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-183"></a><span> </span><a name="local-6989586621679137629"><a href="#local-6989586621679137629"><span class="hs-identifier">reqQuery</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH.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-6989586621679137627"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-184"></a><span> </span><a name="local-6989586621679137630"><a href="#local-6989586621679137630"><span class="hs-identifier">pReq</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679137625"><span class="hs-identifier hs-var">parsedReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.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-6989586621679137627"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-185"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH.requestHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679137628"><span class="hs-identifier hs-var">reqHeaders</span></a><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH.queryString</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679137629"><span class="hs-identifier hs-var">reqQuery</span></a><span>
|
||||
</span><a name="line-179"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier">configValidateAuthMethods</span><span> </span><a href="#local-6989586621679133488"><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-6989586621679133491"><span class="hs-identifier hs-var">req1</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-180"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">E.throw</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="OpenAPIPetstore.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-6989586621679133491"><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-keyword">let</span><span> </span><a name="local-6989586621679133492"><a href="#local-6989586621679133492"><span class="hs-identifier">req2</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133491"><span class="hs-identifier hs-var">req1</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier hs-var">_setAcceptHeader</span></a><span>
|
||||
</span><a name="line-182"></a><span> </span><a name="local-6989586621679133493"><a href="#local-6989586621679133493"><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.toHeader</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">configUserAgent</span><span> </span><a href="#local-6989586621679133488"><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-6989586621679133492"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-183"></a><span> </span><a name="local-6989586621679133494"><a href="#local-6989586621679133494"><span class="hs-identifier">reqQuery</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH.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-6989586621679133492"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-184"></a><span> </span><a name="local-6989586621679133495"><a href="#local-6989586621679133495"><span class="hs-identifier">pReq</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133490"><span class="hs-identifier hs-var">parsedReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.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-6989586621679133492"><span class="hs-identifier hs-var">req2</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-185"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH.requestHeaders</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133493"><span class="hs-identifier hs-var">reqHeaders</span></a><span>
|
||||
</span><a name="line-186"></a><span> </span><span class="hs-special">,</span><span> </span><span class="hs-identifier">NH.queryString</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679133494"><span class="hs-identifier hs-var">reqQuery</span></a><span>
|
||||
</span><a name="line-187"></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-188"></a><span> </span><a name="local-6989586621679137635"><a href="#local-6989586621679137635"><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-6989586621679137627"><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-189"></a><span> </span><a href="OpenAPIPetstore.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-6989586621679137630"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.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-190"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a name="local-6989586621679137631"><a href="#local-6989586621679137631"><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-6989586621679137630"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH.RequestBodyBS</span><span> </span><a href="#local-6989586621679137631"><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-191"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a name="local-6989586621679137632"><a href="#local-6989586621679137632"><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-6989586621679137630"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH.RequestBodyLBS</span><span> </span><a href="#local-6989586621679137632"><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-192"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679137633"><a href="#local-6989586621679137633"><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-6989586621679137630"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH.RequestBodyLBS</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">WH.urlEncodeForm</span><span> </span><a href="#local-6989586621679137633"><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-193"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679137634"><a href="#local-6989586621679137634"><span class="hs-identifier">parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">NH.formDataBody</span><span> </span><a href="#local-6989586621679137634"><span class="hs-identifier hs-var">parts</span></a><span> </span><a href="#local-6989586621679137630"><span class="hs-identifier hs-var">pReq</span></a><span>
|
||||
</span><a name="line-188"></a><span> </span><a name="local-6989586621679133500"><a href="#local-6989586621679133500"><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-6989586621679133492"><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-189"></a><span> </span><a href="OpenAPIPetstore.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-6989586621679133495"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.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-190"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a name="local-6989586621679133496"><a href="#local-6989586621679133496"><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-6989586621679133495"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH.RequestBodyBS</span><span> </span><a href="#local-6989586621679133496"><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-191"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a name="local-6989586621679133497"><a href="#local-6989586621679133497"><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-6989586621679133495"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH.RequestBodyLBS</span><span> </span><a href="#local-6989586621679133497"><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-192"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679133498"><a href="#local-6989586621679133498"><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-6989586621679133495"><span class="hs-identifier hs-var">pReq</span></a><span> </span><span class="hs-special">{</span><span> </span><span class="hs-identifier">NH.requestBody</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">NH.RequestBodyLBS</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">WH.urlEncodeForm</span><span> </span><a href="#local-6989586621679133498"><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-193"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679133499"><a href="#local-6989586621679133499"><span class="hs-identifier">parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">NH.formDataBody</span><span> </span><a href="#local-6989586621679133499"><span class="hs-identifier hs-var">parts</span></a><span> </span><a href="#local-6989586621679133495"><span class="hs-identifier hs-var">pReq</span></a><span>
|
||||
</span><a name="line-194"></a><span>
|
||||
</span><a name="line-195"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a href="#local-6989586621679137635"><span class="hs-identifier hs-var">outReq</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-195"></a><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a href="#local-6989586621679133500"><span class="hs-identifier hs-var">outReq</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-196"></a><span>
|
||||
</span><a name="line-197"></a><span class="hs-comment">-- | modify the underlying Request</span><span>
|
||||
</span><a name="line-198"></a><span class="hs-identifier">modifyInitRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679136987"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679136988"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679136989"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679136990"><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.Request</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">NH.Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679136987"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679136988"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679136989"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679136990"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-199"></a><a name="modifyInitRequest"><a href="OpenAPIPetstore.Client.html#modifyInitRequest"><span class="hs-identifier">modifyInitRequest</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679137636"><a href="#local-6989586621679137636"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679137637"><a href="#local-6989586621679137637"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679137637"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679137636"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-198"></a><span class="hs-identifier">modifyInitRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132840"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132841"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132842"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132843"><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.Request</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">NH.Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132840"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132841"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132842"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132843"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-199"></a><a name="modifyInitRequest"><a href="OpenAPIPetstore.Client.html#modifyInitRequest"><span class="hs-identifier">modifyInitRequest</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679133501"><a href="#local-6989586621679133501"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679133502"><a href="#local-6989586621679133502"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133502"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679133501"><span class="hs-identifier hs-var">req</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">-- | modify the underlying Request (monadic)</span><span>
|
||||
</span><a name="line-202"></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-6989586621679136982"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679136983"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679136984"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679136985"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679136986"><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.Request</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679136982"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-identifier hs-type">NH.Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679136982"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679136983"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679136984"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679136985"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679136986"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-203"></a><a name="modifyInitRequestM"><a href="OpenAPIPetstore.Client.html#modifyInitRequestM"><span class="hs-identifier">modifyInitRequestM</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679137638"><a href="#local-6989586621679137638"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679137639"><a href="#local-6989586621679137639"><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="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679137639"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679137638"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-202"></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-6989586621679132835"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132836"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132837"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132838"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132839"><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.Request</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132835"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-identifier hs-type">NH.Request</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679132835"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-type">InitRequest</span></a><span> </span><a href="#local-6989586621679132836"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679132837"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679132838"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679132839"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-203"></a><a name="modifyInitRequestM"><a href="OpenAPIPetstore.Client.html#modifyInitRequestM"><span class="hs-identifier">modifyInitRequestM</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><a name="local-6989586621679133503"><a href="#local-6989586621679133503"><span class="hs-identifier">req</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679133504"><a href="#local-6989586621679133504"><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="OpenAPIPetstore.Client.html#InitRequest"><span class="hs-identifier hs-var">InitRequest</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679133504"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679133503"><span class="hs-identifier hs-var">req</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-204"></a><span>
|
||||
</span><a name="line-205"></a><span class="hs-comment">-- ** Logging </span><span>
|
||||
</span><a name="line-206"></a><span>
|
||||
</span><a name="line-207"></a><span class="hs-comment">-- | Run a block using the configured logger instance</span><span>
|
||||
</span><a name="line-208"></a><span class="hs-identifier">runConfigLog</span><span>
|
||||
</span><a name="line-209"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679136981"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-210"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679136981"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-211"></a><a name="runConfigLog"><a href="OpenAPIPetstore.Client.html#runConfigLog"><span class="hs-identifier">runConfigLog</span></a></a><span> </span><a name="local-6989586621679137640"><a href="#local-6989586621679137640"><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-6989586621679137640"><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-6989586621679137640"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-209"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679132834"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-210"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679132834"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-211"></a><a name="runConfigLog"><a href="OpenAPIPetstore.Client.html#runConfigLog"><span class="hs-identifier">runConfigLog</span></a></a><span> </span><a name="local-6989586621679133505"><a href="#local-6989586621679133505"><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-6989586621679133505"><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-6989586621679133505"><span class="hs-identifier hs-var">config</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-212"></a><span>
|
||||
</span><a name="line-213"></a><span class="hs-comment">-- | Run a block using the configured logger instance (logs exceptions)</span><span>
|
||||
</span><a name="line-214"></a><span class="hs-identifier">runConfigLogWithExceptions</span><span>
|
||||
</span><a name="line-215"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">E.MonadCatch</span><span> </span><a href="#local-6989586621679136980"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679136980"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-216"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679136980"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-217"></a><a name="runConfigLogWithExceptions"><a href="OpenAPIPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier">runConfigLogWithExceptions</span></a></a><span> </span><a name="local-6989586621679137641"><a href="#local-6989586621679137641"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679137642"><a href="#local-6989586621679137642"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Client.html#runConfigLog"><span class="hs-identifier hs-var">runConfigLog</span></a><span> </span><a href="#local-6989586621679137642"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#logExceptions"><span class="hs-identifier hs-var">logExceptions</span></a><span> </span><a href="#local-6989586621679137641"><span class="hs-identifier hs-var">src</span></a><span>
|
||||
</span><a name="line-215"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">E.MonadCatch</span><span> </span><a href="#local-6989586621679132833"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679132833"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-216"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679132833"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-217"></a><a name="runConfigLogWithExceptions"><a href="OpenAPIPetstore.Client.html#runConfigLogWithExceptions"><span class="hs-identifier">runConfigLogWithExceptions</span></a></a><span> </span><a name="local-6989586621679133506"><a href="#local-6989586621679133506"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679133507"><a href="#local-6989586621679133507"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Client.html#runConfigLog"><span class="hs-identifier hs-var">runConfigLog</span></a><span> </span><a href="#local-6989586621679133507"><span class="hs-identifier hs-var">config</span></a><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier hs-var">logExceptions</span></a><span> </span><a href="#local-6989586621679133506"><span class="hs-identifier hs-var">src</span></a><span>
|
||||
</span><a name="line-218"></a></pre></body></html>
|
||||
@@ -73,19 +73,19 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-73"></a><span class="hs-keyword">data</span><span> </span><a name="OpenAPIPetstoreConfig"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier">OpenAPIPetstoreConfig</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="OpenAPIPetstoreConfig"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier">OpenAPIPetstoreConfig</span></a></a><span>
|
||||
</span><a name="line-74"></a><span> </span><span class="hs-special">{</span><span> </span><a name="configHost"><a href="OpenAPIPetstore.Core.html#configHost"><span class="hs-identifier">configHost</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">BCL.ByteString</span><span> </span><span class="hs-comment">-- ^ host supplied in the Request</span><span>
|
||||
</span><a name="line-75"></a><span> </span><span class="hs-special">,</span><span> </span><a name="configUserAgent"><a href="OpenAPIPetstore.Core.html#configUserAgent"><span class="hs-identifier">configUserAgent</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-comment">-- ^ user-agent supplied in the Request</span><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">,</span><span> </span><a name="configLogExecWithContext"><a href="OpenAPIPetstore.Core.html#configLogExecWithContext"><span class="hs-identifier">configLogExecWithContext</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span> </span><span class="hs-comment">-- ^ Run a block using a Logger instance</span><span>
|
||||
</span><a name="line-77"></a><span> </span><span class="hs-special">,</span><span> </span><a name="configLogContext"><a href="OpenAPIPetstore.Core.html#configLogContext"><span class="hs-identifier">configLogContext</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-comment">-- ^ Configures the logger</span><span>
|
||||
</span><a name="line-76"></a><span> </span><span class="hs-special">,</span><span> </span><a name="configLogExecWithContext"><a href="OpenAPIPetstore.Core.html#configLogExecWithContext"><span class="hs-identifier">configLogExecWithContext</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span> </span><span class="hs-comment">-- ^ Run a block using a Logger instance</span><span>
|
||||
</span><a name="line-77"></a><span> </span><span class="hs-special">,</span><span> </span><a name="configLogContext"><a href="OpenAPIPetstore.Core.html#configLogContext"><span class="hs-identifier">configLogContext</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-comment">-- ^ Configures the logger</span><span>
|
||||
</span><a name="line-78"></a><span> </span><span class="hs-special">,</span><span> </span><a name="configAuthMethods"><a href="OpenAPIPetstore.Core.html#configAuthMethods"><span class="hs-identifier">configAuthMethods</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">[</span><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-type">AnyAuthMethod</span></a><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ List of configured auth methods</span><span>
|
||||
</span><a name="line-79"></a><span> </span><span class="hs-special">,</span><span> </span><a name="configValidateAuthMethods"><a href="OpenAPIPetstore.Core.html#configValidateAuthMethods"><span class="hs-identifier">configValidateAuthMethods</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><span class="hs-comment">-- ^ throw exceptions if auth methods are not configured</span><span>
|
||||
</span><a name="line-80"></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span class="hs-comment">-- | display the config</span><span>
|
||||
</span><a name="line-83"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P.Show</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-84"></a><span> </span><a name="local-8214565720323791384"><span class="hs-identifier">show</span></a><span> </span><a name="local-6989586621679126640"><a href="#local-6989586621679126640"><span class="hs-identifier">c</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-84"></a><span> </span><a name="local-8214565720323790323"><span class="hs-identifier">show</span></a><span> </span><a name="local-6989586621679121987"><a href="#local-6989586621679121987"><span class="hs-identifier">c</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-85"></a><span> </span><span class="hs-identifier hs-var">T.printf</span><span>
|
||||
</span><a name="line-86"></a><span> </span><span class="hs-string">"{ configHost = %v, configUserAgent = %v, ..}"</span><span>
|
||||
</span><a name="line-87"></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-6989586621679126640"><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">configUserAgent</span><span> </span><a href="#local-6989586621679126640"><span class="hs-identifier hs-var">c</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-87"></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-6989586621679121987"><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">configUserAgent</span><span> </span><a href="#local-6989586621679121987"><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><a name="line-90"></a><span class="hs-comment">-- | constructs a default OpenAPIPetstoreConfig</span><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">--</span><span>
|
||||
@@ -99,36 +99,36 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-99"></a><span class="hs-comment">--</span><span>
|
||||
</span><a name="line-100"></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="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-101"></a><a name="newConfig"><a href="OpenAPIPetstore.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-102"></a><span> </span><a name="local-6989586621679127146"><a href="#local-6989586621679127146"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#initLogContext"><span class="hs-identifier hs-var">initLogContext</span></a><span>
|
||||
</span><a name="line-102"></a><span> </span><a name="local-6989586621679122493"><a href="#local-6989586621679122493"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#initLogContext"><span class="hs-identifier hs-var">initLogContext</span></a><span>
|
||||
</span><a name="line-103"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-var">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-104"></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-105"></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">"openapi-petstore/0.1.0.0"</span><span>
|
||||
</span><a name="line-106"></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="OpenAPIPetstore.LoggingMonadLogger.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span>
|
||||
</span><a name="line-107"></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-6989586621679127146"><span class="hs-identifier hs-var">logCxt</span></a><span>
|
||||
</span><a name="line-106"></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="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span>
|
||||
</span><a name="line-107"></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-6989586621679122493"><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">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-109"></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-110"></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-111"></a><span>
|
||||
</span><a name="line-112"></a><span class="hs-comment">-- | updates config use AuthMethod on matching requests</span><span>
|
||||
</span><a name="line-113"></a><span class="hs-identifier">addAuthMethod</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679127145"><span class="hs-identifier hs-type">auth</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127145"><span class="hs-identifier hs-type">auth</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-114"></a><a name="addAuthMethod"><a href="OpenAPIPetstore.Core.html#addAuthMethod"><span class="hs-identifier">addAuthMethod</span></a></a><span> </span><a name="local-6989586621679127147"><a href="#local-6989586621679127147"><span class="hs-identifier">config</span></a></a><span class="hs-glyph">@</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-var">OpenAPIPetstoreConfig</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-6989586621679127149"><a href="#local-6989586621679127149"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-115"></a><span> </span><a href="#local-6989586621679127147"><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="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a href="#local-6989586621679127149"><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-113"></a><span class="hs-identifier">addAuthMethod</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679122492"><span class="hs-identifier hs-type">auth</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122492"><span class="hs-identifier hs-type">auth</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-114"></a><a name="addAuthMethod"><a href="OpenAPIPetstore.Core.html#addAuthMethod"><span class="hs-identifier">addAuthMethod</span></a></a><span> </span><a name="local-6989586621679122494"><a href="#local-6989586621679122494"><span class="hs-identifier">config</span></a></a><span class="hs-glyph">@</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-var">OpenAPIPetstoreConfig</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-6989586621679122496"><a href="#local-6989586621679122496"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-115"></a><span> </span><a href="#local-6989586621679122494"><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="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a href="#local-6989586621679122496"><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-116"></a><span>
|
||||
</span><a name="line-117"></a><span class="hs-comment">-- | updates the config to use stdout logging</span><span>
|
||||
</span><a name="line-118"></a><span class="hs-identifier">withStdoutLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-119"></a><a name="withStdoutLogging"><a href="OpenAPIPetstore.Core.html#withStdoutLogging"><span class="hs-identifier">withStdoutLogging</span></a></a><span> </span><a name="local-6989586621679127150"><a href="#local-6989586621679127150"><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-120"></a><span> </span><a name="local-6989586621679127151"><a href="#local-6989586621679127151"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.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-6989586621679127150"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-121"></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-6989586621679127150"><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="OpenAPIPetstore.LoggingMonadLogger.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-6989586621679127151"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-119"></a><a name="withStdoutLogging"><a href="OpenAPIPetstore.Core.html#withStdoutLogging"><span class="hs-identifier">withStdoutLogging</span></a></a><span> </span><a name="local-6989586621679122497"><a href="#local-6989586621679122497"><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-120"></a><span> </span><a name="local-6989586621679122498"><a href="#local-6989586621679122498"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.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-6989586621679122497"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-121"></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-6989586621679122497"><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="OpenAPIPetstore.LoggingKatip.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-6989586621679122498"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-122"></a><span>
|
||||
</span><a name="line-123"></a><span class="hs-comment">-- | updates the config to use stderr logging</span><span>
|
||||
</span><a name="line-124"></a><span class="hs-identifier">withStderrLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-125"></a><a name="withStderrLogging"><a href="OpenAPIPetstore.Core.html#withStderrLogging"><span class="hs-identifier">withStderrLogging</span></a></a><span> </span><a name="local-6989586621679127152"><a href="#local-6989586621679127152"><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-126"></a><span> </span><a name="local-6989586621679127153"><a href="#local-6989586621679127153"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.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-6989586621679127152"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-127"></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-6989586621679127152"><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="OpenAPIPetstore.LoggingMonadLogger.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-6989586621679127153"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-125"></a><a name="withStderrLogging"><a href="OpenAPIPetstore.Core.html#withStderrLogging"><span class="hs-identifier">withStderrLogging</span></a></a><span> </span><a name="local-6989586621679122499"><a href="#local-6989586621679122499"><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-126"></a><span> </span><a name="local-6989586621679122500"><a href="#local-6989586621679122500"><span class="hs-identifier">logCxt</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.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-6989586621679122499"><span class="hs-identifier hs-var">p</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-127"></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-6989586621679122499"><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="OpenAPIPetstore.LoggingKatip.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-6989586621679122500"><span class="hs-identifier hs-var">logCxt</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-128"></a><span>
|
||||
</span><a name="line-129"></a><span class="hs-comment">-- | updates the config to disable logging</span><span>
|
||||
</span><a name="line-130"></a><span class="hs-identifier">withNoLogging</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-131"></a><a name="withNoLogging"><a href="OpenAPIPetstore.Core.html#withNoLogging"><span class="hs-identifier">withNoLogging</span></a></a><span> </span><a name="local-6989586621679127154"><a href="#local-6989586621679127154"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679127154"><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="OpenAPIPetstore.LoggingMonadLogger.html#runNullLogExec"><span class="hs-identifier hs-var">runNullLogExec</span></a><span class="hs-special">}</span><span>
|
||||
</span><a name="line-131"></a><a name="withNoLogging"><a href="OpenAPIPetstore.Core.html#withNoLogging"><span class="hs-identifier">withNoLogging</span></a></a><span> </span><a name="local-6989586621679122501"><a href="#local-6989586621679122501"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679122501"><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="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier hs-var">runNullLogExec</span></a><span class="hs-special">}</span><span>
|
||||
</span><a name="line-132"></a><span>
|
||||
</span><a name="line-133"></a><span class="hs-comment">-- * OpenAPIPetstoreRequest</span><span>
|
||||
</span><a name="line-134"></a><span>
|
||||
@@ -140,7 +140,7 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-140"></a><span class="hs-comment">-- * contentType - 'MimeType' associated with request body</span><span>
|
||||
</span><a name="line-141"></a><span class="hs-comment">-- * res - response model</span><span>
|
||||
</span><a name="line-142"></a><span class="hs-comment">-- * accept - 'MimeType' associated with response body</span><span>
|
||||
</span><a name="line-143"></a><span class="hs-keyword">data</span><span> </span><a name="OpenAPIPetstoreRequest"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier">OpenAPIPetstoreRequest</span></a></a><span> </span><a name="local-6989586621679126307"><a href="#local-6989586621679126307"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679126308"><a href="#local-6989586621679126308"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679126309"><a href="#local-6989586621679126309"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679126310"><a href="#local-6989586621679126310"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="OpenAPIPetstoreRequest"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier">OpenAPIPetstoreRequest</span></a></a><span>
|
||||
</span><a name="line-143"></a><span class="hs-keyword">data</span><span> </span><a name="OpenAPIPetstoreRequest"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier">OpenAPIPetstoreRequest</span></a></a><span> </span><a name="local-6989586621679121647"><a href="#local-6989586621679121647"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679121648"><a href="#local-6989586621679121648"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679121649"><a href="#local-6989586621679121649"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679121650"><a href="#local-6989586621679121650"><span class="hs-identifier">accept</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="OpenAPIPetstoreRequest"><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier">OpenAPIPetstoreRequest</span></a></a><span>
|
||||
</span><a name="line-144"></a><span> </span><span class="hs-special">{</span><span> </span><a name="rMethod"><a href="OpenAPIPetstore.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.Method</span><span> </span><span class="hs-comment">-- ^ Method of OpenAPIPetstoreRequest</span><span>
|
||||
</span><a name="line-145"></a><span> </span><span class="hs-special">,</span><span> </span><a name="rUrlPath"><a href="OpenAPIPetstore.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.ByteString</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ Endpoint of OpenAPIPetstoreRequest</span><span>
|
||||
</span><a name="line-146"></a><span> </span><span class="hs-special">,</span><span> </span><a name="rParams"><a href="OpenAPIPetstore.Core.html#rParams"><span class="hs-identifier">rParams</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span> </span><span class="hs-comment">-- ^ params of OpenAPIPetstoreRequest</span><span>
|
||||
@@ -149,47 +149,47 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-149"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Show</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-150"></a><span>
|
||||
</span><a name="line-151"></a><span class="hs-comment">-- | 'rMethod' Lens</span><span>
|
||||
</span><a name="line-152"></a><span class="hs-identifier">rMethodL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127141"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127142"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127143"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127144"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-type">NH.Method</span><span>
|
||||
</span><a name="line-153"></a><a name="rMethodL"><a href="OpenAPIPetstore.Core.html#rMethodL"><span class="hs-identifier">rMethodL</span></a></a><span> </span><a name="local-6989586621679127155"><a href="#local-6989586621679127155"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</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-6989586621679127160"><a href="#local-6989586621679127160"><span class="hs-identifier">rMethod</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679127160"><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-6989586621679127155"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679127156"><span class="hs-identifier hs-var">rMethod</span></a><span>
|
||||
</span><a name="line-152"></a><span class="hs-identifier">rMethodL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122488"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122489"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122490"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122491"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-type">NH.Method</span><span>
|
||||
</span><a name="line-153"></a><a name="rMethodL"><a href="OpenAPIPetstore.Core.html#rMethodL"><span class="hs-identifier">rMethodL</span></a></a><span> </span><a name="local-6989586621679122502"><a href="#local-6989586621679122502"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</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-6989586621679122507"><a href="#local-6989586621679122507"><span class="hs-identifier">rMethod</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679122507"><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-6989586621679122502"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679122503"><span class="hs-identifier hs-var">rMethod</span></a><span>
|
||||
</span><a name="line-154"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">rMethodL</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-155"></a><span>
|
||||
</span><a name="line-156"></a><span class="hs-comment">-- | 'rUrlPath' Lens</span><span>
|
||||
</span><a name="line-157"></a><span class="hs-identifier">rUrlPathL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127137"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127138"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127139"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127140"><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.ByteString</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-158"></a><a name="rUrlPathL"><a href="OpenAPIPetstore.Core.html#rUrlPathL"><span class="hs-identifier">rUrlPathL</span></a></a><span> </span><a name="local-6989586621679127161"><a href="#local-6989586621679127161"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</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-6989586621679127166"><a href="#local-6989586621679127166"><span class="hs-identifier">rUrlPath</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679127166"><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-6989586621679127161"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679127163"><span class="hs-identifier hs-var">rUrlPath</span></a><span>
|
||||
</span><a name="line-157"></a><span class="hs-identifier">rUrlPathL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122484"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122485"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122486"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122487"><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.ByteString</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-158"></a><a name="rUrlPathL"><a href="OpenAPIPetstore.Core.html#rUrlPathL"><span class="hs-identifier">rUrlPathL</span></a></a><span> </span><a name="local-6989586621679122522"><a href="#local-6989586621679122522"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</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-6989586621679122527"><a href="#local-6989586621679122527"><span class="hs-identifier">rUrlPath</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679122527"><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-6989586621679122522"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679122524"><span class="hs-identifier hs-var">rUrlPath</span></a><span>
|
||||
</span><a name="line-159"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">rUrlPathL</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-160"></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-comment">-- | 'rParams' Lens</span><span>
|
||||
</span><a name="line-162"></a><span class="hs-identifier">rParamsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127133"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127134"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127135"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127136"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span>
|
||||
</span><a name="line-163"></a><a name="rParamsL"><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier">rParamsL</span></a></a><span> </span><a name="local-6989586621679127167"><a href="#local-6989586621679127167"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</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-6989586621679127172"><a href="#local-6989586621679127172"><span class="hs-identifier">rParams</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679127172"><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-6989586621679127167"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679127170"><span class="hs-identifier hs-var">rParams</span></a><span>
|
||||
</span><a name="line-162"></a><span class="hs-identifier">rParamsL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122480"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122481"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122482"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122483"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span>
|
||||
</span><a name="line-163"></a><a name="rParamsL"><a href="OpenAPIPetstore.Core.html#rParamsL"><span class="hs-identifier">rParamsL</span></a></a><span> </span><a name="local-6989586621679122528"><a href="#local-6989586621679122528"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</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-6989586621679122533"><a href="#local-6989586621679122533"><span class="hs-identifier">rParams</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679122533"><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-6989586621679122528"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679122531"><span class="hs-identifier hs-var">rParams</span></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">rParamsL</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-165"></a><span>
|
||||
</span><a name="line-166"></a><span class="hs-comment">-- | 'rParams' Lens</span><span>
|
||||
</span><a name="line-167"></a><span class="hs-identifier">rAuthTypesL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127129"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127130"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127131"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127132"><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.TypeRep</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-168"></a><a name="rAuthTypesL"><a href="OpenAPIPetstore.Core.html#rAuthTypesL"><span class="hs-identifier">rAuthTypesL</span></a></a><span> </span><a name="local-6989586621679127173"><a href="#local-6989586621679127173"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</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-6989586621679127178"><a href="#local-6989586621679127178"><span class="hs-identifier">rAuthTypes</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679127178"><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-6989586621679127173"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679127177"><span class="hs-identifier hs-var">rAuthTypes</span></a><span>
|
||||
</span><a name="line-167"></a><span class="hs-identifier">rAuthTypesL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122476"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122477"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122478"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122479"><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.TypeRep</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-168"></a><a name="rAuthTypesL"><a href="OpenAPIPetstore.Core.html#rAuthTypesL"><span class="hs-identifier">rAuthTypesL</span></a></a><span> </span><a name="local-6989586621679122534"><a href="#local-6989586621679122534"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</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-6989586621679122539"><a href="#local-6989586621679122539"><span class="hs-identifier">rAuthTypes</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679122539"><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-6989586621679122534"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679122538"><span class="hs-identifier hs-var">rAuthTypes</span></a><span>
|
||||
</span><a name="line-169"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">rAuthTypesL</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-170"></a><span>
|
||||
</span><a name="line-171"></a><span class="hs-comment">-- * HasBodyParam</span><span>
|
||||
</span><a name="line-172"></a><span>
|
||||
</span><a name="line-173"></a><span class="hs-comment">-- | Designates the body parameter of a request</span><span>
|
||||
</span><a name="line-174"></a><span class="hs-keyword">class</span><span> </span><a name="HasBodyParam"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier">HasBodyParam</span></a></a><span> </span><a name="local-6989586621679126300"><a href="#local-6989586621679126300"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679126301"><a href="#local-6989586621679126301"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-175"></a><span> </span><a name="setBodyParam"><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier">setBodyParam</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679126302"><a href="#local-6989586621679126302"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679126303"><a href="#local-6989586621679126303"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679126304"><a href="#local-6989586621679126304"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="#local-6989586621679126300"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126302"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679126302"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126301"><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="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679126300"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126302"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126303"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679126304"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679126301"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679126300"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126302"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126303"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679126304"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-176"></a><span> </span><a name="local-8214565720323899621"><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier">setBodyParam</span></a></a><span> </span><a name="local-6989586621679126305"><a href="#local-6989586621679126305"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679126306"><a href="#local-6989586621679126306"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-177"></a><span> </span><a href="#local-6989586621679126305"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_setBodyLBS"><span class="hs-identifier hs-var">_setBodyLBS</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679126302"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679126306"><span class="hs-identifier hs-var">xs</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="OpenAPIPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
|
||||
</span><a name="line-174"></a><span class="hs-keyword">class</span><span> </span><a name="HasBodyParam"><a href="OpenAPIPetstore.Core.html#HasBodyParam"><span class="hs-identifier">HasBodyParam</span></a></a><span> </span><a name="local-6989586621679121640"><a href="#local-6989586621679121640"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679121641"><a href="#local-6989586621679121641"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-175"></a><span> </span><a name="setBodyParam"><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier">setBodyParam</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679121642"><a href="#local-6989586621679121642"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679121643"><a href="#local-6989586621679121643"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679121644"><a href="#local-6989586621679121644"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier hs-type">Consumes</span></a><span> </span><a href="#local-6989586621679121640"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121642"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">,</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="#local-6989586621679121642"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121641"><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="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679121640"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121642"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121643"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679121644"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679121641"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679121640"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121642"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121643"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679121644"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-176"></a><span> </span><a name="local-8214565720323894821"><a href="OpenAPIPetstore.Core.html#setBodyParam"><span class="hs-identifier">setBodyParam</span></a></a><span> </span><a name="local-6989586621679121645"><a href="#local-6989586621679121645"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679121646"><a href="#local-6989586621679121646"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-177"></a><span> </span><a href="#local-6989586621679121645"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.Core.html#_setBodyLBS"><span class="hs-identifier hs-var">_setBodyLBS</span></a><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679121642"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679121646"><span class="hs-identifier hs-var">xs</span></a><span> </span><span class="hs-operator hs-var">&</span><span> </span><a href="OpenAPIPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier hs-var">_setContentTypeHeader</span></a><span>
|
||||
</span><a name="line-178"></a><span>
|
||||
</span><a name="line-179"></a><span class="hs-comment">-- * HasOptionalParam</span><span>
|
||||
</span><a name="line-180"></a><span>
|
||||
</span><a name="line-181"></a><span class="hs-comment">-- | Designates the optional parameters of a request</span><span>
|
||||
</span><a name="line-182"></a><span class="hs-keyword">class</span><span> </span><a name="HasOptionalParam"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier">HasOptionalParam</span></a></a><span> </span><a name="local-6989586621679126292"><a href="#local-6989586621679126292"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679126293"><a href="#local-6989586621679126293"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-182"></a><span class="hs-keyword">class</span><span> </span><a name="HasOptionalParam"><a href="OpenAPIPetstore.Core.html#HasOptionalParam"><span class="hs-identifier">HasOptionalParam</span></a></a><span> </span><a name="local-6989586621679121632"><a href="#local-6989586621679121632"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679121633"><a href="#local-6989586621679121633"><span class="hs-identifier">param</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-183"></a><span> </span><span class="hs-pragma">{-# MINIMAL</span><span> </span><span class="hs-pragma">applyOptionalParam</span><span> </span><span class="hs-pragma">|</span><span> </span><span class="hs-pragma">(</span><span class="hs-pragma">-&-</span><span class="hs-pragma">)</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-184"></a><span>
|
||||
</span><a name="line-185"></a><span> </span><span class="hs-comment">-- | Apply an optional parameter to a request</span><span>
|
||||
</span><a name="line-186"></a><span> </span><a name="applyOptionalParam"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679126292"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126294"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126295"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679126296"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679126293"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679126292"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126294"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126295"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679126296"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-187"></a><span> </span><a name="local-8214565720323899618"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#-%26-"><span class="hs-operator hs-var">-&-</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-186"></a><span> </span><a name="applyOptionalParam"><a href="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier">applyOptionalParam</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679121632"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121634"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121635"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679121636"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679121633"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679121632"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121634"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121635"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679121636"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-187"></a><span> </span><a name="local-8214565720323894818"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#-%26-"><span class="hs-operator hs-var">-&-</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-188"></a><span> </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">applyOptionalParam</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-189"></a><span>
|
||||
</span><a name="line-190"></a><span> </span><span class="hs-comment">-- | infix operator \/ alias for 'addOptionalParam'</span><span>
|
||||
</span><a name="line-191"></a><span> </span><span class="hs-special">(</span><a name="-%26-"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679126292"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126297"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126298"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679126299"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679126293"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679126292"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126297"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126298"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679126299"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-192"></a><span> </span><span class="hs-special">(</span><a name="local-8214565720323899619"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier hs-var">applyOptionalParam</span></a><span>
|
||||
</span><a name="line-191"></a><span> </span><span class="hs-special">(</span><a name="-%26-"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679121632"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121637"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121638"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679121639"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679121633"><span class="hs-identifier hs-type">param</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679121632"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121637"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121638"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679121639"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-192"></a><span> </span><span class="hs-special">(</span><a name="local-8214565720323894819"><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#applyOptionalParam"><span class="hs-identifier hs-var">applyOptionalParam</span></a><span>
|
||||
</span><a name="line-193"></a><span> </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">(</span><span class="hs-pragma">-&-</span><span class="hs-pragma">)</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-194"></a><span>
|
||||
</span><a name="line-195"></a><span class="hs-keyword">infixl</span><span> </span><span class="hs-number">2</span><span> </span><a href="OpenAPIPetstore.Core.html#-%26-"><span class="hs-operator hs-var">-&-</span></a><span>
|
||||
@@ -204,17 +204,17 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-204"></a><span>
|
||||
</span><a name="line-205"></a><span class="hs-comment">-- | 'paramsQuery' Lens</span><span>
|
||||
</span><a name="line-206"></a><span class="hs-identifier">paramsQueryL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span> </span><span class="hs-identifier hs-type">NH.Query</span><span>
|
||||
</span><a name="line-207"></a><a name="paramsQueryL"><a href="OpenAPIPetstore.Core.html#paramsQueryL"><span class="hs-identifier">paramsQueryL</span></a></a><span> </span><a name="local-6989586621679127179"><a href="#local-6989586621679127179"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.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-6989586621679127183"><a href="#local-6989586621679127183"><span class="hs-identifier">paramsQuery</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679127183"><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-6989586621679127179"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679127180"><span class="hs-identifier hs-var">paramsQuery</span></a><span>
|
||||
</span><a name="line-207"></a><a name="paramsQueryL"><a href="OpenAPIPetstore.Core.html#paramsQueryL"><span class="hs-identifier">paramsQueryL</span></a></a><span> </span><a name="local-6989586621679122540"><a href="#local-6989586621679122540"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.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-6989586621679122544"><a href="#local-6989586621679122544"><span class="hs-identifier">paramsQuery</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679122544"><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-6989586621679122540"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679122541"><span class="hs-identifier hs-var">paramsQuery</span></a><span>
|
||||
</span><a name="line-208"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">paramsQueryL</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-209"></a><span>
|
||||
</span><a name="line-210"></a><span class="hs-comment">-- | 'paramsHeaders' Lens</span><span>
|
||||
</span><a name="line-211"></a><span class="hs-identifier">paramsHeadersL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span> </span><span class="hs-identifier hs-type">NH.RequestHeaders</span><span>
|
||||
</span><a name="line-212"></a><a name="paramsHeadersL"><a href="OpenAPIPetstore.Core.html#paramsHeadersL"><span class="hs-identifier">paramsHeadersL</span></a></a><span> </span><a name="local-6989586621679127184"><a href="#local-6989586621679127184"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.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-6989586621679127188"><a href="#local-6989586621679127188"><span class="hs-identifier">paramsHeaders</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679127188"><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-6989586621679127184"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679127186"><span class="hs-identifier hs-var">paramsHeaders</span></a><span>
|
||||
</span><a name="line-212"></a><a name="paramsHeadersL"><a href="OpenAPIPetstore.Core.html#paramsHeadersL"><span class="hs-identifier">paramsHeadersL</span></a></a><span> </span><a name="local-6989586621679122545"><a href="#local-6989586621679122545"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.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-6989586621679122549"><a href="#local-6989586621679122549"><span class="hs-identifier">paramsHeaders</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679122549"><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-6989586621679122545"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679122547"><span class="hs-identifier hs-var">paramsHeaders</span></a><span>
|
||||
</span><a name="line-213"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">paramsHeadersL</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-214"></a><span>
|
||||
</span><a name="line-215"></a><span class="hs-comment">-- | 'paramsBody' Lens</span><span>
|
||||
</span><a name="line-216"></a><span class="hs-identifier">paramsBodyL</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier hs-type">Lens_'</span></a><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBody"><span class="hs-identifier hs-type">ParamBody</span></a><span>
|
||||
</span><a name="line-217"></a><a name="paramsBodyL"><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-identifier">paramsBodyL</span></a></a><span> </span><a name="local-6989586621679127189"><a href="#local-6989586621679127189"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.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-6989586621679127193"><a href="#local-6989586621679127193"><span class="hs-identifier">paramsBody</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679127193"><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-6989586621679127189"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679127192"><span class="hs-identifier hs-var">paramsBody</span></a><span>
|
||||
</span><a name="line-217"></a><a name="paramsBodyL"><a href="OpenAPIPetstore.Core.html#paramsBodyL"><span class="hs-identifier">paramsBodyL</span></a></a><span> </span><a name="local-6989586621679122550"><a href="#local-6989586621679122550"><span class="hs-identifier">f</span></a></a><span> </span><a href="OpenAPIPetstore.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-6989586621679122554"><a href="#local-6989586621679122554"><span class="hs-identifier">paramsBody</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-var">Params</span></a><span> </span><span class="hs-special">{</span><span> </span><a href="#local-6989586621679122554"><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-6989586621679122550"><span class="hs-identifier hs-var">f</span></a><span> </span><a href="#local-6989586621679122553"><span class="hs-identifier hs-var">paramsBody</span></a><span>
|
||||
</span><a name="line-218"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">paramsBodyL</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-219"></a><span>
|
||||
</span><a name="line-220"></a><span class="hs-comment">-- | Request Body</span><span>
|
||||
@@ -230,90 +230,90 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-230"></a><span>
|
||||
</span><a name="line-231"></a><span class="hs-identifier">_mkRequest</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">NH.Method</span><span> </span><span class="hs-comment">-- ^ Method </span><span>
|
||||
</span><a name="line-232"></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">BCL.ByteString</span><span class="hs-special">]</span><span> </span><span class="hs-comment">-- ^ Endpoint</span><span>
|
||||
</span><a name="line-233"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127125"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127126"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127127"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127128"><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-234"></a><a name="_mkRequest"><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier">_mkRequest</span></a></a><span> </span><a name="local-6989586621679127194"><a href="#local-6989586621679127194"><span class="hs-identifier">m</span></a></a><span> </span><a name="local-6989586621679127195"><a href="#local-6989586621679127195"><span class="hs-identifier">u</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127194"><span class="hs-identifier hs-var">m</span></a><span> </span><a href="#local-6989586621679127195"><span class="hs-identifier hs-var">u</span></a><span> </span><a href="OpenAPIPetstore.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-233"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122472"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122473"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122474"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122475"><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-234"></a><a name="_mkRequest"><a href="OpenAPIPetstore.Core.html#_mkRequest"><span class="hs-identifier">_mkRequest</span></a></a><span> </span><a name="local-6989586621679122555"><a href="#local-6989586621679122555"><span class="hs-identifier">m</span></a></a><span> </span><a name="local-6989586621679122556"><a href="#local-6989586621679122556"><span class="hs-identifier">u</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-var">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122555"><span class="hs-identifier hs-var">m</span></a><span> </span><a href="#local-6989586621679122556"><span class="hs-identifier hs-var">u</span></a><span> </span><a href="OpenAPIPetstore.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-235"></a><span>
|
||||
</span><a name="line-236"></a><span class="hs-identifier">_mkParams</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#Params"><span class="hs-identifier hs-type">Params</span></a><span>
|
||||
</span><a name="line-237"></a><a name="_mkParams"><a href="OpenAPIPetstore.Core.html#_mkParams"><span class="hs-identifier">_mkParams</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyNone"><span class="hs-identifier hs-var">ParamBodyNone</span></a><span>
|
||||
</span><a name="line-238"></a><span>
|
||||
</span><a name="line-239"></a><span class="hs-identifier">setHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127121"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127122"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127123"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127124"><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.Header</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127121"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127122"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127123"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127124"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-240"></a><a name="setHeader"><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier">setHeader</span></a></a><span> </span><a name="local-6989586621679127196"><a href="#local-6989586621679127196"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127197"><a href="#local-6989586621679127197"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-241"></a><span> </span><a href="#local-6989586621679127196"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.fmap</span><span> </span><span class="hs-identifier hs-var">P.fst</span><span> </span><a href="#local-6989586621679127197"><span class="hs-identifier hs-var">header</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-242"></a><span> </span><span class="hs-identifier hs-var">L.over</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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-6989586621679127197"><span class="hs-identifier hs-var">header</span></a><span> </span><span class="hs-operator hs-var">P.++</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-239"></a><span class="hs-identifier">setHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122468"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122469"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122470"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122471"><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.Header</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122468"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122469"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122470"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122471"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-240"></a><a name="setHeader"><a href="OpenAPIPetstore.Core.html#setHeader"><span class="hs-identifier">setHeader</span></a></a><span> </span><a name="local-6989586621679122557"><a href="#local-6989586621679122557"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679122558"><a href="#local-6989586621679122558"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-241"></a><span> </span><a href="#local-6989586621679122557"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.fmap</span><span> </span><span class="hs-identifier hs-var">P.fst</span><span> </span><a href="#local-6989586621679122558"><span class="hs-identifier hs-var">header</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-242"></a><span> </span><span class="hs-identifier hs-var">L.over</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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-6989586621679122558"><span class="hs-identifier hs-var">header</span></a><span> </span><span class="hs-operator hs-var">P.++</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-243"></a><span>
|
||||
</span><a name="line-244"></a><span class="hs-identifier">removeHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127117"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127118"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127119"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127120"><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.HeaderName</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127117"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127118"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127119"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127120"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-245"></a><a name="removeHeader"><a href="OpenAPIPetstore.Core.html#removeHeader"><span class="hs-identifier">removeHeader</span></a></a><span> </span><a name="local-6989586621679127213"><a href="#local-6989586621679127213"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127214"><a href="#local-6989586621679127214"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-246"></a><span> </span><a href="#local-6989586621679127213"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-244"></a><span class="hs-identifier">removeHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122464"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122465"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122466"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122467"><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.HeaderName</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122464"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122465"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122466"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122467"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-245"></a><a name="removeHeader"><a href="OpenAPIPetstore.Core.html#removeHeader"><span class="hs-identifier">removeHeader</span></a></a><span> </span><a name="local-6989586621679122574"><a href="#local-6989586621679122574"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679122575"><a href="#local-6989586621679122575"><span class="hs-identifier">header</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-246"></a><span> </span><a href="#local-6989586621679122574"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-247"></a><span> </span><span class="hs-identifier hs-var">L.over</span><span>
|
||||
</span><a name="line-248"></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#paramsHeadersL"><span class="hs-identifier hs-var">paramsHeadersL</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-249"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.filter</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679127623"><a href="#local-6989586621679127623"><span class="hs-identifier">h</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127215"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679127623"><span class="hs-identifier hs-var">h</span></a><span> </span><span class="hs-special">`</span><span class="hs-identifier hs-var">P.notElem</span><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P.fmap</span><span> </span><span class="hs-identifier hs-var">CI.mk</span><span> </span><a href="#local-6989586621679127214"><span class="hs-identifier hs-var">header</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-249"></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.filter</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679122986"><a href="#local-6989586621679122986"><span class="hs-identifier">h</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122576"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679122986"><span class="hs-identifier hs-var">h</span></a><span> </span><span class="hs-special">`</span><span class="hs-identifier hs-var">P.notElem</span><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P.fmap</span><span> </span><span class="hs-identifier hs-var">CI.mk</span><span> </span><a href="#local-6989586621679122575"><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-keyword">where</span><span>
|
||||
</span><a name="line-251"></a><span> </span><a name="local-6989586621679127215"><a href="#local-6989586621679127215"><span class="hs-identifier">cifst</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">CI.mk</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.fst</span><span>
|
||||
</span><a name="line-251"></a><span> </span><a name="local-6989586621679122576"><a href="#local-6989586621679122576"><span class="hs-identifier">cifst</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">CI.mk</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.fst</span><span>
|
||||
</span><a name="line-252"></a><span>
|
||||
</span><a name="line-253"></a><span>
|
||||
</span><a name="line-254"></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-6989586621679127113"><a href="#local-6989586621679127113"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127114"><a href="#local-6989586621679127114"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679127115"><a href="#local-6989586621679127115"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679127116"><a href="#local-6989586621679127116"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679127114"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127113"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127114"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127115"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127116"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127113"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127114"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127115"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127116"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-255"></a><a name="_setContentTypeHeader"><a href="OpenAPIPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier">_setContentTypeHeader</span></a></a><span> </span><a name="local-6989586621679127624"><a href="#local-6989586621679127624"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-256"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679127114"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-257"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679127625"><a href="#local-6989586621679127625"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127624"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><a href="#local-6989586621679127625"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-258"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127624"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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-254"></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-6989586621679122460"><a href="#local-6989586621679122460"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679122461"><a href="#local-6989586621679122461"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679122462"><a href="#local-6989586621679122462"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679122463"><a href="#local-6989586621679122463"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679122461"><span class="hs-identifier hs-type">contentType</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122460"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122461"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122462"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122463"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122460"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122461"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122462"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122463"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-255"></a><a name="_setContentTypeHeader"><a href="OpenAPIPetstore.Core.html#_setContentTypeHeader"><span class="hs-identifier">_setContentTypeHeader</span></a></a><span> </span><a name="local-6989586621679122987"><a href="#local-6989586621679122987"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-256"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679122461"><span class="hs-identifier hs-type">contentType</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-257"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679122988"><a href="#local-6989586621679122988"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122987"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><a href="#local-6989586621679122988"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-258"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122987"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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-259"></a><span>
|
||||
</span><a name="line-260"></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-6989586621679127109"><a href="#local-6989586621679127109"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127110"><a href="#local-6989586621679127110"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679127111"><a href="#local-6989586621679127111"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679127112"><a href="#local-6989586621679127112"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679127112"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127109"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127110"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127111"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127112"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127109"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127110"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127111"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127112"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-261"></a><a name="_setAcceptHeader"><a href="OpenAPIPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier">_setAcceptHeader</span></a></a><span> </span><a name="local-6989586621679127626"><a href="#local-6989586621679127626"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-262"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679127112"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-263"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679127627"><a href="#local-6989586621679127627"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127626"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><a href="#local-6989586621679127627"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-264"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127626"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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-260"></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-6989586621679122456"><a href="#local-6989586621679122456"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679122457"><a href="#local-6989586621679122457"><span class="hs-identifier">contentType</span></a></a><span> </span><a name="local-6989586621679122458"><a href="#local-6989586621679122458"><span class="hs-identifier">res</span></a></a><span> </span><a name="local-6989586621679122459"><a href="#local-6989586621679122459"><span class="hs-identifier">accept</span></a></a><span class="hs-operator">.</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679122459"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122456"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122457"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122458"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122459"><span class="hs-identifier hs-type">accept</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122456"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122457"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122458"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122459"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-261"></a><a name="_setAcceptHeader"><a href="OpenAPIPetstore.Core.html#_setAcceptHeader"><span class="hs-identifier">_setAcceptHeader</span></a></a><span> </span><a name="local-6989586621679122989"><a href="#local-6989586621679122989"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-262"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679122459"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-263"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679122990"><a href="#local-6989586621679122990"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122989"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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.pack</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><a href="#local-6989586621679122990"><span class="hs-identifier hs-var">m</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-264"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122989"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-special">`</span><a href="OpenAPIPetstore.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-265"></a><span>
|
||||
</span><a name="line-266"></a><span class="hs-identifier">setQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127105"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127106"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127107"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127108"><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.QueryItem</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127105"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127106"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127107"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127108"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-267"></a><a name="setQuery"><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier">setQuery</span></a></a><span> </span><a name="local-6989586621679127628"><a href="#local-6989586621679127628"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127629"><a href="#local-6989586621679127629"><span class="hs-identifier">query</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-268"></a><span> </span><a href="#local-6989586621679127628"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-266"></a><span class="hs-identifier">setQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122452"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122453"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122454"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122455"><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.QueryItem</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122452"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122453"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122454"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122455"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-267"></a><a name="setQuery"><a href="OpenAPIPetstore.Core.html#setQuery"><span class="hs-identifier">setQuery</span></a></a><span> </span><a name="local-6989586621679122991"><a href="#local-6989586621679122991"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679122992"><a href="#local-6989586621679122992"><span class="hs-identifier">query</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-268"></a><span> </span><a href="#local-6989586621679122991"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-operator hs-var">&</span><span>
|
||||
</span><a name="line-269"></a><span> </span><span class="hs-identifier hs-var">L.over</span><span>
|
||||
</span><a name="line-270"></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#paramsQueryL"><span class="hs-identifier hs-var">paramsQueryL</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-271"></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><a href="#local-6989586621679127629"><span class="hs-identifier hs-var">query</span></a><span> </span><span class="hs-operator hs-var">P.++</span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.filter</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679127631"><a href="#local-6989586621679127631"><span class="hs-identifier">q</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127630"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679127631"><span class="hs-identifier hs-var">q</span></a><span> </span><span class="hs-special">`</span><span class="hs-identifier hs-var">P.notElem</span><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P.fmap</span><span> </span><a href="#local-6989586621679127630"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679127629"><span class="hs-identifier hs-var">query</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-271"></a><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><a href="#local-6989586621679122992"><span class="hs-identifier hs-var">query</span></a><span> </span><span class="hs-operator hs-var">P.++</span><span class="hs-special">)</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.filter</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><a name="local-6989586621679122994"><a href="#local-6989586621679122994"><span class="hs-identifier">q</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122993"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679122994"><span class="hs-identifier hs-var">q</span></a><span> </span><span class="hs-special">`</span><span class="hs-identifier hs-var">P.notElem</span><span class="hs-special">`</span><span> </span><span class="hs-identifier hs-var">P.fmap</span><span> </span><a href="#local-6989586621679122993"><span class="hs-identifier hs-var">cifst</span></a><span> </span><a href="#local-6989586621679122992"><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-keyword">where</span><span>
|
||||
</span><a name="line-273"></a><span> </span><a name="local-6989586621679127630"><a href="#local-6989586621679127630"><span class="hs-identifier">cifst</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">CI.mk</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.fst</span><span>
|
||||
</span><a name="line-273"></a><span> </span><a name="local-6989586621679122993"><a href="#local-6989586621679122993"><span class="hs-identifier">cifst</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">CI.mk</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.fst</span><span>
|
||||
</span><a name="line-274"></a><span>
|
||||
</span><a name="line-275"></a><span class="hs-identifier">addForm</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127101"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127102"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127103"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127104"><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.Form</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127101"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127102"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127103"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127104"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-276"></a><a name="addForm"><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier">addForm</span></a></a><span> </span><a name="local-6989586621679127632"><a href="#local-6989586621679127632"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127633"><a href="#local-6989586621679127633"><span class="hs-identifier">newform</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-277"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679127634"><a href="#local-6989586621679127634"><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-6989586621679127632"><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-278"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679127635"><a href="#local-6989586621679127635"><span class="hs-identifier">_form</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127635"><span class="hs-identifier hs-var">_form</span></a><span>
|
||||
</span><a name="line-275"></a><span class="hs-identifier">addForm</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122448"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122449"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122450"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122451"><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.Form</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122448"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122449"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122450"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122451"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-276"></a><a name="addForm"><a href="OpenAPIPetstore.Core.html#addForm"><span class="hs-identifier">addForm</span></a></a><span> </span><a name="local-6989586621679122995"><a href="#local-6989586621679122995"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679122996"><a href="#local-6989586621679122996"><span class="hs-identifier">newform</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-277"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679122997"><a href="#local-6989586621679122997"><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-6989586621679122995"><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-278"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><a name="local-6989586621679122998"><a href="#local-6989586621679122998"><span class="hs-identifier">_form</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122998"><span class="hs-identifier hs-var">_form</span></a><span>
|
||||
</span><a name="line-279"></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-280"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679127632"><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.set</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127633"><span class="hs-identifier hs-var">newform</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679127634"><span class="hs-identifier hs-var">form</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-280"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679122995"><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.set</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyFormUrlEncoded"><span class="hs-identifier hs-var">ParamBodyFormUrlEncoded</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679122996"><span class="hs-identifier hs-var">newform</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679122997"><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><a name="line-282"></a><span class="hs-identifier">_addMultiFormPart</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127097"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127098"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127099"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127100"><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.Part</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127097"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127098"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127099"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127100"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-283"></a><a name="_addMultiFormPart"><a href="OpenAPIPetstore.Core.html#_addMultiFormPart"><span class="hs-identifier">_addMultiFormPart</span></a></a><span> </span><a name="local-6989586621679127636"><a href="#local-6989586621679127636"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127637"><a href="#local-6989586621679127637"><span class="hs-identifier">newpart</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-284"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679127638"><a href="#local-6989586621679127638"><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-6989586621679127636"><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-285"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679127639"><a href="#local-6989586621679127639"><span class="hs-identifier">_parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127639"><span class="hs-identifier hs-var">_parts</span></a><span>
|
||||
</span><a name="line-282"></a><span class="hs-identifier">_addMultiFormPart</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122444"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122445"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122446"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122447"><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.Part</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122444"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122445"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122446"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122447"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-283"></a><a name="_addMultiFormPart"><a href="OpenAPIPetstore.Core.html#_addMultiFormPart"><span class="hs-identifier">_addMultiFormPart</span></a></a><span> </span><a name="local-6989586621679122999"><a href="#local-6989586621679122999"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679123000"><a href="#local-6989586621679123000"><span class="hs-identifier">newpart</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-284"></a><span> </span><span class="hs-keyword">let</span><span> </span><a name="local-6989586621679123001"><a href="#local-6989586621679123001"><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-6989586621679122999"><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-285"></a><span> </span><a href="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><a name="local-6989586621679123002"><a href="#local-6989586621679123002"><span class="hs-identifier">_parts</span></a></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679123002"><span class="hs-identifier hs-var">_parts</span></a><span>
|
||||
</span><a name="line-286"></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-287"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679127636"><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.set</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127637"><span class="hs-identifier hs-var">newpart</span></a><span> </span><span class="hs-glyph">:</span><span> </span><a href="#local-6989586621679127638"><span class="hs-identifier hs-var">parts</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-287"></a><span> </span><span class="hs-keyword">in</span><span> </span><a href="#local-6989586621679122999"><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.set</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyMultipartFormData"><span class="hs-identifier hs-var">ParamBodyMultipartFormData</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679123000"><span class="hs-identifier hs-var">newpart</span></a><span> </span><span class="hs-glyph">:</span><span> </span><a href="#local-6989586621679123001"><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><a name="line-289"></a><span class="hs-identifier">_setBodyBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127093"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127094"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127095"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127096"><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.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127093"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127094"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127095"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127096"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-290"></a><a name="_setBodyBS"><a href="OpenAPIPetstore.Core.html#_setBodyBS"><span class="hs-identifier">_setBodyBS</span></a></a><span> </span><a name="local-6989586621679127640"><a href="#local-6989586621679127640"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127641"><a href="#local-6989586621679127641"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-291"></a><span> </span><a href="#local-6989586621679127640"><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.set</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a href="#local-6989586621679127641"><span class="hs-identifier hs-var">body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-289"></a><span class="hs-identifier">_setBodyBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122440"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122441"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122442"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122443"><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.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122440"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122441"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122442"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122443"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-290"></a><a name="_setBodyBS"><a href="OpenAPIPetstore.Core.html#_setBodyBS"><span class="hs-identifier">_setBodyBS</span></a></a><span> </span><a name="local-6989586621679123003"><a href="#local-6989586621679123003"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679123004"><a href="#local-6989586621679123004"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-291"></a><span> </span><a href="#local-6989586621679123003"><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.set</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyB"><span class="hs-identifier hs-var">ParamBodyB</span></a><span> </span><a href="#local-6989586621679123004"><span class="hs-identifier hs-var">body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-292"></a><span>
|
||||
</span><a name="line-293"></a><span class="hs-identifier">_setBodyLBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127089"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127090"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127091"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127092"><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.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127089"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127090"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127091"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127092"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-294"></a><a name="_setBodyLBS"><a href="OpenAPIPetstore.Core.html#_setBodyLBS"><span class="hs-identifier">_setBodyLBS</span></a></a><span> </span><a name="local-6989586621679127642"><a href="#local-6989586621679127642"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127643"><a href="#local-6989586621679127643"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-295"></a><span> </span><a href="#local-6989586621679127642"><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.set</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a href="#local-6989586621679127643"><span class="hs-identifier hs-var">body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-293"></a><span class="hs-identifier">_setBodyLBS</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122436"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122437"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122438"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122439"><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.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122436"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122437"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122438"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122439"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-294"></a><a name="_setBodyLBS"><a href="OpenAPIPetstore.Core.html#_setBodyLBS"><span class="hs-identifier">_setBodyLBS</span></a></a><span> </span><a name="local-6989586621679123005"><a href="#local-6989586621679123005"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679123006"><a href="#local-6989586621679123006"><span class="hs-identifier">body</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-295"></a><span> </span><a href="#local-6989586621679123005"><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.set</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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="OpenAPIPetstore.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="OpenAPIPetstore.Core.html#ParamBodyBL"><span class="hs-identifier hs-var">ParamBodyBL</span></a><span> </span><a href="#local-6989586621679123006"><span class="hs-identifier hs-var">body</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-296"></a><span>
|
||||
</span><a name="line-297"></a><span class="hs-identifier">_hasAuthType</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679127084"><span class="hs-identifier hs-type">authMethod</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127085"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127086"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127087"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127088"><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.Proxy</span><span> </span><a href="#local-6989586621679127084"><span class="hs-identifier hs-type">authMethod</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679127085"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679127086"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679127087"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679127088"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-298"></a><a name="_hasAuthType"><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier">_hasAuthType</span></a></a><span> </span><a name="local-6989586621679127644"><a href="#local-6989586621679127644"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127645"><a href="#local-6989586621679127645"><span class="hs-identifier">proxy</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-299"></a><span> </span><a href="#local-6989586621679127644"><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.over</span><span> </span><a href="OpenAPIPetstore.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.typeRep</span><span> </span><a href="#local-6989586621679127645"><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-297"></a><span class="hs-identifier">_hasAuthType</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679122431"><span class="hs-identifier hs-type">authMethod</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122432"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122433"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122434"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122435"><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.Proxy</span><span> </span><a href="#local-6989586621679122431"><span class="hs-identifier hs-type">authMethod</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122432"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122433"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122434"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122435"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-298"></a><a name="_hasAuthType"><a href="OpenAPIPetstore.Core.html#_hasAuthType"><span class="hs-identifier">_hasAuthType</span></a></a><span> </span><a name="local-6989586621679123007"><a href="#local-6989586621679123007"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679123008"><a href="#local-6989586621679123008"><span class="hs-identifier">proxy</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-299"></a><span> </span><a href="#local-6989586621679123007"><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.over</span><span> </span><a href="OpenAPIPetstore.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.typeRep</span><span> </span><a href="#local-6989586621679123008"><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-300"></a><span>
|
||||
</span><a name="line-301"></a><span class="hs-comment">-- ** Params Utils</span><span>
|
||||
</span><a name="line-302"></a><span>
|
||||
</span><a name="line-303"></a><span class="hs-identifier">toPath</span><span>
|
||||
</span><a name="line-304"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679127083"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-305"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679127083"><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.ByteString</span><span>
|
||||
</span><a name="line-304"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679122430"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-305"></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679122430"><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.ByteString</span><span>
|
||||
</span><a name="line-306"></a><a name="toPath"><a href="OpenAPIPetstore.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.toLazyByteString</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH.toEncodedUrlPiece</span><span>
|
||||
</span><a name="line-307"></a><span>
|
||||
</span><a name="line-308"></a><span class="hs-identifier">toHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679127082"><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.HeaderName</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679127082"><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.Header</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-309"></a><a name="toHeader"><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier">toHeader</span></a></a><span> </span><a name="local-6989586621679127646"><a href="#local-6989586621679127646"><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.toHeader</span><span> </span><a href="#local-6989586621679127646"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-308"></a><span class="hs-identifier">toHeader</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679122429"><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.HeaderName</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679122429"><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.Header</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-309"></a><a name="toHeader"><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier">toHeader</span></a></a><span> </span><a name="local-6989586621679123009"><a href="#local-6989586621679123009"><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.toHeader</span><span> </span><a href="#local-6989586621679123009"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-310"></a><span>
|
||||
</span><a name="line-311"></a><span class="hs-identifier">toForm</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679127081"><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.ByteString</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679127081"><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.Form</span><span>
|
||||
</span><a name="line-312"></a><a name="toForm"><a href="OpenAPIPetstore.Core.html#toForm"><span class="hs-identifier">toForm</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679127647"><a href="#local-6989586621679127647"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679127648"><a href="#local-6989586621679127648"><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.toForm</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-identifier hs-var">BC.unpack</span><span> </span><a href="#local-6989586621679127647"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><a href="#local-6989586621679127648"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-311"></a><span class="hs-identifier">toForm</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679122428"><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.ByteString</span><span class="hs-special">,</span><span> </span><a href="#local-6989586621679122428"><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.Form</span><span>
|
||||
</span><a name="line-312"></a><a name="toForm"><a href="OpenAPIPetstore.Core.html#toForm"><span class="hs-identifier">toForm</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679123010"><a href="#local-6989586621679123010"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679123011"><a href="#local-6989586621679123011"><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.toForm</span><span> </span><span class="hs-special">[</span><span class="hs-special">(</span><span class="hs-identifier hs-var">BC.unpack</span><span> </span><a href="#local-6989586621679123010"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><a href="#local-6989586621679123011"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-313"></a><span>
|
||||
</span><a name="line-314"></a><span class="hs-identifier">toQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679127080"><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.ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="#local-6989586621679127080"><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.QueryItem</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-315"></a><a name="toQuery"><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier">toQuery</span></a></a><span> </span><a name="local-6989586621679127649"><a href="#local-6989586621679127649"><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-6989586621679127650"><span class="hs-identifier hs-var">toQueryParam</span></a><span> </span><a href="#local-6989586621679127649"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-316"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679127650"><a href="#local-6989586621679127650"><span class="hs-identifier">toQueryParam</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH.toQueryParam</span><span>
|
||||
</span><a name="line-314"></a><span class="hs-identifier">toQuery</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679122427"><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.ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><a href="#local-6989586621679122427"><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.QueryItem</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-315"></a><a name="toQuery"><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier">toQuery</span></a></a><span> </span><a name="local-6989586621679123012"><a href="#local-6989586621679123012"><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-6989586621679123013"><span class="hs-identifier hs-var">toQueryParam</span></a><span> </span><a href="#local-6989586621679123012"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-316"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679123013"><a href="#local-6989586621679123013"><span class="hs-identifier">toQueryParam</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH.toQueryParam</span><span>
|
||||
</span><a name="line-317"></a><span>
|
||||
</span><a name="line-318"></a><span class="hs-comment">-- *** OpenAPI `CollectionFormat` Utils</span><span>
|
||||
</span><a name="line-319"></a><span>
|
||||
@@ -325,38 +325,38 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-325"></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="PipeSeparated"><a href="OpenAPIPetstore.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-326"></a><span> </span><span class="hs-glyph">|</span><span> </span><a name="MultiParamArray"><a href="OpenAPIPetstore.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-327"></a><span>
|
||||
</span><a name="line-328"></a><span class="hs-identifier">toHeaderColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679127079"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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.HeaderName</span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679127079"><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.Header</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-329"></a><a name="toHeaderColl"><a href="OpenAPIPetstore.Core.html#toHeaderColl"><span class="hs-identifier">toHeaderColl</span></a></a><span> </span><a name="local-6989586621679127651"><a href="#local-6989586621679127651"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679127652"><a href="#local-6989586621679127652"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679127651"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><a href="#local-6989586621679127652"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-328"></a><span class="hs-identifier">toHeaderColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679122426"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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.HeaderName</span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679122426"><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.Header</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-329"></a><a name="toHeaderColl"><a href="OpenAPIPetstore.Core.html#toHeaderColl"><span class="hs-identifier">toHeaderColl</span></a></a><span> </span><a name="local-6989586621679123014"><a href="#local-6989586621679123014"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679123015"><a href="#local-6989586621679123015"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679123014"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="OpenAPIPetstore.Core.html#toHeader"><span class="hs-identifier hs-var">toHeader</span></a><span> </span><a href="#local-6989586621679123015"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-330"></a><span>
|
||||
</span><a name="line-331"></a><span class="hs-identifier">toFormColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679127078"><span class="hs-identifier hs-type">v</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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.ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679127078"><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.Form</span><span>
|
||||
</span><a name="line-332"></a><a name="toFormColl"><a href="OpenAPIPetstore.Core.html#toFormColl"><span class="hs-identifier">toFormColl</span></a></a><span> </span><a name="local-6989586621679127653"><a href="#local-6989586621679127653"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679127654"><a href="#local-6989586621679127654"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH.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-6989586621679127656"><span class="hs-identifier hs-var">unpack</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679127653"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679127655"><span class="hs-identifier hs-var">pack</span></a><span> </span><a href="#local-6989586621679127654"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-331"></a><span class="hs-identifier">toFormColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679122425"><span class="hs-identifier hs-type">v</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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.ByteString</span><span class="hs-special">,</span><span> </span><span class="hs-special">[</span><a href="#local-6989586621679122425"><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.Form</span><span>
|
||||
</span><a name="line-332"></a><a name="toFormColl"><a href="OpenAPIPetstore.Core.html#toFormColl"><span class="hs-identifier">toFormColl</span></a></a><span> </span><a name="local-6989586621679123016"><a href="#local-6989586621679123016"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679123017"><a href="#local-6989586621679123017"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH.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-6989586621679123019"><span class="hs-identifier hs-var">unpack</span></a><span> </span><span class="hs-operator hs-var">$</span><span> </span><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier hs-var">_toColl</span></a><span> </span><a href="#local-6989586621679123016"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="OpenAPIPetstore.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-6989586621679123018"><span class="hs-identifier hs-var">pack</span></a><span> </span><a href="#local-6989586621679123017"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-333"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-334"></a><span> </span><a name="local-6989586621679127655"><a href="#local-6989586621679127655"><span class="hs-identifier">pack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679127657"><a href="#local-6989586621679127657"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679127658"><a href="#local-6989586621679127658"><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.mk</span><span> </span><a href="#local-6989586621679127657"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679127658"><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-6989586621679127656"><a href="#local-6989586621679127656"><span class="hs-identifier">unpack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679127659"><a href="#local-6989586621679127659"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679127660"><a href="#local-6989586621679127660"><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.unpack</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">CI.original</span><span> </span><a href="#local-6989586621679127659"><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.unpack</span><span> </span><a href="#local-6989586621679127660"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-334"></a><span> </span><a name="local-6989586621679123018"><a href="#local-6989586621679123018"><span class="hs-identifier">pack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679123020"><a href="#local-6989586621679123020"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679123021"><a href="#local-6989586621679123021"><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.mk</span><span> </span><a href="#local-6989586621679123020"><span class="hs-identifier hs-var">k</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679123021"><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-6989586621679123019"><a href="#local-6989586621679123019"><span class="hs-identifier">unpack</span></a></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679123022"><a href="#local-6989586621679123022"><span class="hs-identifier">k</span></a></a><span class="hs-special">,</span><a name="local-6989586621679123023"><a href="#local-6989586621679123023"><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.unpack</span><span> </span><span class="hs-special">(</span><span class="hs-identifier">CI.original</span><span> </span><a href="#local-6989586621679123022"><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.unpack</span><span> </span><a href="#local-6989586621679123023"><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="line-337"></a><span class="hs-identifier">toQueryColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679127077"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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.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-6989586621679127077"><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.Query</span><span>
|
||||
</span><a name="line-338"></a><a name="toQueryColl"><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier">toQueryColl</span></a></a><span> </span><a name="local-6989586621679127661"><a href="#local-6989586621679127661"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679127662"><a href="#local-6989586621679127662"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_toCollA"><span class="hs-identifier hs-var">_toCollA</span></a><span> </span><a href="#local-6989586621679127661"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><a href="#local-6989586621679127662"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-337"></a><span class="hs-identifier">toQueryColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679122424"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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.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-6989586621679122424"><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.Query</span><span>
|
||||
</span><a name="line-338"></a><a name="toQueryColl"><a href="OpenAPIPetstore.Core.html#toQueryColl"><span class="hs-identifier">toQueryColl</span></a></a><span> </span><a name="local-6989586621679123024"><a href="#local-6989586621679123024"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679123025"><a href="#local-6989586621679123025"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_toCollA"><span class="hs-identifier hs-var">_toCollA</span></a><span> </span><a href="#local-6989586621679123024"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="OpenAPIPetstore.Core.html#toQuery"><span class="hs-identifier hs-var">toQuery</span></a><span> </span><a href="#local-6989586621679123025"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-339"></a><span>
|
||||
</span><a name="line-340"></a><span class="hs-identifier">_toColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Traversable</span><span> </span><a href="#local-6989586621679127074"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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-6989586621679127074"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679127075"><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-6989586621679127076"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">BC.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-6989586621679127074"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679127075"><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-6989586621679127076"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">BC.ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-341"></a><a name="_toColl"><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier">_toColl</span></a></a><span> </span><a name="local-6989586621679127663"><a href="#local-6989586621679127663"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679127664"><a href="#local-6989586621679127664"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679127665"><a href="#local-6989586621679127665"><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.fromJust</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679127663"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679127666"><span class="hs-identifier hs-var">fencode</span></a><span> </span><span class="hs-identifier hs-var">BC.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-6989586621679127665"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-342"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679127666"><a href="#local-6989586621679127666"><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-6989586621679127664"><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.fromJust</span><span>
|
||||
</span><a name="line-340"></a><span class="hs-identifier">_toColl</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Traversable</span><span> </span><a href="#local-6989586621679122421"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.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-6989586621679122421"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679122422"><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-6989586621679122423"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">BC.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-6989586621679122421"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679122422"><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-6989586621679122423"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">BC.ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-341"></a><a name="_toColl"><a href="OpenAPIPetstore.Core.html#_toColl"><span class="hs-identifier">_toColl</span></a></a><span> </span><a name="local-6989586621679123026"><a href="#local-6989586621679123026"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679123027"><a href="#local-6989586621679123027"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679123028"><a href="#local-6989586621679123028"><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.fromJust</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679123026"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679123029"><span class="hs-identifier hs-var">fencode</span></a><span> </span><span class="hs-identifier hs-var">BC.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-6989586621679123028"><span class="hs-identifier hs-var">xs</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-342"></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-6989586621679123029"><a href="#local-6989586621679123029"><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-6989586621679123027"><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.fromJust</span><span>
|
||||
</span><a name="line-343"></a><span> </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">fencode</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-344"></a><span>
|
||||
</span><a name="line-345"></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.Traversable</span><span> </span><a href="#local-6989586621679127070"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Traversable</span><span> </span><a href="#local-6989586621679127071"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Alternative</span><span> </span><a href="#local-6989586621679127071"><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="OpenAPIPetstore.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-6989586621679127070"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127071"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679127072"><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-6989586621679127073"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679127071"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-identifier hs-type">BC.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-6989586621679127070"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127071"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679127072"><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-6989586621679127073"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679127071"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-identifier hs-type">BC.ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-346"></a><a name="_toCollA"><a href="OpenAPIPetstore.Core.html#_toCollA"><span class="hs-identifier">_toCollA</span></a></a><span> </span><a name="local-6989586621679127667"><a href="#local-6989586621679127667"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679127668"><a href="#local-6989586621679127668"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679127669"><a href="#local-6989586621679127669"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679127667"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679127668"><span class="hs-identifier hs-var">encode</span></a><span> </span><span class="hs-identifier hs-var">BC.singleton</span><span> </span><a href="#local-6989586621679127669"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-345"></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.Traversable</span><span> </span><a href="#local-6989586621679122417"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Traversable</span><span> </span><a href="#local-6989586621679122418"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Alternative</span><span> </span><a href="#local-6989586621679122418"><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="OpenAPIPetstore.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-6989586621679122417"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679122418"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679122419"><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-6989586621679122420"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679122418"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-identifier hs-type">BC.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-6989586621679122417"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679122418"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679122419"><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-6989586621679122420"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679122418"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-identifier hs-type">BC.ByteString</span><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-346"></a><a name="_toCollA"><a href="OpenAPIPetstore.Core.html#_toCollA"><span class="hs-identifier">_toCollA</span></a></a><span> </span><a name="local-6989586621679123030"><a href="#local-6989586621679123030"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679123031"><a href="#local-6989586621679123031"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679123032"><a href="#local-6989586621679123032"><span class="hs-identifier">xs</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier hs-var">_toCollA'</span></a><span> </span><a href="#local-6989586621679123030"><span class="hs-identifier hs-var">c</span></a><span> </span><a href="#local-6989586621679123031"><span class="hs-identifier hs-var">encode</span></a><span> </span><span class="hs-identifier hs-var">BC.singleton</span><span> </span><a href="#local-6989586621679123032"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-347"></a><span>
|
||||
</span><a name="line-348"></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.Monoid</span><span> </span><a href="#local-6989586621679126659"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Traversable</span><span> </span><a href="#local-6989586621679126660"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Traversable</span><span> </span><a href="#local-6989586621679126661"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Alternative</span><span> </span><a href="#local-6989586621679126661"><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="OpenAPIPetstore.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-6989586621679126660"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679126661"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679126662"><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-6989586621679126663"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679126661"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679126659"><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-6989586621679126659"><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-6989586621679126660"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679126661"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679126662"><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-6989586621679126663"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679126661"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679126659"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-349"></a><a name="_toCollA%27"><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier">_toCollA'</span></a></a><span> </span><a name="local-6989586621679127670"><a href="#local-6989586621679127670"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679127671"><a href="#local-6989586621679127671"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679127672"><a href="#local-6989586621679127672"><span class="hs-identifier">one</span></a></a><span> </span><a name="local-6989586621679127673"><a href="#local-6989586621679127673"><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-6989586621679127670"><span class="hs-identifier hs-var">c</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-350"></a><span> </span><a href="OpenAPIPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127674"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127672"><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-351"></a><span> </span><a href="OpenAPIPetstore.Core.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127674"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127672"><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="OpenAPIPetstore.Core.html#TabSeparated"><span class="hs-identifier hs-var">TabSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127674"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127672"><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-353"></a><span> </span><a href="OpenAPIPetstore.Core.html#PipeSeparated"><span class="hs-identifier hs-var">PipeSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127674"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127672"><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-354"></a><span> </span><a href="OpenAPIPetstore.Core.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679127676"><span class="hs-identifier hs-var">expandList</span></a><span>
|
||||
</span><a name="line-348"></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.Monoid</span><span> </span><a href="#local-6989586621679122006"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Traversable</span><span> </span><a href="#local-6989586621679122007"><span class="hs-identifier hs-type">f</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Traversable</span><span> </span><a href="#local-6989586621679122008"><span class="hs-identifier hs-type">t</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Alternative</span><span> </span><a href="#local-6989586621679122008"><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="OpenAPIPetstore.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-6989586621679122007"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679122008"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679122009"><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-6989586621679122010"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679122008"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679122006"><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-6989586621679122006"><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-6989586621679122007"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679122008"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-special">[</span><a href="#local-6989586621679122009"><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-6989586621679122010"><span class="hs-identifier hs-type">b</span></a><span class="hs-special">,</span><span> </span><a href="#local-6989586621679122008"><span class="hs-identifier hs-type">t</span></a><span> </span><a href="#local-6989586621679122006"><span class="hs-identifier hs-type">c</span></a><span class="hs-special">)</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-349"></a><a name="_toCollA%27"><a href="OpenAPIPetstore.Core.html#_toCollA%27"><span class="hs-identifier">_toCollA'</span></a></a><span> </span><a name="local-6989586621679123033"><a href="#local-6989586621679123033"><span class="hs-identifier">c</span></a></a><span> </span><a name="local-6989586621679123034"><a href="#local-6989586621679123034"><span class="hs-identifier">encode</span></a></a><span> </span><a name="local-6989586621679123035"><a href="#local-6989586621679123035"><span class="hs-identifier">one</span></a></a><span> </span><a name="local-6989586621679123036"><a href="#local-6989586621679123036"><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-6989586621679123033"><span class="hs-identifier hs-var">c</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-350"></a><span> </span><a href="OpenAPIPetstore.Core.html#CommaSeparated"><span class="hs-identifier hs-var">CommaSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679123037"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679123035"><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-351"></a><span> </span><a href="OpenAPIPetstore.Core.html#SpaceSeparated"><span class="hs-identifier hs-var">SpaceSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679123037"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679123035"><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="OpenAPIPetstore.Core.html#TabSeparated"><span class="hs-identifier hs-var">TabSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679123037"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679123035"><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-353"></a><span> </span><a href="OpenAPIPetstore.Core.html#PipeSeparated"><span class="hs-identifier hs-var">PipeSeparated</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679123037"><span class="hs-identifier hs-var">go</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679123035"><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-354"></a><span> </span><a href="OpenAPIPetstore.Core.html#MultiParamArray"><span class="hs-identifier hs-var">MultiParamArray</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679123039"><span class="hs-identifier hs-var">expandList</span></a><span>
|
||||
</span><a name="line-355"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-356"></a><span> </span><a name="local-6989586621679127674"><a href="#local-6989586621679127674"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679127677"><a href="#local-6989586621679127677"><span class="hs-identifier">sep</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-357"></a><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-var">P.foldl1</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679127678"><a href="#local-6989586621679127678"><span class="hs-identifier">sk</span></a></a><span class="hs-special">,</span><span> </span><a name="local-6989586621679127679"><a href="#local-6989586621679127679"><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-6989586621679127680"><a href="#local-6989586621679127680"><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-6989586621679127678"><span class="hs-identifier hs-var">sk</span></a><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679127675"><span class="hs-identifier hs-var">combine</span></a><span> </span><a href="#local-6989586621679127677"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679127679"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><*></span><span> </span><a href="#local-6989586621679127680"><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-6989586621679127679"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><|></span><span> </span><a href="#local-6989586621679127680"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679127676"><span class="hs-identifier hs-var">expandList</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-358"></a><span> </span><a name="local-6989586621679127675"><a href="#local-6989586621679127675"><span class="hs-identifier">combine</span></a></a><span> </span><a name="local-6989586621679127681"><a href="#local-6989586621679127681"><span class="hs-identifier">sep</span></a></a><span> </span><a name="local-6989586621679127682"><a href="#local-6989586621679127682"><span class="hs-identifier">x</span></a></a><span> </span><a name="local-6989586621679127683"><a href="#local-6989586621679127683"><span class="hs-identifier">y</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679127682"><span class="hs-identifier hs-var">x</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679127681"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679127683"><span class="hs-identifier hs-var">y</span></a><span>
|
||||
</span><a name="line-359"></a><span> </span><a name="local-6989586621679127676"><a href="#local-6989586621679127676"><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.concatMap</span><span> </span><a href="#local-6989586621679127671"><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.traverse</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.traverse</span><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-var">P.toList</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679127673"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-356"></a><span> </span><a name="local-6989586621679123037"><a href="#local-6989586621679123037"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679123040"><a href="#local-6989586621679123040"><span class="hs-identifier">sep</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-357"></a><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-var">P.foldl1</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679123041"><a href="#local-6989586621679123041"><span class="hs-identifier">sk</span></a></a><span class="hs-special">,</span><span> </span><a name="local-6989586621679123042"><a href="#local-6989586621679123042"><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-6989586621679123043"><a href="#local-6989586621679123043"><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-6989586621679123041"><span class="hs-identifier hs-var">sk</span></a><span class="hs-special">,</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679123038"><span class="hs-identifier hs-var">combine</span></a><span> </span><a href="#local-6989586621679123040"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679123042"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><*></span><span> </span><a href="#local-6989586621679123043"><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-6989586621679123042"><span class="hs-identifier hs-var">sv</span></a><span> </span><span class="hs-operator hs-var"><|></span><span> </span><a href="#local-6989586621679123043"><span class="hs-identifier hs-var">v</span></a><span class="hs-special">)</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679123039"><span class="hs-identifier hs-var">expandList</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-358"></a><span> </span><a name="local-6989586621679123038"><a href="#local-6989586621679123038"><span class="hs-identifier">combine</span></a></a><span> </span><a name="local-6989586621679123044"><a href="#local-6989586621679123044"><span class="hs-identifier">sep</span></a></a><span> </span><a name="local-6989586621679123045"><a href="#local-6989586621679123045"><span class="hs-identifier">x</span></a></a><span> </span><a name="local-6989586621679123046"><a href="#local-6989586621679123046"><span class="hs-identifier">y</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679123045"><span class="hs-identifier hs-var">x</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679123044"><span class="hs-identifier hs-var">sep</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679123046"><span class="hs-identifier hs-var">y</span></a><span>
|
||||
</span><a name="line-359"></a><span> </span><a name="local-6989586621679123039"><a href="#local-6989586621679123039"><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.concatMap</span><span> </span><a href="#local-6989586621679123034"><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.traverse</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.traverse</span><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-var">P.toList</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679123036"><span class="hs-identifier hs-var">xs</span></a><span>
|
||||
</span><a name="line-360"></a><span> </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">go</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-361"></a><span> </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">expandList</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-362"></a><span> </span><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">combine</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
@@ -364,18 +364,18 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-364"></a><span class="hs-comment">-- * AuthMethods</span><span>
|
||||
</span><a name="line-365"></a><span>
|
||||
</span><a name="line-366"></a><span class="hs-comment">-- | Provides a method to apply auth methods to requests</span><span>
|
||||
</span><a name="line-367"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P.Typeable</span><span> </span><a href="#local-6989586621679125761"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span>
|
||||
</span><a name="line-368"></a><span> </span><a name="AuthMethod"><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier">AuthMethod</span></a></a><span> </span><a name="local-6989586621679125761"><a href="#local-6989586621679125761"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-367"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P.Typeable</span><span> </span><a href="#local-6989586621679121057"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span>
|
||||
</span><a name="line-368"></a><span> </span><a name="AuthMethod"><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier">AuthMethod</span></a></a><span> </span><a name="local-6989586621679121057"><a href="#local-6989586621679121057"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-369"></a><span> </span><a name="applyAuthMethod"><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier">applyAuthMethod</span></a></a><span>
|
||||
</span><a name="line-370"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-371"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679125761"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-372"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679125762"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679125763"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679125764"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679125765"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-373"></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="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679125762"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679125763"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679125764"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679125765"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-371"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679121057"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-372"></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679121058"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121059"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121060"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679121061"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-373"></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="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679121058"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679121059"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679121060"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679121061"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-374"></a><span>
|
||||
</span><a name="line-375"></a><span class="hs-comment">-- | An existential wrapper for any AuthMethod</span><span>
|
||||
</span><a name="line-376"></a><span class="hs-keyword">data</span><span> </span><a name="AnyAuthMethod"><a href="OpenAPIPetstore.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-6989586621679125760"><a href="#local-6989586621679125760"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679125760"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="AnyAuthMethod"><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier">AnyAuthMethod</span></a></a><span> </span><a href="#local-6989586621679125760"><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.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-376"></a><span class="hs-keyword">data</span><span> </span><a name="AnyAuthMethod"><a href="OpenAPIPetstore.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-6989586621679121056"><a href="#local-6989586621679121056"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="#local-6989586621679121056"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="AnyAuthMethod"><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier">AnyAuthMethod</span></a></a><span> </span><a href="#local-6989586621679121056"><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.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-377"></a><span>
|
||||
</span><a name="line-378"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="OpenAPIPetstore.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-8214565720323899599"><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier">applyAuthMethod</span></a></a><span> </span><a name="local-6989586621679126637"><a href="#local-6989586621679126637"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a name="local-6989586621679126638"><a href="#local-6989586621679126638"><span class="hs-identifier">a</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679126639"><a href="#local-6989586621679126639"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a><span> </span><a href="#local-6989586621679126637"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679126638"><span class="hs-identifier hs-var">a</span></a><span> </span><a href="#local-6989586621679126639"><span class="hs-identifier hs-var">req</span></a><span>
|
||||
</span><a name="line-378"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.Core.html#AuthMethod"><span class="hs-identifier hs-type">AuthMethod</span></a><span> </span><a href="OpenAPIPetstore.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-8214565720323894799"><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier">applyAuthMethod</span></a></a><span> </span><a name="local-6989586621679121984"><a href="#local-6989586621679121984"><span class="hs-identifier">config</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a name="local-6989586621679121985"><a href="#local-6989586621679121985"><span class="hs-identifier">a</span></a></a><span class="hs-special">)</span><span> </span><a name="local-6989586621679121986"><a href="#local-6989586621679121986"><span class="hs-identifier">req</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a><span> </span><a href="#local-6989586621679121984"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679121985"><span class="hs-identifier hs-var">a</span></a><span> </span><a href="#local-6989586621679121986"><span class="hs-identifier hs-var">req</span></a><span>
|
||||
</span><a name="line-379"></a><span>
|
||||
</span><a name="line-380"></a><span class="hs-comment">-- | indicates exceptions related to AuthMethods</span><span>
|
||||
</span><a name="line-381"></a><span class="hs-keyword">data</span><span> </span><a name="AuthMethodException"><a href="OpenAPIPetstore.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="OpenAPIPetstore.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.Show</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
@@ -384,37 +384,37 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-384"></a><span>
|
||||
</span><a name="line-385"></a><span class="hs-comment">-- | apply all matching AuthMethods in config to request</span><span>
|
||||
</span><a name="line-386"></a><span class="hs-identifier">_applyAuthMethods</span><span>
|
||||
</span><a name="line-387"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679126655"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126656"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126657"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679126658"><span class="hs-identifier hs-type">accept</span></a><span>
|
||||
</span><a name="line-387"></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122002"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122003"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122004"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122005"><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="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-type">OpenAPIPetstoreConfig</span></a><span>
|
||||
</span><a name="line-389"></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="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679126655"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679126656"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679126657"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679126658"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-390"></a><a name="_applyAuthMethods"><a href="OpenAPIPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier">_applyAuthMethods</span></a></a><span> </span><a name="local-6989586621679127684"><a href="#local-6989586621679127684"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679127685"><a href="#local-6989586621679127685"><span class="hs-identifier">config</span></a></a><span class="hs-glyph">@</span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-var">OpenAPIPetstoreConfig</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-391"></a><span> </span><span class="hs-identifier hs-var">foldlM</span><span> </span><a href="#local-6989586621679127687"><span class="hs-identifier hs-var">go</span></a><span> </span><a href="#local-6989586621679127684"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">as</span><span>
|
||||
</span><a name="line-389"></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="OpenAPIPetstore.Core.html#OpenAPIPetstoreRequest"><span class="hs-identifier hs-type">OpenAPIPetstoreRequest</span></a><span> </span><a href="#local-6989586621679122002"><span class="hs-identifier hs-type">req</span></a><span> </span><a href="#local-6989586621679122003"><span class="hs-identifier hs-type">contentType</span></a><span> </span><a href="#local-6989586621679122004"><span class="hs-identifier hs-type">res</span></a><span> </span><a href="#local-6989586621679122005"><span class="hs-identifier hs-type">accept</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-390"></a><a name="_applyAuthMethods"><a href="OpenAPIPetstore.Core.html#_applyAuthMethods"><span class="hs-identifier">_applyAuthMethods</span></a></a><span> </span><a name="local-6989586621679123047"><a href="#local-6989586621679123047"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679123048"><a href="#local-6989586621679123048"><span class="hs-identifier">config</span></a></a><span class="hs-glyph">@</span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#OpenAPIPetstoreConfig"><span class="hs-identifier hs-var">OpenAPIPetstoreConfig</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-391"></a><span> </span><span class="hs-identifier hs-var">foldlM</span><span> </span><a href="#local-6989586621679123050"><span class="hs-identifier hs-var">go</span></a><span> </span><a href="#local-6989586621679123047"><span class="hs-identifier hs-var">req</span></a><span> </span><span class="hs-keyword">as</span><span>
|
||||
</span><a name="line-392"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-393"></a><span> </span><a name="local-6989586621679127687"><a href="#local-6989586621679127687"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679127688"><a href="#local-6989586621679127688"><span class="hs-identifier">r</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a name="local-6989586621679127689"><a href="#local-6989586621679127689"><span class="hs-identifier">a</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a><span> </span><a href="#local-6989586621679127685"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679127689"><span class="hs-identifier hs-var">a</span></a><span> </span><a href="#local-6989586621679127688"><span class="hs-identifier hs-var">r</span></a><span>
|
||||
</span><a name="line-393"></a><span> </span><a name="local-6989586621679123050"><a href="#local-6989586621679123050"><span class="hs-identifier">go</span></a></a><span> </span><a name="local-6989586621679123051"><a href="#local-6989586621679123051"><span class="hs-identifier">r</span></a></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#AnyAuthMethod"><span class="hs-identifier hs-var">AnyAuthMethod</span></a><span> </span><a name="local-6989586621679123052"><a href="#local-6989586621679123052"><span class="hs-identifier">a</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#applyAuthMethod"><span class="hs-identifier hs-var">applyAuthMethod</span></a><span> </span><a href="#local-6989586621679123048"><span class="hs-identifier hs-var">config</span></a><span> </span><a href="#local-6989586621679123052"><span class="hs-identifier hs-var">a</span></a><span> </span><a href="#local-6989586621679123051"><span class="hs-identifier hs-var">r</span></a><span>
|
||||
</span><a name="line-394"></a><span>
|
||||
</span><a name="line-395"></a><span class="hs-comment">-- * Utils</span><span>
|
||||
</span><a name="line-396"></a><span>
|
||||
</span><a name="line-397"></a><span class="hs-comment">-- | Removes Null fields. (OpenAPI-Specification 2.0 does not allow Null in JSON)</span><span>
|
||||
</span><a name="line-398"></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.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.Value</span><span>
|
||||
</span><a name="line-399"></a><a name="_omitNulls"><a href="OpenAPIPetstore.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.object</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.filter</span><span> </span><a href="#local-6989586621679127690"><span class="hs-identifier hs-var">notNull</span></a><span>
|
||||
</span><a name="line-399"></a><a name="_omitNulls"><a href="OpenAPIPetstore.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.object</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.filter</span><span> </span><a href="#local-6989586621679123053"><span class="hs-identifier hs-var">notNull</span></a><span>
|
||||
</span><a name="line-400"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-401"></a><span> </span><a name="local-6989586621679127690"><a href="#local-6989586621679127690"><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.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-401"></a><span> </span><a name="local-6989586621679123053"><a href="#local-6989586621679123053"><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.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><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-403"></a><span>
|
||||
</span><a name="line-404"></a><span class="hs-comment">-- | Encodes fields using WH.toQueryParam</span><span>
|
||||
</span><a name="line-405"></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.ToHttpApiData</span><span> </span><a href="#local-6989586621679126652"><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-6989586621679126653"><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-6989586621679126654"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679126653"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679126652"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679126653"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679126654"><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-406"></a><a name="_toFormItem"><a href="OpenAPIPetstore.Core.html#_toFormItem"><span class="hs-identifier">_toFormItem</span></a></a><span> </span><a name="local-6989586621679127691"><a href="#local-6989586621679127691"><span class="hs-identifier">name</span></a></a><span> </span><a name="local-6989586621679127692"><a href="#local-6989586621679127692"><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-6989586621679127691"><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.toQueryParam</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679127692"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-405"></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.ToHttpApiData</span><span> </span><a href="#local-6989586621679121999"><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-6989586621679122000"><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-6989586621679122001"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122000"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679121999"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679122000"><span class="hs-identifier hs-type">f</span></a><span> </span><span class="hs-special">(</span><a href="#local-6989586621679122001"><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-406"></a><a name="_toFormItem"><a href="OpenAPIPetstore.Core.html#_toFormItem"><span class="hs-identifier">_toFormItem</span></a></a><span> </span><a name="local-6989586621679123054"><a href="#local-6989586621679123054"><span class="hs-identifier">name</span></a></a><span> </span><a name="local-6989586621679123055"><a href="#local-6989586621679123055"><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-6989586621679123054"><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.toQueryParam</span><span> </span><span class="hs-operator hs-var"><$></span><span> </span><a href="#local-6989586621679123055"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-407"></a><span>
|
||||
</span><a name="line-408"></a><span class="hs-comment">-- | Collapse (Just "") to Nothing</span><span>
|
||||
</span><a name="line-409"></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-410"></a><a name="_emptyToNothing"><a href="OpenAPIPetstore.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-411"></a><span class="hs-identifier">_emptyToNothing</span><span> </span><a name="local-6989586621679127693"><a href="#local-6989586621679127693"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679127693"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-411"></a><span class="hs-identifier">_emptyToNothing</span><span> </span><a name="local-6989586621679123056"><a href="#local-6989586621679123056"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679123056"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-412"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_emptyToNothing</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-413"></a><span>
|
||||
</span><a name="line-414"></a><span class="hs-comment">-- | Collapse (Just mempty) to Nothing</span><span>
|
||||
</span><a name="line-415"></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.Monoid</span><span> </span><a href="#local-6989586621679126651"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Eq</span><span> </span><a href="#local-6989586621679126651"><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-6989586621679126651"><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-6989586621679126651"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-416"></a><a name="_memptyToNothing"><a href="OpenAPIPetstore.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-6989586621679127694"><a href="#local-6989586621679127694"><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-6989586621679127694"><span class="hs-identifier hs-var">x</span></a><span> </span><span class="hs-operator hs-var">P.==</span><span> </span><span class="hs-identifier hs-var">P.mempty</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-417"></a><span class="hs-identifier">_memptyToNothing</span><span> </span><a name="local-6989586621679127695"><a href="#local-6989586621679127695"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679127695"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-415"></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.Monoid</span><span> </span><a href="#local-6989586621679121998"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.Eq</span><span> </span><a href="#local-6989586621679121998"><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-6989586621679121998"><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-6989586621679121998"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-416"></a><a name="_memptyToNothing"><a href="OpenAPIPetstore.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-6989586621679123057"><a href="#local-6989586621679123057"><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-6989586621679123057"><span class="hs-identifier hs-var">x</span></a><span> </span><span class="hs-operator hs-var">P.==</span><span> </span><span class="hs-identifier hs-var">P.mempty</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-417"></a><span class="hs-identifier">_memptyToNothing</span><span> </span><a name="local-6989586621679123058"><a href="#local-6989586621679123058"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679123058"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-418"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_memptyToNothing</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-419"></a><span>
|
||||
</span><a name="line-420"></a><span class="hs-comment">-- * DateTime Formatting</span><span>
|
||||
@@ -422,35 +422,35 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-422"></a><span class="hs-keyword">newtype</span><span> </span><a name="DateTime"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier">DateTime</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="DateTime"><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier">DateTime</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unDateTime"><a href="OpenAPIPetstore.Core.html#unDateTime"><span class="hs-identifier">unDateTime</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">TI.UTCTime</span><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-423"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Eq</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Data</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Ord</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">,</span><span class="hs-identifier hs-type">NF.NFData</span><span class="hs-special">,</span><span class="hs-identifier hs-type">TI.ParseTime</span><span class="hs-special">,</span><span class="hs-identifier hs-type">TI.FormatTime</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-424"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.FromJSON</span><span> </span><a href="OpenAPIPetstore.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-425"></a><span> </span><a name="local-8214565720323785050"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.withText</span><span> </span><span class="hs-string">"DateTime"</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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.unpack</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-425"></a><span> </span><a name="local-8214565720323822284"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.withText</span><span> </span><span class="hs-string">"DateTime"</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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.unpack</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-426"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.ToJSON</span><span> </span><a href="OpenAPIPetstore.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-427"></a><span> </span><a name="local-8214565720323784920"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679126636"><a href="#local-6989586621679126636"><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.toJSON</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679126636"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-427"></a><span> </span><a name="local-8214565720323804008"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679121983"><a href="#local-6989586621679121983"><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.toJSON</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679121983"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-428"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.FromHttpApiData</span><span> </span><a href="OpenAPIPetstore.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-429"></a><span> </span><a name="local-8214565720323800161"><span class="hs-identifier">parseUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.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.unpack</span><span>
|
||||
</span><a name="line-429"></a><span> </span><a name="local-8214565720323827184"><span class="hs-identifier">parseUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.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.unpack</span><span>
|
||||
</span><a name="line-430"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="OpenAPIPetstore.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-431"></a><span> </span><a name="local-8214565720323800157"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679126635"><a href="#local-6989586621679126635"><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.pack</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679126635"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-431"></a><span> </span><a name="local-8214565720323827192"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679121982"><a href="#local-6989586621679121982"><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.pack</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679121982"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-432"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P.Show</span><span> </span><a href="OpenAPIPetstore.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-433"></a><span> </span><a name="local-8214565720323791384"><span class="hs-identifier">show</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679126634"><a href="#local-6989586621679126634"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679126634"><span class="hs-identifier hs-var">t</span></a><span>
|
||||
</span><a name="line-433"></a><span> </span><a name="local-8214565720323790323"><span class="hs-identifier">show</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#DateTime"><span class="hs-identifier hs-var">DateTime</span></a><span> </span><a name="local-6989586621679121981"><a href="#local-6989586621679121981"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier hs-var">_showDateTime</span></a><span> </span><a href="#local-6989586621679121981"><span class="hs-identifier hs-var">t</span></a><span>
|
||||
</span><a name="line-434"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="OpenAPIPetstore.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-435"></a><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-435"></a><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-436"></a><span>
|
||||
</span><a name="line-437"></a><span class="hs-comment">-- | @_parseISO8601@</span><span>
|
||||
</span><a name="line-438"></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.ParseTime</span><span> </span><a href="#local-6989586621679126649"><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-6989586621679126650"><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-6989586621679126650"><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-6989586621679126650"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679126649"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-438"></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.ParseTime</span><span> </span><a href="#local-6989586621679121996"><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-6989586621679121997"><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-6989586621679121997"><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-6989586621679121997"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679121996"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-439"></a><a name="_readDateTime"><a href="OpenAPIPetstore.Core.html#_readDateTime"><span class="hs-identifier">_readDateTime</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-440"></a><span> </span><a href="OpenAPIPetstore.Core.html#_parseISO8601"><span class="hs-identifier hs-var">_parseISO8601</span></a><span>
|
||||
</span><a name="line-441"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_readDateTime</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-442"></a><span>
|
||||
</span><a name="line-443"></a><span class="hs-comment">-- | @TI.formatISO8601Millis@</span><span>
|
||||
</span><a name="line-444"></a><span class="hs-identifier">_showDateTime</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">t</span><span> </span><span class="hs-glyph">~</span><span> </span><span class="hs-identifier hs-type">TI.UTCTime</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">TI.FormatTime</span><span> </span><a href="#local-6989586621679126648"><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-6989586621679126648"><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-444"></a><span class="hs-identifier">_showDateTime</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">t</span><span> </span><span class="hs-glyph">~</span><span> </span><span class="hs-identifier hs-type">TI.UTCTime</span><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">TI.FormatTime</span><span> </span><a href="#local-6989586621679121995"><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-6989586621679121995"><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><a name="_showDateTime"><a href="OpenAPIPetstore.Core.html#_showDateTime"><span class="hs-identifier">_showDateTime</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-446"></a><span> </span><span class="hs-identifier hs-var">TI.formatISO8601Millis</span><span>
|
||||
</span><a name="line-447"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_showDateTime</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-448"></a><span>
|
||||
</span><a name="line-449"></a><span class="hs-comment">-- | parse an ISO8601 date-time string</span><span>
|
||||
</span><a name="line-450"></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.ParseTime</span><span> </span><a href="#local-6989586621679126646"><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-6989586621679126647"><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-6989586621679126647"><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-6989586621679126647"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679126646"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-451"></a><a name="_parseISO8601"><a href="OpenAPIPetstore.Core.html#_parseISO8601"><span class="hs-identifier">_parseISO8601</span></a></a><span> </span><a name="local-6989586621679127696"><a href="#local-6989586621679127696"><span class="hs-identifier">t</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-450"></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.ParseTime</span><span> </span><a href="#local-6989586621679121993"><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-6989586621679121994"><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-6989586621679121994"><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-6989586621679121994"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679121993"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-451"></a><a name="_parseISO8601"><a href="OpenAPIPetstore.Core.html#_parseISO8601"><span class="hs-identifier">_parseISO8601</span></a></a><span> </span><a name="local-6989586621679123059"><a href="#local-6989586621679123059"><span class="hs-identifier">t</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-452"></a><span> </span><span class="hs-identifier hs-var">P.asum</span><span> </span><span class="hs-operator hs-var">$</span><span>
|
||||
</span><a name="line-453"></a><span> </span><span class="hs-identifier hs-var">P.flip</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">TI.parseTimeM</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-identifier hs-var">TI.defaultTimeLocale</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679127696"><span class="hs-identifier hs-var">t</span></a><span> </span><span class="hs-operator hs-var"><$></span><span>
|
||||
</span><a name="line-453"></a><span> </span><span class="hs-identifier hs-var">P.flip</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">TI.parseTimeM</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-identifier hs-var">TI.defaultTimeLocale</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679123059"><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-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-455"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_parseISO8601</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-456"></a><span>
|
||||
@@ -459,26 +459,26 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-459"></a><span class="hs-keyword">newtype</span><span> </span><a name="Date"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier">Date</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="Date"><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier">Date</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unDate"><a href="OpenAPIPetstore.Core.html#unDate"><span class="hs-identifier">unDate</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">TI.Day</span><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-460"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Enum</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Eq</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Data</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Ord</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Ix</span><span class="hs-special">,</span><span class="hs-identifier hs-type">NF.NFData</span><span class="hs-special">,</span><span class="hs-identifier hs-type">TI.ParseTime</span><span class="hs-special">,</span><span class="hs-identifier hs-type">TI.FormatTime</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-461"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.FromJSON</span><span> </span><a href="OpenAPIPetstore.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-462"></a><span> </span><a name="local-8214565720323785050"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.withText</span><span> </span><span class="hs-string">"Date"</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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.unpack</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-462"></a><span> </span><a name="local-8214565720323822284"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.withText</span><span> </span><span class="hs-string">"Date"</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.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.unpack</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-463"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.ToJSON</span><span> </span><a href="OpenAPIPetstore.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-464"></a><span> </span><a name="local-8214565720323784920"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679126633"><a href="#local-6989586621679126633"><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.toJSON</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679126633"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-464"></a><span> </span><a name="local-8214565720323804008"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679121980"><a href="#local-6989586621679121980"><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.toJSON</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679121980"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-465"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.FromHttpApiData</span><span> </span><a href="OpenAPIPetstore.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-466"></a><span> </span><a name="local-8214565720323800161"><span class="hs-identifier">parseUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.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.unpack</span><span>
|
||||
</span><a name="line-466"></a><span> </span><a name="local-8214565720323827184"><span class="hs-identifier">parseUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.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.unpack</span><span>
|
||||
</span><a name="line-467"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="OpenAPIPetstore.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-468"></a><span> </span><a name="local-8214565720323800157"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679126632"><a href="#local-6989586621679126632"><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.pack</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679126632"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-468"></a><span> </span><a name="local-8214565720323827192"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679121979"><a href="#local-6989586621679121979"><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.pack</span><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679121979"><span class="hs-identifier hs-var">t</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-469"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P.Show</span><span> </span><a href="OpenAPIPetstore.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-470"></a><span> </span><a name="local-8214565720323791384"><span class="hs-identifier">show</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679126631"><a href="#local-6989586621679126631"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679126631"><span class="hs-identifier hs-var">t</span></a><span>
|
||||
</span><a name="line-470"></a><span> </span><a name="local-8214565720323790323"><span class="hs-identifier">show</span></a><span> </span><span class="hs-special">(</span><a href="OpenAPIPetstore.Core.html#Date"><span class="hs-identifier hs-var">Date</span></a><span> </span><a name="local-6989586621679121978"><a href="#local-6989586621679121978"><span class="hs-identifier">t</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier hs-var">_showDate</span></a><span> </span><a href="#local-6989586621679121978"><span class="hs-identifier hs-var">t</span></a><span>
|
||||
</span><a name="line-471"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="OpenAPIPetstore.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-472"></a><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-472"></a><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-473"></a><span>
|
||||
</span><a name="line-474"></a><span class="hs-comment">-- | @TI.parseTimeM True TI.defaultTimeLocale "%Y-%m-%d"@</span><span>
|
||||
</span><a name="line-475"></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.ParseTime</span><span> </span><a href="#local-6989586621679126644"><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-6989586621679126645"><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-6989586621679126645"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679126644"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-475"></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.ParseTime</span><span> </span><a href="#local-6989586621679121991"><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-6989586621679121992"><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-6989586621679121992"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679121991"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-476"></a><a name="_readDate"><a href="OpenAPIPetstore.Core.html#_readDate"><span class="hs-identifier">_readDate</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-477"></a><span> </span><span class="hs-identifier hs-var">TI.parseTimeM</span><span> </span><span class="hs-identifier hs-var">True</span><span> </span><span class="hs-identifier hs-var">TI.defaultTimeLocale</span><span> </span><span class="hs-string">"%Y-%m-%d"</span><span>
|
||||
</span><a name="line-478"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_readDate</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-479"></a><span>
|
||||
</span><a name="line-480"></a><span class="hs-comment">-- | @TI.formatTime TI.defaultTimeLocale "%Y-%m-%d"@</span><span>
|
||||
</span><a name="line-481"></a><span class="hs-identifier">_showDate</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">TI.FormatTime</span><span> </span><a href="#local-6989586621679126643"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679126643"><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-481"></a><span class="hs-identifier">_showDate</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">TI.FormatTime</span><span> </span><a href="#local-6989586621679121990"><span class="hs-identifier hs-type">t</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679121990"><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><a name="_showDate"><a href="OpenAPIPetstore.Core.html#_showDate"><span class="hs-identifier">_showDate</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-483"></a><span> </span><span class="hs-identifier hs-var">TI.formatTime</span><span> </span><span class="hs-identifier hs-var">TI.defaultTimeLocale</span><span> </span><span class="hs-string">"%Y-%m-%d"</span><span>
|
||||
</span><a name="line-484"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_showDate</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
@@ -491,20 +491,20 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-491"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Eq</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Data</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Ord</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">,</span><span class="hs-identifier hs-type">NF.NFData</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-492"></a><span>
|
||||
</span><a name="line-493"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.FromJSON</span><span> </span><a href="OpenAPIPetstore.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-494"></a><span> </span><a name="local-8214565720323785050"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.withText</span><span> </span><span class="hs-string">"ByteArray"</span><span> </span><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-identifier hs-var">_readByteArray</span></a><span>
|
||||
</span><a name="line-494"></a><span> </span><a name="local-8214565720323822284"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.withText</span><span> </span><span class="hs-string">"ByteArray"</span><span> </span><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-identifier hs-var">_readByteArray</span></a><span>
|
||||
</span><a name="line-495"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.ToJSON</span><span> </span><a href="OpenAPIPetstore.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-496"></a><span> </span><a name="local-8214565720323784920"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.toJSON</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a><span>
|
||||
</span><a name="line-496"></a><span> </span><a name="local-8214565720323804008"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.toJSON</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a><span>
|
||||
</span><a name="line-497"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.FromHttpApiData</span><span> </span><a href="OpenAPIPetstore.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-498"></a><span> </span><a name="local-8214565720323800161"><span class="hs-identifier">parseUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-identifier hs-var">_readByteArray</span></a><span>
|
||||
</span><a name="line-498"></a><span> </span><a name="local-8214565720323827184"><span class="hs-identifier">parseUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_readByteArray"><span class="hs-identifier hs-var">_readByteArray</span></a><span>
|
||||
</span><a name="line-499"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="OpenAPIPetstore.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-500"></a><span> </span><a name="local-8214565720323800157"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a><span>
|
||||
</span><a name="line-500"></a><span> </span><a name="local-8214565720323827192"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a><span>
|
||||
</span><a name="line-501"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P.Show</span><span> </span><a href="OpenAPIPetstore.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-502"></a><span> </span><a name="local-8214565720323791384"><span class="hs-identifier">show</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a><span>
|
||||
</span><a name="line-502"></a><span> </span><a name="local-8214565720323790323"><span class="hs-identifier">show</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_showByteArray"><span class="hs-identifier hs-var">_showByteArray</span></a><span>
|
||||
</span><a name="line-503"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="OpenAPIPetstore.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-504"></a><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-504"></a><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-505"></a><span>
|
||||
</span><a name="line-506"></a><span class="hs-comment">-- | read base64 encoded characters</span><span>
|
||||
</span><a name="line-507"></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-6989586621679126642"><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-6989586621679126642"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a><span>
|
||||
</span><a name="line-507"></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-6989586621679121989"><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-6989586621679121989"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="OpenAPIPetstore.Core.html#ByteArray"><span class="hs-identifier hs-type">ByteArray</span></a><span>
|
||||
</span><a name="line-508"></a><a name="_readByteArray"><a href="OpenAPIPetstore.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.either</span><span> </span><span class="hs-identifier hs-var">P.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="OpenAPIPetstore.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.decode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span>
|
||||
</span><a name="line-509"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_readByteArray</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-510"></a><span>
|
||||
@@ -518,19 +518,19 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-518"></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Eq</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Data</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Ord</span><span class="hs-special">,</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">,</span><span class="hs-identifier hs-type">NF.NFData</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-519"></a><span>
|
||||
</span><a name="line-520"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.FromJSON</span><span> </span><a href="OpenAPIPetstore.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-521"></a><span> </span><a name="local-8214565720323785050"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.withText</span><span> </span><span class="hs-string">"Binary"</span><span> </span><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier hs-var">_readBinaryBase64</span></a><span>
|
||||
</span><a name="line-521"></a><span> </span><a name="local-8214565720323822284"><span class="hs-identifier">parseJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.withText</span><span> </span><span class="hs-string">"Binary"</span><span> </span><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier hs-var">_readBinaryBase64</span></a><span>
|
||||
</span><a name="line-522"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.ToJSON</span><span> </span><a href="OpenAPIPetstore.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-523"></a><span> </span><a name="local-8214565720323784920"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.toJSON</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a><span>
|
||||
</span><a name="line-523"></a><span> </span><a name="local-8214565720323804008"><span class="hs-identifier">toJSON</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.toJSON</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a><span>
|
||||
</span><a name="line-524"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.FromHttpApiData</span><span> </span><a href="OpenAPIPetstore.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-525"></a><span> </span><a name="local-8214565720323800161"><span class="hs-identifier">parseUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier hs-var">_readBinaryBase64</span></a><span>
|
||||
</span><a name="line-525"></a><span> </span><a name="local-8214565720323827184"><span class="hs-identifier">parseUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_readBinaryBase64"><span class="hs-identifier hs-var">_readBinaryBase64</span></a><span>
|
||||
</span><a name="line-526"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="OpenAPIPetstore.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-527"></a><span> </span><a name="local-8214565720323800157"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a><span>
|
||||
</span><a name="line-527"></a><span> </span><a name="local-8214565720323827192"><span class="hs-identifier">toUrlPiece</span></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a><span>
|
||||
</span><a name="line-528"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">P.Show</span><span> </span><a href="OpenAPIPetstore.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-529"></a><span> </span><a name="local-8214565720323791384"><span class="hs-identifier">show</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a><span>
|
||||
</span><a name="line-529"></a><span> </span><a name="local-8214565720323790323"><span class="hs-identifier">show</span></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><a href="OpenAPIPetstore.Core.html#_showBinaryBase64"><span class="hs-identifier hs-var">_showBinaryBase64</span></a><span>
|
||||
</span><a name="line-530"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><a href="OpenAPIPetstore.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-531"></a><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">unBinary</span><span>
|
||||
</span><a name="line-531"></a><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">unBinary</span><span>
|
||||
</span><a name="line-532"></a><span>
|
||||
</span><a name="line-533"></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-6989586621679126641"><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-6989586621679126641"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a><span>
|
||||
</span><a name="line-533"></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-6989586621679121988"><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-6989586621679121988"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="OpenAPIPetstore.Core.html#Binary"><span class="hs-identifier hs-type">Binary</span></a><span>
|
||||
</span><a name="line-534"></a><a name="_readBinaryBase64"><a href="OpenAPIPetstore.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.either</span><span> </span><span class="hs-identifier hs-var">P.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="OpenAPIPetstore.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.decode</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span>
|
||||
</span><a name="line-535"></a><span class="hs-pragma">{-# INLINE</span><span> </span><span class="hs-pragma">_readBinaryBase64</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-536"></a><span>
|
||||
@@ -540,6 +540,6 @@ Module : OpenAPIPetstore.Core
|
||||
</span><a name="line-540"></a><span>
|
||||
</span><a name="line-541"></a><span class="hs-comment">-- * Lens Type Aliases</span><span>
|
||||
</span><a name="line-542"></a><span>
|
||||
</span><a name="line-543"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_%27"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier">Lens_'</span></a></a><span> </span><a name="local-6989586621679124778"><a href="#local-6989586621679124778"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679124779"><a href="#local-6989586621679124779"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a><span> </span><a href="#local-6989586621679124778"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679124778"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679124779"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679124779"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-544"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_"><a href="OpenAPIPetstore.Core.html#Lens_"><span class="hs-identifier">Lens_</span></a></a><span> </span><a name="local-6989586621679124773"><a href="#local-6989586621679124773"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679124774"><a href="#local-6989586621679124774"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679124775"><a href="#local-6989586621679124775"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679124776"><a href="#local-6989586621679124776"><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-6989586621679124777"><a href="#local-6989586621679124777"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-operator">*</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-operator">*</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-6989586621679124777"><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-6989586621679124775"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679124777"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679124776"><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-6989586621679124773"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679124777"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679124774"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-543"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_%27"><a href="OpenAPIPetstore.Core.html#Lens_%27"><span class="hs-identifier">Lens_'</span></a></a><span> </span><a name="local-6989586621679119978"><a href="#local-6989586621679119978"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679119979"><a href="#local-6989586621679119979"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.Core.html#Lens_"><span class="hs-identifier hs-type">Lens_</span></a><span> </span><a href="#local-6989586621679119978"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679119978"><span class="hs-identifier hs-type">s</span></a><span> </span><a href="#local-6989586621679119979"><span class="hs-identifier hs-type">a</span></a><span> </span><a href="#local-6989586621679119979"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-544"></a><span class="hs-keyword">type</span><span> </span><a name="Lens_"><a href="OpenAPIPetstore.Core.html#Lens_"><span class="hs-identifier">Lens_</span></a></a><span> </span><a name="local-6989586621679119973"><a href="#local-6989586621679119973"><span class="hs-identifier">s</span></a></a><span> </span><a name="local-6989586621679119974"><a href="#local-6989586621679119974"><span class="hs-identifier">t</span></a></a><span> </span><a name="local-6989586621679119975"><a href="#local-6989586621679119975"><span class="hs-identifier">a</span></a></a><span> </span><a name="local-6989586621679119976"><a href="#local-6989586621679119976"><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-6989586621679119977"><a href="#local-6989586621679119977"><span class="hs-identifier">f</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-operator">*</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-operator">*</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-6989586621679119977"><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-6989586621679119975"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679119977"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679119976"><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-6989586621679119973"><span class="hs-identifier hs-type">s</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679119977"><span class="hs-identifier hs-type">f</span></a><span> </span><a href="#local-6989586621679119974"><span class="hs-identifier hs-type">t</span></a><span>
|
||||
</span><a name="line-545"></a></pre></body></html>
|
||||
@@ -17,18 +17,18 @@ Logging functions
|
||||
</span><a name="line-17"></a><span class="hs-cpp">#ifdef USE_KATIP
|
||||
</span><span>
|
||||
</span><a name="line-19"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.Logging</span><span>
|
||||
</span><a name="line-20"></a><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span><span>
|
||||
</span><a name="line-20"></a><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html"><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span></a><span>
|
||||
</span><a name="line-21"></a><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-22"></a><span>
|
||||
</span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span><span>
|
||||
</span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html"><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span></a><span>
|
||||
</span><a name="line-24"></a><span>
|
||||
</span><a name="line-25"></a><span class="hs-cpp">#else
|
||||
</span><span>
|
||||
</span><a name="line-27"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.Logging</span><span>
|
||||
</span><a name="line-28"></a><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html"><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span></a><span>
|
||||
</span><a name="line-28"></a><span> </span><span class="hs-special">(</span><span> </span><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span><span>
|
||||
</span><a name="line-29"></a><span> </span><span class="hs-special">)</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-30"></a><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html"><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span></a><span>
|
||||
</span><a name="line-31"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span><span>
|
||||
</span><a name="line-32"></a><span>
|
||||
</span><a name="line-33"></a><span class="hs-cpp">#endif
|
||||
</span></pre></body></html>
|
||||
@@ -0,0 +1,119 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><link rel="stylesheet" type="text/css" href="style.css" /><script type="text/javascript" src="highlight.js"></script></head><body><pre><span class="hs-comment">{-
|
||||
OpenAPI Petstore
|
||||
|
||||
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 Version: 3.0.1
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.LoggingKatip
|
||||
Katip Logging functions
|
||||
-}</span><span>
|
||||
</span><a name="line-15"></a><span>
|
||||
</span><a name="line-16"></a><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-pragma">{-# LANGUAGE RankNTypes #-}</span><span>
|
||||
</span><a name="line-18"></a><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables #-}</span><span>
|
||||
</span><a name="line-19"></a><span>
|
||||
</span><a name="line-20"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingKatip</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-21"></a><span>
|
||||
</span><a name="line-22"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Exception.Safe</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">E</span><span>
|
||||
</span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Monad.IO.Class</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Monad.Trans.Reader</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-26"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Lens.Micro</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">L</span><span>
|
||||
</span><a name="line-27"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">System.IO</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">IO</span><span>
|
||||
</span><a name="line-28"></a><span>
|
||||
</span><a name="line-29"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">GHC.Exts</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">IsString</span><span class="hs-special">(</span><span class="hs-glyph">..</span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-31"></a><span>
|
||||
</span><a name="line-32"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Katip</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">LG</span><span>
|
||||
</span><a name="line-33"></a><span>
|
||||
</span><a name="line-34"></a><span class="hs-comment">-- * Type Aliases (for compatibility)</span><span>
|
||||
</span><a name="line-35"></a><span>
|
||||
</span><a name="line-36"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><a name="line-37"></a><span class="hs-keyword">type</span><span> </span><a name="LogExecWithContext"><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier">LogExecWithContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679031377"><a href="#local-6989586621679031377"><span class="hs-identifier">m</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679031377"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span>
|
||||
</span><a name="line-38"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679031377"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-39"></a><span>
|
||||
</span><a name="line-40"></a><span class="hs-comment">-- | A Katip logging block</span><span>
|
||||
</span><a name="line-41"></a><span class="hs-keyword">type</span><span> </span><a name="LogExec"><a href="OpenAPIPetstore.LoggingKatip.html#LogExec"><span class="hs-identifier">LogExec</span></a></a><span> </span><a name="local-6989586621679031375"><a href="#local-6989586621679031375"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679031376"><a href="#local-6989586621679031376"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">LG.KatipT</span><span> </span><a href="#local-6989586621679031375"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679031376"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679031375"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679031376"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-42"></a><span>
|
||||
</span><a name="line-43"></a><span class="hs-comment">-- | A Katip Log environment</span><span>
|
||||
</span><a name="line-44"></a><span class="hs-keyword">type</span><span> </span><a name="LogContext"><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier">LogContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-type">LG.LogEnv</span><span>
|
||||
</span><a name="line-45"></a><span>
|
||||
</span><a name="line-46"></a><span class="hs-comment">-- | A Katip Log severity</span><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">type</span><span> </span><a name="LogLevel"><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier">LogLevel</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-type">LG.Severity</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-comment">-- * default logger</span><span>
|
||||
</span><a name="line-50"></a><span>
|
||||
</span><a name="line-51"></a><span class="hs-comment">-- | the default log environment</span><span>
|
||||
</span><a name="line-52"></a><span class="hs-identifier">initLogContext</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-53"></a><a name="initLogContext"><a href="OpenAPIPetstore.LoggingKatip.html#initLogContext"><span class="hs-identifier">initLogContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.initLogEnv</span><span> </span><span class="hs-string">"OpenAPIPetstore"</span><span> </span><span class="hs-string">"dev"</span><span>
|
||||
</span><a name="line-54"></a><span>
|
||||
</span><a name="line-55"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><a name="line-56"></a><span class="hs-identifier">runDefaultLogExecWithContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-57"></a><a name="runDefaultLogExecWithContext"><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier">runDefaultLogExecWithContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.runKatipT</span><span>
|
||||
</span><a name="line-58"></a><span>
|
||||
</span><a name="line-59"></a><span class="hs-comment">-- * stdout logger</span><span>
|
||||
</span><a name="line-60"></a><span>
|
||||
</span><a name="line-61"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><a name="line-62"></a><span class="hs-identifier">stdoutLoggingExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-63"></a><a name="stdoutLoggingExec"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingExec"><span class="hs-identifier">stdoutLoggingExec</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span>
|
||||
</span><a name="line-64"></a><span>
|
||||
</span><a name="line-65"></a><span class="hs-comment">-- | A Katip Log environment which targets stdout</span><span>
|
||||
</span><a name="line-66"></a><span class="hs-identifier">stdoutLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-67"></a><a name="stdoutLoggingContext"><a href="OpenAPIPetstore.LoggingKatip.html#stdoutLoggingContext"><span class="hs-identifier">stdoutLoggingContext</span></a></a><span> </span><a name="local-6989586621679033875"><a href="#local-6989586621679033875"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-68"></a><span> </span><a name="local-6989586621679034110"><a href="#local-6989586621679034110"><span class="hs-identifier">handleScribe</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">LG.mkHandleScribe</span><span> </span><span class="hs-identifier hs-var">LG.ColorIfTerminal</span><span> </span><span class="hs-identifier hs-var">IO.stdout</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG.permitItem</span><span> </span><span class="hs-identifier hs-var">LG.InfoS</span><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-var">LG.V2</span><span>
|
||||
</span><a name="line-69"></a><span> </span><span class="hs-identifier hs-var">LG.registerScribe</span><span> </span><span class="hs-string">"stdout"</span><span> </span><a href="#local-6989586621679034110"><span class="hs-identifier hs-var">handleScribe</span></a><span> </span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span><span> </span><a href="#local-6989586621679033875"><span class="hs-identifier hs-var">cxt</span></a><span>
|
||||
</span><a name="line-70"></a><span>
|
||||
</span><a name="line-71"></a><span class="hs-comment">-- * stderr logger</span><span>
|
||||
</span><a name="line-72"></a><span>
|
||||
</span><a name="line-73"></a><span class="hs-comment">-- | Runs a Katip logging block with the Log environment</span><span>
|
||||
</span><a name="line-74"></a><span class="hs-identifier">stderrLoggingExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-75"></a><a name="stderrLoggingExec"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingExec"><span class="hs-identifier">stderrLoggingExec</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#runDefaultLogExecWithContext"><span class="hs-identifier hs-var">runDefaultLogExecWithContext</span></a><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-comment">-- | A Katip Log environment which targets stderr</span><span>
|
||||
</span><a name="line-78"></a><span class="hs-identifier">stderrLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-79"></a><a name="stderrLoggingContext"><a href="OpenAPIPetstore.LoggingKatip.html#stderrLoggingContext"><span class="hs-identifier">stderrLoggingContext</span></a></a><span> </span><a name="local-6989586621679034111"><a href="#local-6989586621679034111"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-80"></a><span> </span><a name="local-6989586621679034112"><a href="#local-6989586621679034112"><span class="hs-identifier">handleScribe</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">LG.mkHandleScribe</span><span> </span><span class="hs-identifier hs-var">LG.ColorIfTerminal</span><span> </span><span class="hs-identifier hs-var">IO.stderr</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG.permitItem</span><span> </span><span class="hs-identifier hs-var">LG.InfoS</span><span class="hs-special">)</span><span> </span><span class="hs-identifier hs-var">LG.V2</span><span>
|
||||
</span><a name="line-81"></a><span> </span><span class="hs-identifier hs-var">LG.registerScribe</span><span> </span><span class="hs-string">"stderr"</span><span> </span><a href="#local-6989586621679034112"><span class="hs-identifier hs-var">handleScribe</span></a><span> </span><span class="hs-identifier hs-var">LG.defaultScribeSettings</span><span> </span><a href="#local-6989586621679034111"><span class="hs-identifier hs-var">cxt</span></a><span>
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- * Null logger</span><span>
|
||||
</span><a name="line-84"></a><span>
|
||||
</span><a name="line-85"></a><span class="hs-comment">-- | Disables Katip logging</span><span>
|
||||
</span><a name="line-86"></a><span class="hs-identifier">runNullLogExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-87"></a><a name="runNullLogExec"><a href="OpenAPIPetstore.LoggingKatip.html#runNullLogExec"><span class="hs-identifier">runNullLogExec</span></a></a><span> </span><a name="local-6989586621679034113"><a href="#local-6989586621679034113"><span class="hs-identifier">le</span></a></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG.KatipT</span><span> </span><a name="local-6989586621679034114"><a href="#local-6989586621679034114"><span class="hs-identifier">f</span></a></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier">P.runReaderT</span><span> </span><a href="#local-6989586621679034114"><span class="hs-identifier hs-var">f</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">L.set</span><span> </span><span class="hs-identifier hs-var">LG.logEnvScribes</span><span> </span><span class="hs-identifier hs-var">mempty</span><span> </span><a href="#local-6989586621679034113"><span class="hs-identifier hs-var">le</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-88"></a><span>
|
||||
</span><a name="line-89"></a><span class="hs-comment">-- * Log Msg</span><span>
|
||||
</span><a name="line-90"></a><span>
|
||||
</span><a name="line-91"></a><span class="hs-comment">-- | Log a katip message</span><span>
|
||||
</span><a name="line-92"></a><span class="hs-identifier">_log</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679032034"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">LG.Katip</span><span> </span><a href="#local-6989586621679032034"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679032034"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-93"></a><a name="_log"><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier">_log</span></a></a><span> </span><a name="local-6989586621679034115"><a href="#local-6989586621679034115"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679034116"><a href="#local-6989586621679034116"><span class="hs-identifier">level</span></a></a><span> </span><a name="local-6989586621679034117"><a href="#local-6989586621679034117"><span class="hs-identifier">msg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-94"></a><span> </span><span class="hs-identifier hs-var">LG.logMsg</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">fromString</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><a href="#local-6989586621679034115"><span class="hs-identifier hs-var">src</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679034116"><span class="hs-identifier hs-var">level</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">LG.logStr</span><span> </span><a href="#local-6989586621679034117"><span class="hs-identifier hs-var">msg</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-95"></a><span>
|
||||
</span><a name="line-96"></a><span class="hs-comment">-- * Log Exceptions</span><span>
|
||||
</span><a name="line-97"></a><span>
|
||||
</span><a name="line-98"></a><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
|
||||
</span><a name="line-99"></a><span class="hs-identifier">logExceptions</span><span>
|
||||
</span><a name="line-100"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">LG.Katip</span><span> </span><a href="#local-6989586621679031378"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">E.MonadCatch</span><span> </span><a href="#local-6989586621679031378"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">Applicative</span><span> </span><a href="#local-6989586621679031378"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-101"></a><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679031378"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679031379"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679031378"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679031379"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-102"></a><a name="logExceptions"><a href="OpenAPIPetstore.LoggingKatip.html#logExceptions"><span class="hs-identifier">logExceptions</span></a></a><span> </span><a name="local-6989586621679034155"><a href="#local-6989586621679034155"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-103"></a><span> </span><span class="hs-identifier hs-var">E.handle</span><span>
|
||||
</span><a name="line-104"></a><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679034343"><a href="#local-6989586621679034343"><span class="hs-identifier">e</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">E.SomeException</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-105"></a><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679034155"><span class="hs-identifier hs-var">src</span></a><span> </span><span class="hs-identifier hs-var">LG.ErrorS</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679034343"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-106"></a><span> </span><span class="hs-identifier hs-var">E.throw</span><span> </span><a href="#local-6989586621679034343"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-107"></a><span>
|
||||
</span><a name="line-108"></a><span class="hs-comment">-- * Log Level</span><span>
|
||||
</span><a name="line-109"></a><span>
|
||||
</span><a name="line-110"></a><span class="hs-identifier">levelInfo</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-111"></a><a name="levelInfo"><a href="OpenAPIPetstore.LoggingKatip.html#levelInfo"><span class="hs-identifier">levelInfo</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.InfoS</span><span>
|
||||
</span><a name="line-112"></a><span>
|
||||
</span><a name="line-113"></a><span class="hs-identifier">levelError</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-114"></a><a name="levelError"><a href="OpenAPIPetstore.LoggingKatip.html#levelError"><span class="hs-identifier">levelError</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.ErrorS</span><span>
|
||||
</span><a name="line-115"></a><span>
|
||||
</span><a name="line-116"></a><span class="hs-identifier">levelDebug</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingKatip.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-117"></a><a name="levelDebug"><a href="OpenAPIPetstore.LoggingKatip.html#levelDebug"><span class="hs-identifier">levelDebug</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.DebugS</span><span>
|
||||
</span><a name="line-118"></a><span>
|
||||
</span><a name="line-119"></a></pre></body></html>
|
||||
@@ -1,128 +0,0 @@
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><link rel="stylesheet" type="text/css" href="style.css" /><script type="text/javascript" src="highlight.js"></script></head><body><pre><span class="hs-comment">{-
|
||||
OpenAPI Petstore
|
||||
|
||||
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 Version: 3.0.1
|
||||
OpenAPI Petstore API version: 1.0.0
|
||||
Generated by OpenAPI Generator (https://openapi-generator.tech)
|
||||
-}</span><span>
|
||||
</span><a name="line-10"></a><span>
|
||||
</span><a name="line-11"></a><span class="hs-comment">{-|
|
||||
Module : OpenAPIPetstore.LoggingMonadLogger
|
||||
monad-logger Logging functions
|
||||
-}</span><span>
|
||||
</span><a name="line-15"></a><span>
|
||||
</span><a name="line-16"></a><span class="hs-pragma">{-# LANGUAGE OverloadedStrings #-}</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-pragma">{-# LANGUAGE RankNTypes #-}</span><span>
|
||||
</span><a name="line-18"></a><span class="hs-pragma">{-# LANGUAGE ScopedTypeVariables #-}</span><span>
|
||||
</span><a name="line-19"></a><span>
|
||||
</span><a name="line-20"></a><span class="hs-keyword">module</span><span> </span><span class="hs-identifier">OpenAPIPetstore.LoggingMonadLogger</span><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-21"></a><span>
|
||||
</span><a name="line-22"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Exception.Safe</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">E</span><span>
|
||||
</span><a name="line-23"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Monad.IO.Class</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">P</span><span>
|
||||
</span><a name="line-24"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">T</span><span>
|
||||
</span><a name="line-25"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Data.Time</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">TI</span><span>
|
||||
</span><a name="line-26"></a><span>
|
||||
</span><a name="line-27"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Monoid</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-operator hs-var"><></span><span class="hs-special">)</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-28"></a><span class="hs-keyword">import</span><span> </span><span class="hs-identifier">Data.Text</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Text</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-29"></a><span>
|
||||
</span><a name="line-30"></a><span class="hs-keyword">import</span><span> </span><span class="hs-keyword">qualified</span><span> </span><span class="hs-identifier">Control.Monad.Logger</span><span> </span><span class="hs-keyword">as</span><span> </span><span class="hs-identifier">LG</span><span>
|
||||
</span><a name="line-31"></a><span>
|
||||
</span><a name="line-32"></a><span class="hs-comment">-- * Type Aliases (for compatibility)</span><span>
|
||||
</span><a name="line-33"></a><span>
|
||||
</span><a name="line-34"></a><span class="hs-comment">-- | Runs a monad-logger block with the filter predicate</span><span>
|
||||
</span><a name="line-35"></a><span class="hs-keyword">type</span><span> </span><a name="LogExecWithContext"><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExecWithContext"><span class="hs-identifier">LogExecWithContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679044270"><a href="#local-6989586621679044270"><span class="hs-identifier">m</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679044270"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-glyph">=></span><span>
|
||||
</span><a name="line-36"></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExec"><span class="hs-identifier hs-type">LogExec</span></a><span> </span><a href="#local-6989586621679044270"><span class="hs-identifier hs-type">m</span></a><span>
|
||||
</span><a name="line-37"></a><span>
|
||||
</span><a name="line-38"></a><span class="hs-comment">-- | A monad-logger block</span><span>
|
||||
</span><a name="line-39"></a><span class="hs-keyword">type</span><span> </span><a name="LogExec"><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExec"><span class="hs-identifier">LogExec</span></a></a><span> </span><a name="local-6989586621679044268"><a href="#local-6989586621679044268"><span class="hs-identifier">m</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">forall</span><span> </span><a name="local-6989586621679044269"><a href="#local-6989586621679044269"><span class="hs-identifier">a</span></a></a><span class="hs-operator">.</span><span> </span><span class="hs-identifier hs-type">LG.LoggingT</span><span> </span><a href="#local-6989586621679044268"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679044269"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679044268"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679044269"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-40"></a><span>
|
||||
</span><a name="line-41"></a><span class="hs-comment">-- | A monad-logger filter predicate</span><span>
|
||||
</span><a name="line-42"></a><span class="hs-keyword">type</span><span> </span><a name="LogContext"><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogContext"><span class="hs-identifier">LogContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-type">LG.LogSource</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG.LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Bool</span><span>
|
||||
</span><a name="line-43"></a><span>
|
||||
</span><a name="line-44"></a><span class="hs-comment">-- | A monad-logger log level</span><span>
|
||||
</span><a name="line-45"></a><span class="hs-keyword">type</span><span> </span><a name="LogLevel"><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogLevel"><span class="hs-identifier">LogLevel</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-type">LG.LogLevel</span><span>
|
||||
</span><a name="line-46"></a><span>
|
||||
</span><a name="line-47"></a><span class="hs-comment">-- * default logger</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-comment">-- | the default log environment</span><span>
|
||||
</span><a name="line-50"></a><span class="hs-identifier">initLogContext</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-51"></a><a name="initLogContext"><a href="OpenAPIPetstore.LoggingMonadLogger.html#initLogContext"><span class="hs-identifier">initLogContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">pure</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#infoLevelFilter"><span class="hs-identifier hs-var">infoLevelFilter</span></a><span>
|
||||
</span><a name="line-52"></a><span>
|
||||
</span><a name="line-53"></a><span class="hs-comment">-- | Runs a monad-logger block with the filter predicate</span><span>
|
||||
</span><a name="line-54"></a><span class="hs-identifier">runDefaultLogExecWithContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-55"></a><a name="runDefaultLogExecWithContext"><a href="OpenAPIPetstore.LoggingMonadLogger.html#runDefaultLogExecWithContext"><span class="hs-identifier">runDefaultLogExecWithContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#runNullLogExec"><span class="hs-identifier hs-var">runNullLogExec</span></a><span>
|
||||
</span><a name="line-56"></a><span>
|
||||
</span><a name="line-57"></a><span class="hs-comment">-- * stdout logger</span><span>
|
||||
</span><a name="line-58"></a><span>
|
||||
</span><a name="line-59"></a><span class="hs-comment">-- | Runs a monad-logger block targeting stdout, with the filter predicate</span><span>
|
||||
</span><a name="line-60"></a><span class="hs-identifier">stdoutLoggingExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-61"></a><a name="stdoutLoggingExec"><a href="OpenAPIPetstore.LoggingMonadLogger.html#stdoutLoggingExec"><span class="hs-identifier">stdoutLoggingExec</span></a></a><span> </span><a name="local-6989586621679054292"><a href="#local-6989586621679054292"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.runStdoutLoggingT</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">LG.filterLogger</span><span> </span><a href="#local-6989586621679054292"><span class="hs-identifier hs-var">cxt</span></a><span>
|
||||
</span><a name="line-62"></a><span>
|
||||
</span><a name="line-63"></a><span class="hs-comment">-- | @pure@</span><span>
|
||||
</span><a name="line-64"></a><span class="hs-identifier">stdoutLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-65"></a><a name="stdoutLoggingContext"><a href="OpenAPIPetstore.LoggingMonadLogger.html#stdoutLoggingContext"><span class="hs-identifier">stdoutLoggingContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">pure</span><span>
|
||||
</span><a name="line-66"></a><span>
|
||||
</span><a name="line-67"></a><span class="hs-comment">-- * stderr logger</span><span>
|
||||
</span><a name="line-68"></a><span>
|
||||
</span><a name="line-69"></a><span class="hs-comment">-- | Runs a monad-logger block targeting stderr, with the filter predicate</span><span>
|
||||
</span><a name="line-70"></a><span class="hs-identifier">stderrLoggingExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-71"></a><a name="stderrLoggingExec"><a href="OpenAPIPetstore.LoggingMonadLogger.html#stderrLoggingExec"><span class="hs-identifier">stderrLoggingExec</span></a></a><span> </span><a name="local-6989586621679054293"><a href="#local-6989586621679054293"><span class="hs-identifier">cxt</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.runStderrLoggingT</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">LG.filterLogger</span><span> </span><a href="#local-6989586621679054293"><span class="hs-identifier hs-var">cxt</span></a><span>
|
||||
</span><a name="line-72"></a><span>
|
||||
</span><a name="line-73"></a><span class="hs-comment">-- | @pure@</span><span>
|
||||
</span><a name="line-74"></a><span class="hs-identifier">stderrLoggingContext</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogContext"><span class="hs-identifier hs-type">LogContext</span></a><span>
|
||||
</span><a name="line-75"></a><a name="stderrLoggingContext"><a href="OpenAPIPetstore.LoggingMonadLogger.html#stderrLoggingContext"><span class="hs-identifier">stderrLoggingContext</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">pure</span><span>
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-comment">-- * Null logger</span><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span class="hs-comment">-- | Disables monad-logger logging</span><span>
|
||||
</span><a name="line-80"></a><span class="hs-identifier">runNullLogExec</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogExecWithContext"><span class="hs-identifier hs-type">LogExecWithContext</span></a><span>
|
||||
</span><a name="line-81"></a><a name="runNullLogExec"><a href="OpenAPIPetstore.LoggingMonadLogger.html#runNullLogExec"><span class="hs-identifier">runNullLogExec</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">const</span><span> </span><span class="hs-special">(</span><span class="hs-special">`</span><span class="hs-identifier">LG.runLoggingT</span><span class="hs-special">`</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#nullLogger"><span class="hs-identifier hs-var">nullLogger</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-82"></a><span>
|
||||
</span><a name="line-83"></a><span class="hs-comment">-- | monad-logger which does nothing</span><span>
|
||||
</span><a name="line-84"></a><span class="hs-identifier">nullLogger</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">LG.Loc</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG.LogSource</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG.LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG.LogStr</span><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-special">)</span><span>
|
||||
</span><a name="line-85"></a><a name="nullLogger"><a href="OpenAPIPetstore.LoggingMonadLogger.html#nullLogger"><span class="hs-identifier">nullLogger</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-86"></a><span>
|
||||
</span><a name="line-87"></a><span class="hs-comment">-- * Log Msg</span><span>
|
||||
</span><a name="line-88"></a><span>
|
||||
</span><a name="line-89"></a><span class="hs-comment">-- | Log a message using the current time</span><span>
|
||||
</span><a name="line-90"></a><span class="hs-identifier">_log</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679044871"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">LG.MonadLogger</span><span> </span><a href="#local-6989586621679044871"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">=></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG.LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Text</span><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679044871"><span class="hs-identifier hs-type">m</span></a><span> </span><span class="hs-special">(</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-91"></a><a name="_log"><a href="OpenAPIPetstore.LoggingMonadLogger.html#_log"><span class="hs-identifier">_log</span></a></a><span> </span><a name="local-6989586621679054294"><a href="#local-6989586621679054294"><span class="hs-identifier">src</span></a></a><span> </span><a name="local-6989586621679054295"><a href="#local-6989586621679054295"><span class="hs-identifier">level</span></a></a><span> </span><a name="local-6989586621679054296"><a href="#local-6989586621679054296"><span class="hs-identifier">msg</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-92"></a><span> </span><a name="local-6989586621679054896"><a href="#local-6989586621679054896"><span class="hs-identifier">now</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><span class="hs-identifier hs-var">P.liftIO</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679054297"><span class="hs-identifier hs-var">formatTimeLog</span></a><span> </span><span class="hs-operator hs-var"><$></span><span> </span><span class="hs-identifier hs-var">TI.getCurrentTime</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-93"></a><span> </span><span class="hs-identifier hs-var">LG.logOtherNS</span><span> </span><span class="hs-special">(</span><span class="hs-string">"OpenAPIPetstore."</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679054294"><span class="hs-identifier hs-var">src</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679054295"><span class="hs-identifier hs-var">level</span></a><span> </span><span class="hs-special">(</span><span class="hs-string">"["</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679054896"><span class="hs-identifier hs-var">now</span></a><span> </span><span class="hs-operator hs-var"><></span><span> </span><span class="hs-string">"] "</span><span> </span><span class="hs-operator hs-var"><></span><span> </span><a href="#local-6989586621679054296"><span class="hs-identifier hs-var">msg</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-94"></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-95"></a><span> </span><a name="local-6989586621679054297"><a href="#local-6989586621679054297"><span class="hs-identifier">formatTimeLog</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-96"></a><span> </span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">TI.formatTime</span><span> </span><span class="hs-identifier hs-var">TI.defaultTimeLocale</span><span> </span><span class="hs-string">"%Y-%m-%dT%H:%M:%S%Z"</span><span>
|
||||
</span><a name="line-97"></a><span>
|
||||
</span><a name="line-98"></a><span class="hs-comment">-- * Log Exceptions</span><span>
|
||||
</span><a name="line-99"></a><span>
|
||||
</span><a name="line-100"></a><span class="hs-comment">-- | re-throws exceptions after logging them</span><span>
|
||||
</span><a name="line-101"></a><span class="hs-identifier">logExceptions</span><span>
|
||||
</span><a name="line-102"></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">LG.MonadLogger</span><span> </span><a href="#local-6989586621679044271"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">E.MonadCatch</span><span> </span><a href="#local-6989586621679044271"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">,</span><span> </span><span class="hs-identifier hs-type">P.MonadIO</span><span> </span><a href="#local-6989586621679044271"><span class="hs-identifier hs-type">m</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-103"></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-6989586621679044271"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679044272"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679044271"><span class="hs-identifier hs-type">m</span></a><span> </span><a href="#local-6989586621679044272"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-104"></a><a name="logExceptions"><a href="OpenAPIPetstore.LoggingMonadLogger.html#logExceptions"><span class="hs-identifier">logExceptions</span></a></a><span> </span><a name="local-6989586621679054897"><a href="#local-6989586621679054897"><span class="hs-identifier">src</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-105"></a><span> </span><span class="hs-identifier hs-var">E.handle</span><span>
|
||||
</span><a name="line-106"></a><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-special">(</span><a name="local-6989586621679055086"><a href="#local-6989586621679055086"><span class="hs-identifier">e</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">E.SomeException</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-107"></a><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#_log"><span class="hs-identifier hs-var">_log</span></a><span> </span><a href="#local-6989586621679054897"><span class="hs-identifier hs-var">src</span></a><span> </span><span class="hs-identifier hs-var">LG.LevelError</span><span> </span><span class="hs-special">(</span><span class="hs-special">(</span><span class="hs-identifier hs-var">T.pack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">show</span><span class="hs-special">)</span><span> </span><a href="#local-6989586621679055086"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-108"></a><span> </span><span class="hs-identifier hs-var">E.throw</span><span> </span><a href="#local-6989586621679055086"><span class="hs-identifier hs-var">e</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-109"></a><span>
|
||||
</span><a name="line-110"></a><span class="hs-comment">-- * Log Level</span><span>
|
||||
</span><a name="line-111"></a><span>
|
||||
</span><a name="line-112"></a><span class="hs-identifier">levelInfo</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-113"></a><a name="levelInfo"><a href="OpenAPIPetstore.LoggingMonadLogger.html#levelInfo"><span class="hs-identifier">levelInfo</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.LevelInfo</span><span>
|
||||
</span><a name="line-114"></a><span>
|
||||
</span><a name="line-115"></a><span class="hs-identifier">levelError</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-116"></a><a name="levelError"><a href="OpenAPIPetstore.LoggingMonadLogger.html#levelError"><span class="hs-identifier">levelError</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.LevelError</span><span>
|
||||
</span><a name="line-117"></a><span>
|
||||
</span><a name="line-118"></a><span class="hs-identifier">levelDebug</span><span> </span><span class="hs-glyph">::</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#LogLevel"><span class="hs-identifier hs-type">LogLevel</span></a><span>
|
||||
</span><a name="line-119"></a><a name="levelDebug"><a href="OpenAPIPetstore.LoggingMonadLogger.html#levelDebug"><span class="hs-identifier">levelDebug</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">LG.LevelDebug</span><span>
|
||||
</span><a name="line-120"></a><span>
|
||||
</span><a name="line-121"></a><span class="hs-comment">-- * Level Filter</span><span>
|
||||
</span><a name="line-122"></a><span>
|
||||
</span><a name="line-123"></a><span class="hs-identifier">minLevelFilter</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">LG.LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG.LogSource</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG.LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Bool</span><span>
|
||||
</span><a name="line-124"></a><a name="minLevelFilter"><a href="OpenAPIPetstore.LoggingMonadLogger.html#minLevelFilter"><span class="hs-identifier">minLevelFilter</span></a></a><span> </span><a name="local-6989586621679055906"><a href="#local-6989586621679055906"><span class="hs-identifier">l</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679055907"><a href="#local-6989586621679055907"><span class="hs-identifier">l'</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="#local-6989586621679055907"><span class="hs-identifier hs-var">l'</span></a><span> </span><span class="hs-operator hs-var">>=</span><span> </span><a href="#local-6989586621679055906"><span class="hs-identifier hs-var">l</span></a><span>
|
||||
</span><a name="line-125"></a><span>
|
||||
</span><a name="line-126"></a><span class="hs-identifier">infoLevelFilter</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">LG.LogSource</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">LG.LogLevel</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Bool</span><span>
|
||||
</span><a name="line-127"></a><a name="infoLevelFilter"><a href="OpenAPIPetstore.LoggingMonadLogger.html#infoLevelFilter"><span class="hs-identifier">infoLevelFilter</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.LoggingMonadLogger.html#minLevelFilter"><span class="hs-identifier hs-var">minLevelFilter</span></a><span> </span><span class="hs-identifier hs-var">LG.LevelInfo</span><span>
|
||||
</span><a name="line-128"></a></pre></body></html>
|
||||
@@ -44,19 +44,19 @@ Module : OpenAPIPetstore.MimeTypes
|
||||
</span><a name="line-44"></a><span>
|
||||
</span><a name="line-45"></a><span class="hs-comment">-- * ContentType MimeType</span><span>
|
||||
</span><a name="line-46"></a><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">data</span><span> </span><a name="ContentType"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><a name="local-6989586621679087697"><a href="#local-6989586621679087697"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679087697"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="ContentType"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unContentType"><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier">unContentType</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679087697"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-47"></a><span class="hs-keyword">data</span><span> </span><a name="ContentType"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><a name="local-6989586621679076522"><a href="#local-6989586621679076522"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076522"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="ContentType"><a href="OpenAPIPetstore.MimeTypes.html#ContentType"><span class="hs-identifier">ContentType</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unContentType"><a href="OpenAPIPetstore.MimeTypes.html#unContentType"><span class="hs-identifier">unContentType</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076522"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-48"></a><span>
|
||||
</span><a name="line-49"></a><span class="hs-comment">-- * Accept MimeType</span><span>
|
||||
</span><a name="line-50"></a><span>
|
||||
</span><a name="line-51"></a><span class="hs-keyword">data</span><span> </span><a name="Accept"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><a name="local-6989586621679087696"><a href="#local-6989586621679087696"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679087696"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Accept"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unAccept"><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier">unAccept</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679087696"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-51"></a><span class="hs-keyword">data</span><span> </span><a name="Accept"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><a name="local-6989586621679076521"><a href="#local-6989586621679076521"><span class="hs-identifier">a</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076521"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Accept"><a href="OpenAPIPetstore.MimeTypes.html#Accept"><span class="hs-identifier">Accept</span></a></a><span> </span><span class="hs-special">{</span><span> </span><a name="unAccept"><a href="OpenAPIPetstore.MimeTypes.html#unAccept"><span class="hs-identifier">unAccept</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076521"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-special">}</span><span>
|
||||
</span><a name="line-52"></a><span>
|
||||
</span><a name="line-53"></a><span class="hs-comment">-- * Consumes Class</span><span>
|
||||
</span><a name="line-54"></a><span>
|
||||
</span><a name="line-55"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679087695"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Consumes"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier">Consumes</span></a></a><span> </span><a name="local-6989586621679087694"><a href="#local-6989586621679087694"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679087695"><a href="#local-6989586621679087695"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-55"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076520"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Consumes"><a href="OpenAPIPetstore.MimeTypes.html#Consumes"><span class="hs-identifier">Consumes</span></a></a><span> </span><a name="local-6989586621679076519"><a href="#local-6989586621679076519"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679076520"><a href="#local-6989586621679076520"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-56"></a><span>
|
||||
</span><a name="line-57"></a><span class="hs-comment">-- * Produces Class</span><span>
|
||||
</span><a name="line-58"></a><span>
|
||||
</span><a name="line-59"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679087693"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Produces"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier">Produces</span></a></a><span> </span><a name="local-6989586621679087692"><a href="#local-6989586621679087692"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679087693"><a href="#local-6989586621679087693"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-59"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076518"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="Produces"><a href="OpenAPIPetstore.MimeTypes.html#Produces"><span class="hs-identifier">Produces</span></a></a><span> </span><a name="local-6989586621679076517"><a href="#local-6989586621679076517"><span class="hs-identifier">req</span></a></a><span> </span><a name="local-6989586621679076518"><a href="#local-6989586621679076518"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-60"></a><span>
|
||||
</span><a name="line-61"></a><span class="hs-comment">-- * Default Mime Types</span><span>
|
||||
</span><a name="line-62"></a><span>
|
||||
@@ -76,129 +76,129 @@ Module : OpenAPIPetstore.MimeTypes
|
||||
</span><a name="line-76"></a><span>
|
||||
</span><a name="line-77"></a><span class="hs-comment">-- * MimeType Class</span><span>
|
||||
</span><a name="line-78"></a><span>
|
||||
</span><a name="line-79"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P.Typeable</span><span> </span><a href="#local-6989586621679087516"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeType"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier">MimeType</span></a></a><span> </span><a name="local-6989586621679087516"><a href="#local-6989586621679087516"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-79"></a><span class="hs-keyword">class</span><span> </span><span class="hs-identifier hs-type">P.Typeable</span><span> </span><a href="#local-6989586621679076380"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeType"><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier">MimeType</span></a></a><span> </span><a name="local-6989586621679076380"><a href="#local-6989586621679076380"><span class="hs-identifier">mtype</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-80"></a><span> </span><span class="hs-pragma">{-# MINIMAL</span><span> </span><span class="hs-pragma">mimeType</span><span> </span><span class="hs-pragma">|</span><span> </span><span class="hs-pragma">mimeTypes</span><span> </span><span class="hs-pragma">#-}</span><span>
|
||||
</span><a name="line-81"></a><span>
|
||||
</span><a name="line-82"></a><span> </span><a name="mimeTypes"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679087516"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME.MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-83"></a><span> </span><a name="local-8214565720323861722"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><a name="local-6989586621679087688"><a href="#local-6989586621679087688"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-84"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><a href="#local-6989586621679087688"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-85"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679087689"><a href="#local-6989586621679087689"><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-6989586621679087689"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-82"></a><span> </span><a name="mimeTypes"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679076380"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME.MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-83"></a><span> </span><a name="local-8214565720323850586"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier">mimeTypes</span></a></a><span> </span><a name="local-6989586621679076513"><a href="#local-6989586621679076513"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-84"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><a href="#local-6989586621679076513"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-85"></a><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><a name="local-6989586621679076514"><a href="#local-6989586621679076514"><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-6989586621679076514"><span class="hs-identifier hs-var">x</span></a><span class="hs-special">]</span><span>
|
||||
</span><a name="line-86"></a><span> </span><span class="hs-identifier hs-var">Nothing</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-87"></a><span>
|
||||
</span><a name="line-88"></a><span> </span><a name="mimeType"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679087516"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME.MediaType</span><span>
|
||||
</span><a name="line-89"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><a name="local-6989586621679087690"><a href="#local-6989586621679087690"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-90"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><a href="#local-6989586621679087690"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-88"></a><span> </span><a name="mimeType"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679076380"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME.MediaType</span><span>
|
||||
</span><a name="line-89"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><a name="local-6989586621679076515"><a href="#local-6989586621679076515"><span class="hs-identifier">p</span></a></a><span> </span><span class="hs-glyph">=</span><span>
|
||||
</span><a name="line-90"></a><span> </span><span class="hs-keyword">case</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><a href="#local-6989586621679076515"><span class="hs-identifier hs-var">p</span></a><span> </span><span class="hs-keyword">of</span><span>
|
||||
</span><a name="line-91"></a><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-92"></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679087691"><a href="#local-6989586621679087691"><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-6989586621679087691"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-92"></a><span> </span><span class="hs-special">(</span><a name="local-6989586621679076516"><a href="#local-6989586621679076516"><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-6989586621679076516"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-93"></a><span>
|
||||
</span><a name="line-94"></a><span> </span><a name="mimeType%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679087516"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME.MediaType</span><span>
|
||||
</span><a name="line-95"></a><span> </span><a name="local-8214565720323861724"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679087516"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-96"></a><span> </span><a name="mimeTypes%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679087516"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME.MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-97"></a><span> </span><a name="local-8214565720323861725"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679087516"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-94"></a><span> </span><a name="mimeType%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076380"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">Maybe</span><span> </span><span class="hs-identifier hs-type">ME.MediaType</span><span>
|
||||
</span><a name="line-95"></a><span> </span><a name="local-8214565720323850588"><a href="OpenAPIPetstore.MimeTypes.html#mimeType%27"><span class="hs-identifier">mimeType'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier hs-var">mimeType</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679076380"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-96"></a><span> </span><a name="mimeTypes%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076380"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">[</span><span class="hs-identifier hs-type">ME.MediaType</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-97"></a><span> </span><a name="local-8214565720323850589"><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes%27"><span class="hs-identifier">mimeTypes'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeTypes"><span class="hs-identifier hs-var">mimeTypes</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679076380"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-98"></a><span>
|
||||
</span><a name="line-99"></a><span class="hs-comment">-- Default MimeType Instances</span><span>
|
||||
</span><a name="line-100"></a><span>
|
||||
</span><a name="line-101"></a><span class="hs-comment">-- | @application/json; charset=utf-8@</span><span>
|
||||
</span><a name="line-102"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-103"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/json"</span><span>
|
||||
</span><a name="line-103"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/json"</span><span>
|
||||
</span><a name="line-104"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-105"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXML"><span class="hs-identifier hs-type">MimeXML</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-106"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml"</span><span>
|
||||
</span><a name="line-106"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml"</span><span>
|
||||
</span><a name="line-107"></a><span class="hs-comment">-- | @application/x-www-form-urlencoded@</span><span>
|
||||
</span><a name="line-108"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-109"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/x-www-form-urlencoded"</span><span>
|
||||
</span><a name="line-109"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/x-www-form-urlencoded"</span><span>
|
||||
</span><a name="line-110"></a><span class="hs-comment">-- | @multipart/form-data@</span><span>
|
||||
</span><a name="line-111"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-112"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"multipart/form-data"</span><span>
|
||||
</span><a name="line-112"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"multipart/form-data"</span><span>
|
||||
</span><a name="line-113"></a><span class="hs-comment">-- | @text/plain; charset=utf-8@</span><span>
|
||||
</span><a name="line-114"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-115"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/plain"</span><span>
|
||||
</span><a name="line-115"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/plain"</span><span>
|
||||
</span><a name="line-116"></a><span class="hs-comment">-- | @application/octet-stream@</span><span>
|
||||
</span><a name="line-117"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-118"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/octet-stream"</span><span>
|
||||
</span><a name="line-118"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/octet-stream"</span><span>
|
||||
</span><a name="line-119"></a><span class="hs-comment">-- | @"*/*"@</span><span>
|
||||
</span><a name="line-120"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeAny"><span class="hs-identifier hs-type">MimeAny</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-121"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"*/*"</span><span>
|
||||
</span><a name="line-121"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"*/*"</span><span>
|
||||
</span><a name="line-122"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-123"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-123"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Nothing</span><span>
|
||||
</span><a name="line-124"></a><span>
|
||||
</span><a name="line-125"></a><span class="hs-comment">-- * MimeRender Class</span><span>
|
||||
</span><a name="line-126"></a><span>
|
||||
</span><a name="line-127"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679087513"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeRender"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier">MimeRender</span></a></a><span> </span><a name="local-6989586621679087513"><a href="#local-6989586621679087513"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679087514"><a href="#local-6989586621679087514"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-128"></a><span> </span><a name="mimeRender"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679087513"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679087514"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-129"></a><span> </span><a name="mimeRender%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679087513"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679087514"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-130"></a><span> </span><a name="local-8214565720323861720"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679087515"><a href="#local-6989586621679087515"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679087513"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679087515"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-127"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076377"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeRender"><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier">MimeRender</span></a></a><span> </span><a name="local-6989586621679076377"><a href="#local-6989586621679076377"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679076378"><a href="#local-6989586621679076378"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-128"></a><span> </span><a name="mimeRender"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679076377"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679076378"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-129"></a><span> </span><a name="mimeRender%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076377"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><a href="#local-6989586621679076378"><span class="hs-identifier hs-type">x</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-130"></a><span> </span><a name="local-8214565720323850584"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender%27"><span class="hs-identifier">mimeRender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679076379"><a href="#local-6989586621679076379"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier hs-var">mimeRender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679076377"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679076379"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-131"></a><span>
|
||||
</span><a name="line-132"></a><span>
|
||||
</span><a name="line-133"></a><span class="hs-identifier">mimeRenderDefaultMultipartFormData</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679093109"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679093109"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-133"></a><span class="hs-identifier">mimeRenderDefaultMultipartFormData</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">WH.ToHttpApiData</span><span> </span><a href="#local-6989586621679082425"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="#local-6989586621679082425"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span>
|
||||
</span><a name="line-134"></a><a name="mimeRenderDefaultMultipartFormData"><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier">mimeRenderDefaultMultipartFormData</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH.toQueryParam</span><span>
|
||||
</span><a name="line-135"></a><span>
|
||||
</span><a name="line-136"></a><span class="hs-comment">-- Default MimeRender Instances</span><span>
|
||||
</span><a name="line-137"></a><span>
|
||||
</span><a name="line-138"></a><span class="hs-comment">-- | `A.encode`</span><span>
|
||||
</span><a name="line-139"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.ToJSON</span><span> </span><a href="#local-6989586621679090142"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679090142"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.encode</span><span>
|
||||
</span><a name="line-139"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.ToJSON</span><span> </span><a href="#local-6989586621679079227"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679079227"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.encode</span><span>
|
||||
</span><a name="line-140"></a><span class="hs-comment">-- | @WH.urlEncodeAsForm@</span><span>
|
||||
</span><a name="line-141"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.ToForm</span><span> </span><a href="#local-6989586621679090141"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679090141"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH.urlEncodeAsForm</span><span>
|
||||
</span><a name="line-141"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.ToForm</span><span> </span><a href="#local-6989586621679079226"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679079226"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">WH.urlEncodeAsForm</span><span>
|
||||
</span><a name="line-142"></a><span>
|
||||
</span><a name="line-143"></a><span class="hs-comment">-- | @P.id@</span><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-144"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-145"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
|
||||
</span><a name="line-146"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span>
|
||||
</span><a name="line-146"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span>
|
||||
</span><a name="line-147"></a><span class="hs-comment">-- | @BCL.pack@</span><span>
|
||||
</span><a name="line-148"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL.pack</span><span>
|
||||
</span><a name="line-148"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL.pack</span><span>
|
||||
</span><a name="line-149"></a><span>
|
||||
</span><a name="line-150"></a><span class="hs-comment">-- | @P.id@</span><span>
|
||||
</span><a name="line-151"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-151"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-152"></a><span class="hs-comment">-- | @BL.fromStrict . T.encodeUtf8@</span><span>
|
||||
</span><a name="line-153"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span>
|
||||
</span><a name="line-153"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BL.fromStrict</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.encodeUtf8</span><span>
|
||||
</span><a name="line-154"></a><span class="hs-comment">-- | @BCL.pack@</span><span>
|
||||
</span><a name="line-155"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL.pack</span><span>
|
||||
</span><a name="line-155"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">BCL.pack</span><span>
|
||||
</span><a name="line-156"></a><span>
|
||||
</span><a name="line-157"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-157"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-158"></a><span>
|
||||
</span><a name="line-159"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-160"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Char</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Double</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-162"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Float</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-163"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-165"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-166"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-159"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Bool</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-160"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Char</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-161"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Double</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-162"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Float</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-163"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Int</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-164"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">Integer</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-165"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-166"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeMultipartFormData"><span class="hs-identifier hs-type">MimeMultipartFormData</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeRenderDefaultMultipartFormData"><span class="hs-identifier hs-var">mimeRenderDefaultMultipartFormData</span></a><span>
|
||||
</span><a name="line-167"></a><span>
|
||||
</span><a name="line-168"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
|
||||
</span><a name="line-169"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861719"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.const</span><span> </span><span class="hs-identifier hs-var">BCL.empty</span><span>
|
||||
</span><a name="line-169"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeRender"><span class="hs-identifier hs-type">MimeRender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850583"><a href="OpenAPIPetstore.MimeTypes.html#mimeRender"><span class="hs-identifier">mimeRender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.const</span><span> </span><span class="hs-identifier hs-var">BCL.empty</span><span>
|
||||
</span><a name="line-170"></a><span>
|
||||
</span><a name="line-171"></a><span>
|
||||
</span><a name="line-172"></a><span class="hs-comment">-- * MimeUnrender Class</span><span>
|
||||
</span><a name="line-173"></a><span>
|
||||
</span><a name="line-174"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679087293"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeUnrender"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier">MimeUnrender</span></a></a><span> </span><a name="local-6989586621679087293"><a href="#local-6989586621679087293"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679087294"><a href="#local-6989586621679087294"><span class="hs-identifier">o</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-175"></a><span> </span><a name="mimeUnrender"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679087293"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">P.Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679087294"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-176"></a><span> </span><a name="mimeUnrender%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679087293"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">P.Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679087294"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-8214565720323861717"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679087512"><a href="#local-6989586621679087512"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679087293"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679087512"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-174"></a><span class="hs-keyword">class</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="#local-6989586621679076157"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a name="MimeUnrender"><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier">MimeUnrender</span></a></a><span> </span><a name="local-6989586621679076157"><a href="#local-6989586621679076157"><span class="hs-identifier">mtype</span></a></a><span> </span><a name="local-6989586621679076158"><a href="#local-6989586621679076158"><span class="hs-identifier">o</span></a></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-175"></a><span> </span><a name="mimeUnrender"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679076157"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">P.Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679076158"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-176"></a><span> </span><a name="mimeUnrender%27"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-glyph">::</span><span> </span><a href="#local-6989586621679076157"><span class="hs-identifier hs-type">mtype</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">P.Either</span><span> </span><span class="hs-identifier hs-type">String</span><span> </span><a href="#local-6989586621679076158"><span class="hs-identifier hs-type">o</span></a><span>
|
||||
</span><a name="line-177"></a><span> </span><a name="local-8214565720323850581"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender%27"><span class="hs-identifier">mimeUnrender'</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><a name="local-6989586621679076376"><a href="#local-6989586621679076376"><span class="hs-identifier">x</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier hs-var">mimeUnrender</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">P.Proxy</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">P.Proxy</span><span> </span><a href="#local-6989586621679076157"><span class="hs-identifier hs-type">mtype</span></a><span class="hs-special">)</span><span> </span><a href="#local-6989586621679076376"><span class="hs-identifier hs-var">x</span></a><span>
|
||||
</span><a name="line-178"></a><span>
|
||||
</span><a name="line-179"></a><span class="hs-comment">-- Default MimeUnrender Instances</span><span>
|
||||
</span><a name="line-180"></a><span>
|
||||
</span><a name="line-181"></a><span class="hs-comment">-- | @A.eitherDecode@</span><span>
|
||||
</span><a name="line-182"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.FromJSON</span><span> </span><a href="#local-6989586621679087699"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679087699"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.eitherDecode</span><span>
|
||||
</span><a name="line-182"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">A.FromJSON</span><span> </span><a href="#local-6989586621679076524"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeJSON"><span class="hs-identifier hs-type">MimeJSON</span></a><span> </span><a href="#local-6989586621679076524"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">A.eitherDecode</span><span>
|
||||
</span><a name="line-183"></a><span class="hs-comment">-- | @P.left T.unpack . WH.urlDecodeAsForm@</span><span>
|
||||
</span><a name="line-184"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.FromForm</span><span> </span><a href="#local-6989586621679087698"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679087698"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH.urlDecodeAsForm</span><span>
|
||||
</span><a name="line-184"></a><span class="hs-keyword">instance</span><span> </span><span class="hs-identifier hs-type">WH.FromForm</span><span> </span><a href="#local-6989586621679076523"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">=></span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeFormUrlEncoded"><span class="hs-identifier hs-type">MimeFormUrlEncoded</span></a><span> </span><a href="#local-6989586621679076523"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">T.unpack</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">WH.urlDecodeAsForm</span><span>
|
||||
</span><a name="line-185"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span>
|
||||
</span><a name="line-186"></a><span>
|
||||
</span><a name="line-187"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-187"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-188"></a><span class="hs-comment">-- | @P.left P.show . TL.decodeUtf8'@</span><span>
|
||||
</span><a name="line-189"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL.toStrict</span><span>
|
||||
</span><a name="line-189"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL.toStrict</span><span>
|
||||
</span><a name="line-190"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
|
||||
</span><a name="line-191"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL.unpack</span><span>
|
||||
</span><a name="line-191"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimePlainText"><span class="hs-identifier hs-type">MimePlainText</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL.unpack</span><span>
|
||||
</span><a name="line-192"></a><span>
|
||||
</span><a name="line-193"></a><span class="hs-comment">-- | @P.Right . P.id@</span><span>
|
||||
</span><a name="line-194"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-194"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">BL.ByteString</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.id</span><span>
|
||||
</span><a name="line-195"></a><span class="hs-comment">-- | @P.left P.show . T.decodeUtf8' . BL.toStrict@</span><span>
|
||||
</span><a name="line-196"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL.toStrict</span><span>
|
||||
</span><a name="line-196"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">T.Text</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.left</span><span> </span><span class="hs-identifier hs-var">P.show</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">T.decodeUtf8'</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BL.toStrict</span><span>
|
||||
</span><a name="line-197"></a><span class="hs-comment">-- | @P.Right . BCL.unpack@</span><span>
|
||||
</span><a name="line-198"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL.unpack</span><span>
|
||||
</span><a name="line-198"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeOctetStream"><span class="hs-identifier hs-type">MimeOctetStream</span></a><span> </span><span class="hs-identifier hs-type">String</span><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">BCL.unpack</span><span>
|
||||
</span><a name="line-199"></a><span>
|
||||
</span><a name="line-200"></a><span class="hs-comment">-- | @P.Right . P.const NoContent@</span><span>
|
||||
</span><a name="line-201"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323861716"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.const</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a><span>
|
||||
</span><a name="line-201"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeUnrender"><span class="hs-identifier hs-type">MimeUnrender</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeNoContent"><span class="hs-identifier hs-type">MimeNoContent</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-type">NoContent</span></a><span> </span><span class="hs-keyword">where</span><span> </span><a name="local-8214565720323850580"><a href="OpenAPIPetstore.MimeTypes.html#mimeUnrender"><span class="hs-identifier">mimeUnrender</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">P.Right</span><span> </span><span class="hs-operator hs-var">.</span><span> </span><span class="hs-identifier hs-var">P.const</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#NoContent"><span class="hs-identifier hs-var">NoContent</span></a><span>
|
||||
</span><a name="line-202"></a><span>
|
||||
</span><a name="line-203"></a><span>
|
||||
</span><a name="line-204"></a><span class="hs-comment">-- * Custom Mime Types</span><span>
|
||||
@@ -209,7 +209,7 @@ Module : OpenAPIPetstore.MimeTypes
|
||||
</span><a name="line-209"></a><span>
|
||||
</span><a name="line-210"></a><span class="hs-comment">-- | @application/xml; charset=utf-16@</span><span>
|
||||
</span><a name="line-211"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf16"><span class="hs-identifier hs-type">MimeXmlCharsetutf16</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-212"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml; charset=utf-16"</span><span>
|
||||
</span><a name="line-212"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml; charset=utf-16"</span><span>
|
||||
</span><a name="line-213"></a><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-214"></a><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-215"></a><span>
|
||||
@@ -219,38 +219,38 @@ Module : OpenAPIPetstore.MimeTypes
|
||||
</span><a name="line-219"></a><span>
|
||||
</span><a name="line-220"></a><span class="hs-comment">-- | @application/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-221"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeXmlCharsetutf8"><span class="hs-identifier hs-type">MimeXmlCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-222"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml; charset=utf-8"</span><span>
|
||||
</span><a name="line-222"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"application/xml; charset=utf-8"</span><span>
|
||||
</span><a name="line-223"></a><span class="hs-comment">-- instance MimeRender MimeXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-224"></a><span class="hs-comment">-- instance MimeUnrender MimeXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-225"></a><span>
|
||||
</span><a name="line-226"></a><span class="hs-comment">-- ** MimeTextxml</span><span>
|
||||
</span><a name="line-226"></a><span class="hs-comment">-- ** MimeTextXml</span><span>
|
||||
</span><a name="line-227"></a><span>
|
||||
</span><a name="line-228"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextxml"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxml"><span class="hs-identifier">MimeTextxml</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextxml"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxml"><span class="hs-identifier">MimeTextxml</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-228"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextXml"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier">MimeTextXml</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextXml"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier">MimeTextXml</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-229"></a><span>
|
||||
</span><a name="line-230"></a><span class="hs-comment">-- | @text/xml@</span><span>
|
||||
</span><a name="line-231"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxml"><span class="hs-identifier hs-type">MimeTextxml</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-232"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml"</span><span>
|
||||
</span><a name="line-233"></a><span class="hs-comment">-- instance MimeRender MimeTextxml T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-234"></a><span class="hs-comment">-- instance MimeUnrender MimeTextxml T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-231"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXml"><span class="hs-identifier hs-type">MimeTextXml</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-232"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml"</span><span>
|
||||
</span><a name="line-233"></a><span class="hs-comment">-- instance MimeRender MimeTextXml T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-234"></a><span class="hs-comment">-- instance MimeUnrender MimeTextXml T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-235"></a><span>
|
||||
</span><a name="line-236"></a><span class="hs-comment">-- ** MimeTextxmlCharsetutf16</span><span>
|
||||
</span><a name="line-236"></a><span class="hs-comment">-- ** MimeTextXmlCharsetutf16</span><span>
|
||||
</span><a name="line-237"></a><span>
|
||||
</span><a name="line-238"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextxmlCharsetutf16"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxmlCharsetutf16"><span class="hs-identifier">MimeTextxmlCharsetutf16</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextxmlCharsetutf16"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxmlCharsetutf16"><span class="hs-identifier">MimeTextxmlCharsetutf16</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-238"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextXmlCharsetutf16"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier">MimeTextXmlCharsetutf16</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextXmlCharsetutf16"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier">MimeTextXmlCharsetutf16</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-239"></a><span>
|
||||
</span><a name="line-240"></a><span class="hs-comment">-- | @text/xml; charset=utf-16@</span><span>
|
||||
</span><a name="line-241"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextxmlCharsetutf16</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-242"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml; charset=utf-16"</span><span>
|
||||
</span><a name="line-243"></a><span class="hs-comment">-- instance MimeRender MimeTextxmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-244"></a><span class="hs-comment">-- instance MimeUnrender MimeTextxmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-241"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf16"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf16</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-242"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml; charset=utf-16"</span><span>
|
||||
</span><a name="line-243"></a><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf16 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-244"></a><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf16 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-245"></a><span>
|
||||
</span><a name="line-246"></a><span class="hs-comment">-- ** MimeTextxmlCharsetutf8</span><span>
|
||||
</span><a name="line-246"></a><span class="hs-comment">-- ** MimeTextXmlCharsetutf8</span><span>
|
||||
</span><a name="line-247"></a><span>
|
||||
</span><a name="line-248"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextxmlCharsetutf8"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxmlCharsetutf8"><span class="hs-identifier">MimeTextxmlCharsetutf8</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextxmlCharsetutf8"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxmlCharsetutf8"><span class="hs-identifier">MimeTextxmlCharsetutf8</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-248"></a><span class="hs-keyword">data</span><span> </span><a name="MimeTextXmlCharsetutf8"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier">MimeTextXmlCharsetutf8</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a name="MimeTextXmlCharsetutf8"><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier">MimeTextXmlCharsetutf8</span></a></a><span> </span><span class="hs-keyword">deriving</span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">P.Typeable</span><span class="hs-special">)</span><span>
|
||||
</span><a name="line-249"></a><span>
|
||||
</span><a name="line-250"></a><span class="hs-comment">-- | @text/xml; charset=utf-8@</span><span>
|
||||
</span><a name="line-251"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextxmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextxmlCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-252"></a><span> </span><a name="local-8214565720323861723"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml; charset=utf-8"</span><span>
|
||||
</span><a name="line-253"></a><span class="hs-comment">-- instance MimeRender MimeTextxmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-254"></a><span class="hs-comment">-- instance MimeUnrender MimeTextxmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-251"></a><span class="hs-keyword">instance</span><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeType"><span class="hs-identifier hs-type">MimeType</span></a><span> </span><a href="OpenAPIPetstore.MimeTypes.html#MimeTextXmlCharsetutf8"><span class="hs-identifier hs-type">MimeTextXmlCharsetutf8</span></a><span> </span><span class="hs-keyword">where</span><span>
|
||||
</span><a name="line-252"></a><span> </span><a name="local-8214565720323850587"><a href="OpenAPIPetstore.MimeTypes.html#mimeType"><span class="hs-identifier">mimeType</span></a></a><span> </span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Just</span><span> </span><span class="hs-operator hs-var">$</span><span> </span><span class="hs-identifier hs-var">P.fromString</span><span> </span><span class="hs-string">"text/xml; charset=utf-8"</span><span>
|
||||
</span><a name="line-253"></a><span class="hs-comment">-- instance MimeRender MimeTextXmlCharsetutf8 T.Text where mimeRender _ = undefined</span><span>
|
||||
</span><a name="line-254"></a><span class="hs-comment">-- instance MimeUnrender MimeTextXmlCharsetutf8 T.Text where mimeUnrender _ = undefined</span><span>
|
||||
</span><a name="line-255"></a><span>
|
||||
</span><a name="line-256"></a></pre></body></html>
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@@ -15,7 +15,7 @@
|
||||
</span><a name="line-15"></a><span class="hs-cpp">#if defined(VERSION_base)
|
||||
</span><span>
|
||||
</span><a name="line-17"></a><span class="hs-cpp">#if MIN_VERSION_base(4,0,0)
|
||||
</span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679184695"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Exception.IOException</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679184695"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679184695"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679184648"><span class="hs-identifier hs-type">a</span></a><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-type">Exception.IOException</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679184648"><span class="hs-identifier hs-type">a</span></a><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><a href="#local-6989586621679184648"><span class="hs-identifier hs-type">a</span></a><span>
|
||||
</span><a name="line-19"></a><span class="hs-cpp">#else
|
||||
</span><span class="hs-identifier">catchIO</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-special">(</span><span class="hs-identifier">Exception.Exception</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span class="hs-special">)</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier">IO</span><span> </span><span class="hs-identifier">a</span><span>
|
||||
</span><a name="line-21"></a><span class="hs-cpp">#endif
|
||||
@@ -29,12 +29,12 @@
|
||||
</span><a name="line-29"></a><a name="version"><a href="Paths_openapi_petstore.html#version"><span class="hs-identifier">version</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-identifier hs-var">Version</span><span> </span><span class="hs-special">[</span><span class="hs-number">0</span><span class="hs-special">,</span><span class="hs-number">1</span><span class="hs-special">,</span><span class="hs-number">0</span><span class="hs-special">,</span><span class="hs-number">0</span><span class="hs-special">]</span><span> </span><span class="hs-special">[</span><span class="hs-special">]</span><span>
|
||||
</span><a name="line-30"></a><span class="hs-identifier">bindir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">dynlibdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">datadir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">libexecdir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">sysconfdir</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
|
||||
</span><a name="line-31"></a><span>
|
||||
</span><a name="line-32"></a><a name="bindir"><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier">bindir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/lts-13.9/8.6.3/bin"</span><span>
|
||||
</span><a name="line-33"></a><a name="libdir"><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier">libdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/lts-13.9/8.6.3/lib/x86_64-linux-ghc-8.6.3/openapi-petstore-0.1.0.0-6yC7i1RbMwkHQhaNDv53Sh"</span><span>
|
||||
</span><a name="line-34"></a><a name="dynlibdir"><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier">dynlibdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/lts-13.9/8.6.3/lib/x86_64-linux-ghc-8.6.3"</span><span>
|
||||
</span><a name="line-35"></a><a name="datadir"><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier">datadir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/lts-13.9/8.6.3/share/x86_64-linux-ghc-8.6.3/openapi-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-36"></a><a name="libexecdir"><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier">libexecdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/lts-13.9/8.6.3/libexec/x86_64-linux-ghc-8.6.3/openapi-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-37"></a><a name="sysconfdir"><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier">sysconfdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/lts-13.9/8.6.3/etc"</span><span>
|
||||
</span><a name="line-32"></a><a name="bindir"><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier">bindir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/0e55b588a6e0f73d5281a0e79ff90ed1a2f68be7e90de0d4415c83e0146eb843/8.6.5/bin"</span><span>
|
||||
</span><a name="line-33"></a><a name="libdir"><a href="Paths_openapi_petstore.html#libdir"><span class="hs-identifier">libdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/0e55b588a6e0f73d5281a0e79ff90ed1a2f68be7e90de0d4415c83e0146eb843/8.6.5/lib/x86_64-linux-ghc-8.6.5/openapi-petstore-0.1.0.0-AOImxrOgHINA0WeGn39wyO"</span><span>
|
||||
</span><a name="line-34"></a><a name="dynlibdir"><a href="Paths_openapi_petstore.html#dynlibdir"><span class="hs-identifier">dynlibdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/0e55b588a6e0f73d5281a0e79ff90ed1a2f68be7e90de0d4415c83e0146eb843/8.6.5/lib/x86_64-linux-ghc-8.6.5"</span><span>
|
||||
</span><a name="line-35"></a><a name="datadir"><a href="Paths_openapi_petstore.html#datadir"><span class="hs-identifier">datadir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/0e55b588a6e0f73d5281a0e79ff90ed1a2f68be7e90de0d4415c83e0146eb843/8.6.5/share/x86_64-linux-ghc-8.6.5/openapi-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-36"></a><a name="libexecdir"><a href="Paths_openapi_petstore.html#libexecdir"><span class="hs-identifier">libexecdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/0e55b588a6e0f73d5281a0e79ff90ed1a2f68be7e90de0d4415c83e0146eb843/8.6.5/libexec/x86_64-linux-ghc-8.6.5/openapi-petstore-0.1.0.0"</span><span>
|
||||
</span><a name="line-37"></a><a name="sysconfdir"><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier">sysconfdir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-string">"/home/jon/fs/git/openapi-generator/samples/client/petstore/haskell-http-client/.stack-work/install/x86_64-linux-tinfo6/0e55b588a6e0f73d5281a0e79ff90ed1a2f68be7e90de0d4415c83e0146eb843/8.6.5/etc"</span><span>
|
||||
</span><a name="line-38"></a><span>
|
||||
</span><a name="line-39"></a><span class="hs-identifier">getBinDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getLibDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getDynLibDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getDataDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getLibexecDir</span><span class="hs-special">,</span><span> </span><span class="hs-identifier">getSysconfDir</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
|
||||
</span><a name="line-40"></a><a name="getBinDir"><a href="Paths_openapi_petstore.html#getBinDir"><span class="hs-identifier">getBinDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">"openapi_petstore_bindir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_openapi_petstore.html#bindir"><span class="hs-identifier hs-var">bindir</span></a><span class="hs-special">)</span><span>
|
||||
@@ -45,7 +45,7 @@
|
||||
</span><a name="line-45"></a><a name="getSysconfDir"><a href="Paths_openapi_petstore.html#getSysconfDir"><span class="hs-identifier">getSysconfDir</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><a href="Paths_openapi_petstore.html#catchIO"><span class="hs-identifier hs-var">catchIO</span></a><span> </span><span class="hs-special">(</span><span class="hs-identifier hs-var">getEnv</span><span> </span><span class="hs-string">"openapi_petstore_sysconfdir"</span><span class="hs-special">)</span><span> </span><span class="hs-special">(</span><span class="hs-glyph">\</span><span class="hs-identifier">_</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-var">return</span><span> </span><a href="Paths_openapi_petstore.html#sysconfdir"><span class="hs-identifier hs-var">sysconfdir</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-46"></a><span>
|
||||
</span><a name="line-47"></a><span class="hs-identifier">getDataFileName</span><span> </span><span class="hs-glyph">::</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span> </span><span class="hs-glyph">-></span><span> </span><span class="hs-identifier hs-type">IO</span><span> </span><span class="hs-identifier hs-type">FilePath</span><span>
|
||||
</span><a name="line-48"></a><a name="getDataFileName"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></a><span> </span><a name="local-6989586621679185522"><a href="#local-6989586621679185522"><span class="hs-identifier">name</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-49"></a><span> </span><a name="local-6989586621679185523"><a href="#local-6989586621679185523"><span class="hs-identifier">dir</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a><span>
|
||||
</span><a name="line-50"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679185523"><span class="hs-identifier hs-var">dir</span></a><span> </span><span class="hs-operator hs-var">++</span><span> </span><span class="hs-string">"/"</span><span> </span><span class="hs-operator hs-var">++</span><span> </span><a href="#local-6989586621679185522"><span class="hs-identifier hs-var">name</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-48"></a><a name="getDataFileName"><a href="Paths_openapi_petstore.html#getDataFileName"><span class="hs-identifier">getDataFileName</span></a></a><span> </span><a name="local-6989586621679185470"><a href="#local-6989586621679185470"><span class="hs-identifier">name</span></a></a><span> </span><span class="hs-glyph">=</span><span> </span><span class="hs-keyword">do</span><span>
|
||||
</span><a name="line-49"></a><span> </span><a name="local-6989586621679185471"><a href="#local-6989586621679185471"><span class="hs-identifier">dir</span></a></a><span> </span><span class="hs-glyph"><-</span><span> </span><a href="Paths_openapi_petstore.html#getDataDir"><span class="hs-identifier hs-var">getDataDir</span></a><span>
|
||||
</span><a name="line-50"></a><span> </span><span class="hs-identifier hs-var">return</span><span> </span><span class="hs-special">(</span><a href="#local-6989586621679185471"><span class="hs-identifier hs-var">dir</span></a><span> </span><span class="hs-operator hs-var">++</span><span> </span><span class="hs-string">"/"</span><span> </span><span class="hs-operator hs-var">++</span><span> </span><a href="#local-6989586621679185470"><span class="hs-identifier hs-var">name</span></a><span class="hs-special">)</span><span>
|
||||
</span><a name="line-51"></a></pre></body></html>
|
||||
Reference in New Issue
Block a user