let () = print_endline "Hello, World!"; Dream.run @@ Dream.logger @@ Dream.router [ Dream.get "/static/**" @@ Dream.static "static"; Oasis_server.Utils.html_page_route "/"; Dream.get "/echo/:message" (fun request -> Dream.html (Dream.param request "message")); Dream.get "/test" (fun _ -> Unix.sleep 1; Dream.html "
You got me!
"); ]