Test that no foreign functions are generated for an EmptyAPI
commite73f00b333fbf7791fc38d20521deaff67b38a28
authorDavid Turner <dave.c.turner@gmail.com>
dateTue 16 May 2017, 10:31 (9 years ago)
parent1135616
servant-foreign/test/Servant/ForeignSpec.hs+1
@@ -57,6 +57,7 @@ type TestApi
5757 :<|> "test" :> QueryParams "params" Int :> ReqBody '[JSON] String :> Put '[JSON] NoContent
5858 :<|> "test" :> Capture "id" Int :> Delete '[JSON] NoContent
5959 :<|> "test" :> CaptureAll "ids" Int :> Get '[JSON] [Int]
60+ :<|> "test" :> EmptyAPI
6061
6162testApi :: [Req String]
6263testApi = listFromAPI (Proxy :: Proxy LangX) (Proxy :: Proxy String) (Proxy :: Proxy TestApi)