Complete code example in Servant.Server
commit77aed79eba1ade40bae489ea339221857e2a3ba6
authorMatthew Pickering <matthewtpickering@gmail.com>
dateThu 1 Jan 2015, 20:10 (12 years ago)
parentdf5c8d9
src/Servant/Server.hs+3
@@ -29,6 +29,9 @@ import Servant.Server.Internal
2929-- > where listAllBooks = ...
3030-- > postBook book = ...
3131-- >
32+-- > myApi :: Proxy MyApi
33+-- > myApi = Proxy
34+-- >
3235-- > app :: Application
3336-- > app = serve myApi server
3437-- >