Test that no foreign functions are generated for an EmptyAPI

2017-05-16 10:31:33 +00:00 · 2017-05-16 10:31:33 +00:00 · e73f00b333
commit e73f00b333
parent 113561639a
1 changed files with 1 additions and 0 deletions
--- a/servant-foreign/test/Servant/ForeignSpec.hs
+++ b/servant-foreign/test/Servant/ForeignSpec.hs
@ -57,6 +57,7 @@ type TestApi
 :<|> "test" :> QueryParams "params" Int :> ReqBody '[JSON] String :> Put '[JSON] NoContent
 :<|> "test" :> Capture "id" Int :> Delete '[JSON] NoContent
 :<|> "test" :> CaptureAll "ids" Int :> Get '[JSON] [Int]
+ :<|> "test" :> EmptyAPI

 testApi :: [Req String]
 testApi = listFromAPI (Proxy :: Proxy LangX) (Proxy :: Proxy String) (Proxy :: Proxy TestApi)