From b2aed14fd4a252d77b7ebaf42407472c47d1c98b Mon Sep 17 00:00:00 2001
From: Mateus Cruz <mateuscolvr@gmail.com>
Date: Mon, 5 Feb 2024 18:48:47 -0300
Subject: add logs and fix sql

---
 bin/main.ml | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

(limited to 'bin/main.ml')

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
-- 
cgit v1.2.3