diff options
Diffstat (limited to 'bin/main.ml')
| -rw-r--r-- | bin/main.ml | 12 |
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 |