From 2c6aca0fc6d05b4539ceed5bcdbe10f0a3b0eaf8 Mon Sep 17 00:00:00 2001 From: David Turner Date: Tue, 16 May 2017 10:26:06 +0000 Subject: [PATCH] Add to ComprehensiveAPI --- servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs b/servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs index e7c15633..0f39a910 100644 --- a/servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs +++ b/servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs @@ -37,7 +37,8 @@ type ComprehensiveAPIWithoutRaw = Verb 'POST 204 '[JSON] NoContent :<|> Verb 'POST 204 '[JSON] Int :<|> WithNamedContext "foo" '[] GET :<|> - CaptureAll "foo" Int :> GET + CaptureAll "foo" Int :> GET :<|> + EmptyAPI comprehensiveAPIWithoutRaw :: Proxy ComprehensiveAPIWithoutRaw comprehensiveAPIWithoutRaw = Proxy