We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 0601276 commit 6b87912Copy full SHA for 6b87912
etc/version_parser.ml
@@ -8,10 +8,10 @@ let main () =
8
let l =
9
match l with
10
| l when List.for_all is_number l -> l
11
- | ( [""] | ["%%VERSION_NUM%%"] ) -> ["99";"99";"99"]
+ | [_] -> ["99";"99";"99"]
12
| _ -> Printf.eprintf "version_parser: cannot parse: %s\n" v; exit 1 in
13
let open Format in
14
printf "(%a)%!" (pp_print_list ~pp_sep:(fun fmt () -> pp_print_string fmt ", ") pp_print_string) l
15
;;
16
17
-main ()
+main ()
0 commit comments