git.iko.soy/typeable/servant
on master help sign in
add route to comprehensive API
6cbf0d3jschaul
servant-docs/golden/comprehensive.md+22
@@ -96,6 +96,28 @@
96
96
97```
97```
98
98
99+## GET /capture-lenient/:foo
100+
101+### Captures:
102+
103+- *foo*: Capture foo Int
104+
105+### Response:
106+
107+- Status code 200
108+- Headers: []
109+
110+- Supported content types are:
111+
112+ - `application/json;charset=utf-8`
113+ - `application/json`
114+
115+- Example (`application/json;charset=utf-8`, `application/json`):
116+
117+```javascript
118+
119+```
120+
99## GET /description
121## GET /description
100
122
101### foo
123### foo
servant/src/Servant/Test/ComprehensiveAPI.hs+1
@@ -49,6 +49,7 @@ type ComprehensiveAPIWithoutStreamingOrRaw' endpoint =
49 GET
49 GET
50 :<|> "get-int" :> Get '[JSON] Int
50 :<|> "get-int" :> Get '[JSON] Int
51 :<|> "capture" :> Capture' '[Description "example description"] "foo" Int :> GET
51 :<|> "capture" :> Capture' '[Description "example description"] "foo" Int :> GET
52+ :<|> "capture-lenient" :> Capture' '[Lenient] "foo" Int :> GET
52 :<|> "header" :> Header "foo" Int :> GET
53 :<|> "header" :> Header "foo" Int :> GET
53 :<|> "header-lenient" :> Header' '[Required, Lenient] "bar" Int :> GET
54 :<|> "header-lenient" :> Header' '[Required, Lenient] "bar" Int :> GET
54 :<|> "http-version" :> HttpVersion :> GET
55 :<|> "http-version" :> HttpVersion :> GET