diff options
| author | DJ O'Leary <dijitol@proton.me> | 2025-12-01 02:38:36 +0100 |
|---|---|---|
| committer | DJ O'Leary <dijitol@proton.me> | 2025-12-01 02:38:36 +0100 |
| commit | 60074a132f568f17f06bd5a520a09a3fa4348c93 (patch) | |
| tree | 54bea31ed22780352b624dedcd19176b34678488 /2025/ocaml/lib/infrastructure/logger.ml | |
| parent | 628abd0efbf4e8263157261675f4314c7acb9277 (diff) | |
refactor: remove own logger implementation and use logs
Diffstat (limited to '2025/ocaml/lib/infrastructure/logger.ml')
| -rw-r--r-- | 2025/ocaml/lib/infrastructure/logger.ml | 31 |
1 files changed, 0 insertions, 31 deletions
diff --git a/2025/ocaml/lib/infrastructure/logger.ml b/2025/ocaml/lib/infrastructure/logger.ml deleted file mode 100644 index d0d37a3..0000000 --- a/2025/ocaml/lib/infrastructure/logger.ml +++ /dev/null @@ -1,31 +0,0 @@ -module type Configurable_Logger = sig - include Application.Logger_sig.Logger - - val configure_logger : level:Logs.level option -> unit - - val parse_level : - env:Cmdliner.Cmd.Env.info -> Logs.level option Cmdliner.Term.t - - val configure_renderer : style_renderer:Fmt.style_renderer option -> unit -end - -module CLI_Logger : Configurable_Logger = struct - let configure_logger ~level = - Logs.set_level level ; - Logs.set_reporter (Logs_fmt.reporter ()) - - let parse_level ~env = Logs_cli.level ~env () - - let configure_renderer ~style_renderer = - Fmt_tty.setup_std_outputs ?style_renderer () - - let app msg = Logs.app (fun m -> m "%s" msg) - - let err msg = Logs.err (fun m -> m "%s" msg) - - let warn msg = Logs.warn (fun m -> m "%s" msg) - - let info msg = Logs.info (fun m -> m "%s" msg) - - let debug msg = Logs.debug (fun m -> m "%s" msg) -end |
