Skip to content

Instantly share code, notes, and snippets.

@JBetz
Created November 25, 2018 23:05
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save JBetz/d900b9fd6457f4c9c26b8a0c83084d08 to your computer and use it in GitHub Desktop.
Save JBetz/d900b9fd6457f4c9c26b8a0c83084d08 to your computer and use it in GitHub Desktop.
backend :: Backend BackendRoute FrontendRoute
backend = Backend
{ _backend_run = \_ -> do
app <- mkApp
Warp.run 3000 app
, _backend_routeEncoder = backendRouteEncoder
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment