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

Annotate ignore

Browse source 
Co-authored-by: Simon Cruanes <simon.cruanes.2007@m4x.org>
This commit is contained in:
Shon Feder 2021-12-11 21:27:23 -05:00 • committed by GitHub
parent f081a04892
commit db3a70f942
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
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/core/CCSeq.ml
View file

@ -406,7 +406,7 @@ let to_array l =
let a = Array.make len init in let a = Array.make len init in
(* Subtract 1 for len->index conversion and 1 for the removed [init] *) (* Subtract 1 for len->index conversion and 1 for the removed [init] *)
let idx = len - 2 in let idx = len - 2 in
ignore (List.fold_left (fun i x -> a.(i) <- x; i - 1) idx rest); ignore (List.fold_left (fun i x -> a.(i) <- x; i - 1) idx rest : int);
a a
(*$Q (*$Q