Skip to content

Instantly share code, notes, and snippets.

@jkrems
Last active August 29, 2015 14:00
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 jkrems/11099988 to your computer and use it in GitHub Desktop.
Save jkrems/11099988 to your computer and use it in GitHub Desktop.
A more functional syntax..?
let dispatch req = Http.OK (sprintf! "Hello, %s" req.url)
let server = Http.Server port: 8000, dispatch
// OR:
let server = Http.Server { port: 8000 }, dispatch
// OR:
let server = Http.Server { port: 8000, dispatch: dispatch }
async {
let socket = await server.socket; // alternative: *server.socket
printf! "Listening on %s" socket.address
}
// type: Promise String
let address = & (sprintf! "Listening on %s" *server.socket.address)
// & -> "async"
// * -> "await"
// String* -> "Promise String"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment