mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-07 11:45:31 -05:00
CCArray: use raise_notrace instead of raise
This commit is contained in:
parent
c50672ff7a
commit
4267210da9
1 changed files with 1 additions and 1 deletions
|
|
@ -201,7 +201,7 @@ exception Found
|
|||
|
||||
let mem ?(eq = Stdlib.(=)) elt a =
|
||||
try
|
||||
Array.iter (fun e -> if eq e elt then raise Found) a;
|
||||
Array.iter (fun e -> if eq e elt then raise_notrace Found) a;
|
||||
false
|
||||
with Found -> true
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue