summaryrefslogtreecommitdiff
path: root/2025/ocaml/bin/main.ml
diff options
context:
space:
mode:
authorDJ O'Leary <dijitol@proton.me>2026-06-26 18:04:09 +0200
committerDJ O'Leary <dijitol@proton.me>2026-06-26 18:04:09 +0200
commit6d8fb621d1e93b83786890d6d9cb6f0d8defa8ae (patch)
tree17c90d3984c114aa023600cc5bec6f6004b02243 /2025/ocaml/bin/main.ml
parentad4ea5ca4bc9f7540ee1d6a4fa2d881709dc6459 (diff)
refactor!: invert repo directory structure
now is language first
Diffstat (limited to '2025/ocaml/bin/main.ml')
-rw-r--r--2025/ocaml/bin/main.ml16
1 files changed, 0 insertions, 16 deletions
diff --git a/2025/ocaml/bin/main.ml b/2025/ocaml/bin/main.ml
deleted file mode 100644
index cbfe6d2..0000000
--- a/2025/ocaml/bin/main.ml
+++ /dev/null
@@ -1,16 +0,0 @@
-let env_log_level =
- match Sys.getenv_opt "LOG_LEVEL" with
- | None ->
- Some Logs.Warning
- | Some lvl -> (
- match Logs.level_of_string lvl with Error _ -> None | Ok v -> v )
-
-let main () =
- let log_level = env_log_level in
- Logs.set_level log_level ;
- Logs.set_reporter (Logs_fmt.reporter ()) ;
- Logs.info (fun m ->
- m "Started application with LOG_LEVEL=%s" (Logs.level_to_string log_level) ) ;
- Presentation.Cli.run ()
-
-let () = if !Sys.interactive then () else exit (main ())