diff --git a/bin/main.ml b/bin/main.ml index a6c3791..35f6d9b 100644 --- a/bin/main.ml +++ b/bin/main.ml @@ -1,6 +1,6 @@ let () = let open Inspector in - if Array.length Sys.argv < 2 then ( + if Array.length Sys.argv <> 2 then ( Printf.eprintf "Usage: %s \n" (Filename.basename Sys.argv.(0)); exit 1);