add logs and fix sql

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