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