add RemoteHost to ComprehensiveAPI
commit290e4ef1ba675ae8ea6452fe86c3946fc71a6491
authorSönke Hahn <soenkehahn@gmail.com>
dateMon 18 Jan 2016, 11:01 (11 years ago)
parentefd1205
servant/src/Servant/API/Internal/Test/ComprehensiveAPI.hs+1−1
@@ -20,7 +20,7 @@ type ComprehensiveAPI =
2020 QueryParams "foo" Int :> GET :<|>
2121 QueryFlag "foo" :> GET :<|>
2222-- Raw :<|>
23−-- RemoteHost :<|>
23+ RemoteHost :> GET :<|>
2424 ReqBody '[JSON] Int :> GET :<|>
2525-- Get '[JSON] (Headers '[Header "foo" Int] ()) :<|>
2626 "foo" :> GET :<|>