fix usage msg
This commit is contained in:
parent
11d9781065
commit
5c59d80e00
4 changed files with 5 additions and 3 deletions
2
day2.ml
2
day2.ml
|
@ -30,7 +30,7 @@ let mains = [|main' ok1; main' ok2|]
|
|||
|
||||
let main = function
|
||||
| [part; input] -> mains.(int_of_string part - 1) input
|
||||
| _ -> Usage.exit "2 <part> <infile>"
|
||||
| _ -> Usage.exit_default 2
|
||||
|
||||
|
||||
let%expect_test "part 1" =
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue