add dream router
This commit is contained in:
parent
4194ae6fda
commit
bee1e363df
@ -1,4 +1,12 @@
|
||||
let () =
|
||||
Dream.run
|
||||
@@ Dream.logger
|
||||
@@ fun _ -> Dream.html "Good morning, world!"
|
||||
@@ Dream.router [
|
||||
Dream.get "/"
|
||||
(fun _ ->
|
||||
Dream.html "Hello, world!");
|
||||
|
||||
Dream.get "/echo/:word"
|
||||
(fun request ->
|
||||
Dream.html (Dream.param request "word"));
|
||||
]
|
||||
|
||||
Loading…
Reference in New Issue
Block a user