simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-07 03:35:30 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

test ccvector.iteri

Browse source
This commit is contained in:
Simon Cruanes 2015-01-08 15:36:50 +01:00
parent 3d9a7a0b74
commit f2890c56a6
1 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/core/CCVector.ml
View file

@ -296,6 +296,11 @@ let iteri k v =
k i (Array.unsafe_get v.vec i) k i (Array.unsafe_get v.vec i)
done done
(*$T
let v = (0--6) in \
iteri (fun i x -> if i = 3 then remove v i) v; length v = 6
*)
let map f v = let map f v =
if _empty_array v if _empty_array v
then create () then create ()