simon/sidekick
1
0
Fork 0
mirror of https://github.com/c-cube/sidekick.git synced 2025-12-06 11:15:43 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix compat

Browse source
This commit is contained in:
Simon Cruanes 2021-08-24 19:41:36 -04:00
parent 5017d9f8bf
commit 68250603c4
No known key found for this signature in database
GPG key ID: 4AC01D0849AA62B6
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/util/Util.ml
View file

@ -35,7 +35,7 @@ let array_of_list_map f l =
arr arr
let array_to_list_map f arr = let array_to_list_map f arr =
List.init (Array.length arr) (fun i -> f arr.(i)) CCList.init (Array.length arr) (fun i -> f arr.(i))
let setup_gc () = let setup_gc () =
let g = Gc.get () in let g = Gc.get () in