diff options
| author | DJ O'Leary <dijitol@proton.me> | 2025-12-11 03:52:21 +0100 |
|---|---|---|
| committer | DJ O'Leary <dijitol@proton.me> | 2025-12-11 03:52:21 +0100 |
| commit | d08ec9d21b56ccad803b3b8937ad8aa6e64f9598 (patch) | |
| tree | f747ac6c76b7fb84c15ac13fd516a83a287d882e /2025 | |
| parent | 1387d0bda3acc66f14d5514bcc4da3634ede3645 (diff) | |
refactor(logger): remove own logger impl
just use Logs directly for now
Diffstat (limited to '2025')
| -rw-r--r-- | 2025/ocaml/lib/application/logger.ml | 39 | ||||
| -rw-r--r-- | 2025/ocaml/lib/infrastructure/log.ml | 15 |
2 files changed, 0 insertions, 54 deletions
diff --git a/2025/ocaml/lib/application/logger.ml b/2025/ocaml/lib/application/logger.ml deleted file mode 100644 index 3d63201..0000000 --- a/2025/ocaml/lib/application/logger.ml +++ /dev/null @@ -1,39 +0,0 @@ -module type LoggerType = sig - type 'a t - - val app : 'a t -> unit - - val err : 'a t -> unit - - val warn : 'a t -> unit - - val info : 'a t -> unit - - val debug : 'a t -> unit -end - -module type S = sig - type 'a t - - val app : 'a t -> unit - - val err : 'a t -> unit - - val warn : 'a t -> unit - - val info : 'a t -> unit - - val debug : 'a t -> unit -end - -module Make (Logger : LoggerType) : S with type 'a t := 'a Logger.t = struct - let app = Logger.app - - let err = Logger.err - - let warn = Logger.warn - - let info = Logger.info - - let debug = Logger.debug -end diff --git a/2025/ocaml/lib/infrastructure/log.ml b/2025/ocaml/lib/infrastructure/log.ml deleted file mode 100644 index a15c1e7..0000000 --- a/2025/ocaml/lib/infrastructure/log.ml +++ /dev/null @@ -1,15 +0,0 @@ -module LogsAdapter = struct - type 'a t = ('a, unit) Logs.msgf - - let app msgf = Logs.app msgf - - let err msgf = Logs.err msgf - - let warn msgf = Logs.warn msgf - - let info msgf = Logs.info msgf - - let debug msgf = Logs.debug msgf -end - -module Logger = Application.Logger.Make (LogsAdapter) |