646b892680
Some checks failed
Periodic Merges (6h) / master → staging-nixos (push) Failing after 12m50s
Periodic Merges (6h) / master → staging-next (push) Failing after 12m54s
Periodic Merges (24h) / merge-base(master,staging) → haskell-updates (push) Failing after 11m54s
Periodic Merges (6h) / staging-next → staging (push) Failing after 12m13s
Periodic Merges (24h) / staging-next-25.05 → staging-25.05 (push) Failing after 13m24s
Periodic Merges (24h) / release-25.05 → staging-next-25.05 (push) Failing after 14m28s
18 lines
650 B
Diff
18 lines
650 B
Diff
diff --git a/src/cmap.ml b/src/cmap.ml
|
|
index 69f447b..3afb2b6 100644
|
|
--- a/src/cmap.ml
|
|
+++ b/src/cmap.ml
|
|
@@ -173,6 +173,12 @@ end = struct
|
|
let of_list_with_key_multi list ~get_key =
|
|
Using_comparator.of_list_with_key_multi ~comparator list ~get_key
|
|
|
|
+ let of_list_with_key_fold list ~get_key ~init ~f =
|
|
+ failwith "Map.of_list_with_key_fold: not implemented yet"
|
|
+
|
|
+ let of_list_with_key_reduce list ~get_key ~f =
|
|
+ failwith "Map.of_list_with_key_reduce: not implemented yet"
|
|
+
|
|
let of_alist alist = Using_comparator.of_alist ~comparator alist
|
|
|
|
let of_alist_or_error alist = Using_comparator.of_alist_or_error ~comparator alist
|