Skip to content

Commit a778fb7

Browse files
committed
tests the user experience by changing mli first and ml later
1 parent db485f1 commit a778fb7

File tree

2 files changed

+5
-2
lines changed

2 files changed

+5
-2
lines changed

jscomp/ext/ext_array.ml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -58,7 +58,7 @@ let reverse_of_list = function
5858
| hd::tl -> Array.unsafe_set a (len - i - 2) hd; fill (i+1) tl in
5959
fill 0 tl
6060

61-
let filter f a =
61+
let filter a f =
6262
let arr_len = Array.length a in
6363
let rec aux acc i =
6464
if i = arr_len

jscomp/ext/ext_array.mli

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -33,7 +33,10 @@ val reverse_in_place : 'a array -> unit
3333
val reverse : 'a array -> 'a array
3434
val reverse_of_list : 'a list -> 'a array
3535

36-
val filter : ('a -> bool) -> 'a array -> 'a array
36+
val filter :
37+
'a array ->
38+
('a -> bool) ->
39+
'a array
3740

3841
val filter_map :
3942
'a array ->

0 commit comments

Comments
 (0)