mirror of
https://github.com/aantron/dream.git
synced 2025-11-14 00:07:07 -05:00
10 lines
224 B
OCaml
10 lines
224 B
OCaml
let counter = ref 0
|
|
|
|
let () =
|
|
Dream.run
|
|
@@ Dream.logger
|
|
@@ (fun _ ->
|
|
counter := !counter + 1;
|
|
Dream.log "The count is now %i" !counter;
|
|
Dream.respond (Printf.sprintf "You are visitor number %i!" !counter))
|