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

use array_is_empty_ instead of direct check

Browse source
This commit is contained in:
Fardale 2019-12-14 16:55:33 +01:00 • committed by Simon Cruanes
parent 858616606b
commit 1d589cf4ac
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/core/CCVector.ml
View file

@ -145,14 +145,14 @@ let ensure_assuming_not_empty_ v ~size =
) )
let ensure_with ~init v size = let ensure_with ~init v size =
if Array.length v.vec = 0 then ( if array_is_empty_ v then (
v.vec <- Array.make size init v.vec <- Array.make size init
) else ( ) else (
ensure_assuming_not_empty_ v ~size ensure_assuming_not_empty_ v ~size
) )
let ensure v size = let ensure v size =
if Array.length v.vec > 0 then ( if not (array_is_empty_ v) then (
ensure_assuming_not_empty_ v ~size ensure_assuming_not_empty_ v ~size
) )