(fun _ num _ ->
let num = int_of_string num in
if num = 0 then
- raise (DisambiguateTypes.Invalid_choice (lazy "0 is not a valid positive number"))
+ raise (DisambiguateTypes.Invalid_choice (None, lazy "0 is not a valid positive number"))
else
HelmLibraryObjects.build_bin_pos num));
DisambiguateChoices.add_num_choice