summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
Diffstat (limited to 'bin')
-rw-r--r--bin/main.ml12
1 files changed, 11 insertions, 1 deletions
diff --git a/bin/main.ml b/bin/main.ml
index 3f11200..03cc5ca 100644
--- a/bin/main.ml
+++ b/bin/main.ml
@@ -1,13 +1,23 @@
open Eio
open Piaf
+let setup_log ?style_renderer level =
+ Logs_threaded.enable ();
+ Fmt_tty.setup_std_outputs ?style_renderer ();
+ Logs.set_level ~all:true level;
+ Logs.set_reporter (Logs_fmt.reporter ())
+;;
+
let request_handler ~db_pool Server.{ request; _ } =
match Rinha.Router.match_route request.meth request.target with
| Some handler -> Result.get_ok @@ handler db_pool request
- | None -> Response.create `Not_found
+ | None ->
+ Logs.info (fun d -> d "Não encontrei %S\n" request.target);
+ Response.create `Not_found
;;
let () =
+ setup_log (Some Logs.Info);
Eio_main.run
@@ fun env ->
Switch.run