Complete code example in Servant.Server

This commit is contained in:
Matthew Pickering 2015-01-01 20:10:17 +00:00
parent df5c8d9843
commit 77aed79eba

View file

@ -29,6 +29,9 @@ import Servant.Server.Internal
-- > where listAllBooks = ... -- > where listAllBooks = ...
-- > postBook book = ... -- > postBook book = ...
-- > -- >
-- > myApi :: Proxy MyApi
-- > myApi = Proxy
-- >
-- > app :: Application -- > app :: Application
-- > app = serve myApi server -- > app = serve myApi server
-- > -- >