Reorganize code and document functions
This commit is contained in:
parent
96b3fc6c52
commit
5752995272
9 changed files with 93 additions and 41 deletions
10
bin/main.ml
Normal file
10
bin/main.ml
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
let () =
|
||||
let open Inspector in
|
||||
if Array.length Sys.argv < 2 then (
|
||||
Printf.eprintf "Usage: %s <logfile>\n" (Filename.basename Sys.argv.(0));
|
||||
exit 1);
|
||||
|
||||
let s = State.create Sys.argv.(1) in
|
||||
Printf.printf "Loaded %d lines\n" (State.size s);
|
||||
|
||||
Repl.loop s
|
||||
Loading…
Add table
Add a link
Reference in a new issue