tori/iganaq
tori/iganaq
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

OCaml: Add separate logging channels and a dedicated 'command' type

Browse source
This commit is contained in:
Juno Takano 2025-04-13 22:12:44 -03:00
commit ac3dbe4d30
9 changed files with 72 additions and 36 deletions
Download patch file Download diff file Expand all files Collapse all files

5
ocaml/bin/main.ml
View file

@ -1,7 +1,10 @@
open Tori.Utilities.Aliases
let () =
match Array.to_list Sys.argv with
| _ :: tail ->
let future = (Tori.Parsers.Argument.interpret Tori.Schema.seed tail) in
if future.output.message <> "" then print_endline future.output.message;
if future.output.main <> "" then print_endline future.output.main;
if future.output.log <> "" then elog future.output.log;
exit future.meta.status
| [] -> assert false