add libtool_version.ml

2026-02-27 17:49:54 +01:00 · 2026-02-27 17:49:54 +01:00 · 4784f32df5
commit 4784f32df5
parent f56ef6b544
4 changed files with 64 additions and 11 deletions
--- a/src/syntax.ml
+++ b/src/syntax.ml
@ -56,7 +56,7 @@ let list_fold_left f acc l =
      f acc v)
    (Ok acc) l

-let opt_list l =
+let list_option l =
  match (List.for_all Option.is_none l, List.for_all Option.is_some l) with
  | _, true ->
      let l = List.map Option.get l in