simon/sidekick
1
0
Fork 0
mirror of https://github.com/c-cube/sidekick.git synced 2026-01-28 12:24:50 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

perf(vec): minor improvements to Vec

Browse source
This commit is contained in:
Simon Cruanes 2018-08-18 13:14:36 -05:00
parent c9ab548a5a
commit ea9f374a7a
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/util/Vec.ml
View file

@ -121,7 +121,7 @@ let[@inline] move_to t t' =
t'.data <- Array.copy t.data; t'.data <- Array.copy t.data;
t'.sz <- t.sz t'.sz <- t.sz
let fast_remove t i = let[@inline] fast_remove t i =
assert (i < t.sz); assert (i < t.sz);
t.data.(i) <- t.data.(t.sz - 1); t.data.(i) <- t.data.(t.sz - 1);
t.sz <- t.sz - 1 t.sz <- t.sz - 1
@ -137,7 +137,7 @@ let sort t f =
Array.fast_sort f sub_arr; Array.fast_sort f sub_arr;
t.data <- sub_arr t.data <- sub_arr
let iter f t = let[@inline] iter f t =
for i = 0 to size t - 1 do for i = 0 to size t - 1 do
f (Array.unsafe_get t.data i) f (Array.unsafe_get t.data i)
done done