Skip to content

Commit

Permalink
Update bin/pp_ast.ml
Browse files Browse the repository at this point in the history
Signed-off-by: Nathan Rebours <[email protected]>

Co-authored-by: Patrick Ferris <[email protected]>
  • Loading branch information
NathanReb and patricoferris committed Sep 4, 2024
1 parent 3946bf7 commit 82d9afc
Showing 1 changed file with 4 additions and 1 deletion.
5 changes: 4 additions & 1 deletion bin/pp_ast.ml
Original file line number Diff line number Diff line change
Expand Up @@ -64,7 +64,10 @@ let set_input fn =

let set_kind k =
match !kind with
| Some _ -> raise (Arg.Bad "must specify at most one of --impl or --intf")
| Some _ ->
raise
(Arg.Bad
"must specify at most one of --str, --sig, --exp, --pat or --typ")
| _ -> kind := Some k

let exe_name = Stdlib.Filename.basename Stdlib.Sys.executable_name
Expand Down

0 comments on commit 82d9afc

Please sign in to comment.