fix: compat with OCaml 5.4
Some checks are pending
Build and Test / build (push) Waiting to run
Build and Test / format (push) Waiting to run

close #477
This commit is contained in:
Simon Cruanes 2025-05-26 23:43:27 -04:00
parent 14ad8c1f2a
commit f934db1e9c
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4

View file

@ -93,7 +93,7 @@ let sort_indices cmp a =
Array.sort (fun k1 k2 -> cmp a.(k1) a.(k2)) b; Array.sort (fun k1 k2 -> cmp a.(k1) a.(k2)) b;
b b
let sort_ranking cmp a = sort_indices compare (sort_indices cmp a) let sort_ranking cmp a = sort_indices CCInt.compare (sort_indices cmp a)
let rev a = let rev a =
let b = Array.copy a in let b = Array.copy a in