fix usage msg

This commit is contained in:
Rhiannon Morris 2020-12-03 09:53:44 +01:00
parent 11d9781065
commit 5c59d80e00
4 changed files with 5 additions and 3 deletions

View file

@ -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" =