The first of the following functions causes a "Fatal error: exception
Out_of_memory", while the second works fine.
This error seems to occur when creating large arrays past 2 million and
something entries.
Anyone noticed this error?

Thanks.

  let test_dynarray1 () =
    let a = DynArray.create () in
    for i = 1 to 2817131 do
      DynArray.add a i
    done

  let test_dynarray2 () =
    let a = DynArray.make 2817131 in
    for i = 1 to 2817131 do
      DynArray.add a i
    done


-- 
Dário Abdulrehman