Add CaptureAll to ComprehensiveAPI
commitb714640110519092e513c8d7eb4885a13a85caba
authorArian van Putten <aeroboy94@gmail.com>
dateMon 4 Jul 2016, 14:38 (10 years ago)
parentd945c99
servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs+2−1
@@ -30,7 +30,8 @@ type ComprehensiveAPI =
3030 Vault :> GET :<|>
3131 Verb 'POST 204 '[JSON] NoContent :<|>
3232 Verb 'POST 204 '[JSON] Int :<|>
33− WithNamedContext "foo" '[] GET
33+ WithNamedContext "foo" '[] GET :<|>
34+ CaptureAll "foo" Int :> GET
3435
3536comprehensiveAPI :: Proxy ComprehensiveAPI
3637comprehensiveAPI = Proxy