git.iko.soy/typeable/servant
on master help sign in
Add CaptureAll to ComprehensiveAPI
b714640Arian van Putten
servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs+2−1
compare with master
unifiedsplit
@@ -30,7 +30,8 @@ type ComprehensiveAPI =
30 Vault :> GET :<|>
30 Vault :> GET :<|>
31 Verb 'POST 204 '[JSON] NoContent :<|>
31 Verb 'POST 204 '[JSON] NoContent :<|>
32 Verb 'POST 204 '[JSON] Int :<|>
32 Verb 'POST 204 '[JSON] Int :<|>
33− WithNamedContext "foo" '[] GET
33+ WithNamedContext "foo" '[] GET :<|>
34+ CaptureAll "foo" Int :> GET
34
35
35comprehensiveAPI :: Proxy ComprehensiveAPI
36comprehensiveAPI :: Proxy ComprehensiveAPI
36comprehensiveAPI = Proxy
37comprehensiveAPI = Proxy