keep mergeArray, but deprecate it

Author: Cristiano Calcagno

jscomp/others/belt_MapInt.ml

@@ -149,6 +149,8 @@ let mergeMany h arr =
   done ;
   !v 
 
+let mergeArray = mergeMany
+
 let has = I.has
 let cmpU = I.cmpU
 let cmp = I.cmp

jscomp/others/belt_MapInt.mli

@@ -121,6 +121,9 @@ val merge:
 
 val mergeMany: 'v t -> (key * 'v) array -> 'v t
 
+[@@ocaml.deprecated "Use mergeMany instead"]
+val mergeArray: 'v t -> (key * 'v) array -> 'v t
+
 val keepU:
     'v t ->
     (key -> 'v -> bool [@bs]) ->

jscomp/others/belt_MapString.ml

@@ -149,6 +149,8 @@ let mergeMany h arr =
   done ;
   !v 
 
+let mergeArray = mergeMany
+
 let has = I.has
 let cmpU = I.cmpU
 let cmp = I.cmp

jscomp/others/belt_MapString.mli

@@ -121,6 +121,9 @@ val merge:
 
 val mergeMany: 'v t -> (key * 'v) array -> 'v t
 
+[@@ocaml.deprecated "Use mergeMany instead"]
+val mergeArray: 'v t -> (key * 'v) array -> 'v t
+
 val keepU:
     'v t ->
     (key -> 'v -> bool [@bs]) ->

jscomp/others/map.cppo.ml

@@ -154,6 +154,8 @@ let mergeMany h arr =
   done ;
   !v 
 
+let mergeArray = mergeMany
+
 let has = I.has
 let cmpU = I.cmpU
 let cmp = I.cmp

jscomp/others/map.cppo.mli

@@ -125,6 +125,9 @@ val merge:
 
 val mergeMany: 'v t -> (key * 'v) array -> 'v t
 
+[@@ocaml.deprecated "Use mergeMany instead"]
+val mergeArray: 'v t -> (key * 'v) array -> 'v t
+
 val keepU:
     'v t ->
     (key -> 'v -> bool [@bs]) ->

lib/js/belt_MapInt.js

@@ -236,6 +236,8 @@ var mergeU = Belt_internalMapInt.mergeU;
 
 var merge = Belt_internalMapInt.merge;
 
+var mergeArray = mergeMany;
+
 var keepU = Belt_internalAVLtree.keepSharedU;
 
 var keep = Belt_internalAVLtree.keepShared;
@@ -297,6 +299,7 @@ exports.update = update;
 exports.mergeU = mergeU;
 exports.merge = merge;
 exports.mergeMany = mergeMany;
+exports.mergeArray = mergeArray;
 exports.keepU = keepU;
 exports.keep = keep;
 exports.partitionU = partitionU;

lib/js/belt_MapString.js

@@ -236,6 +236,8 @@ var mergeU = Belt_internalMapString.mergeU;
 
 var merge = Belt_internalMapString.merge;
 
+var mergeArray = mergeMany;
+
 var keepU = Belt_internalAVLtree.keepSharedU;
 
 var keep = Belt_internalAVLtree.keepShared;
@@ -297,6 +299,7 @@ exports.update = update;
 exports.mergeU = mergeU;
 exports.merge = merge;
 exports.mergeMany = mergeMany;
+exports.mergeArray = mergeArray;
 exports.keepU = keepU;
 exports.keep = keep;
 exports.partitionU = partitionU;