Hi Bertram,
can you please make sure you're using the latest 5.0 64-bit build?
I can successfully write 5GB with charout with below code.
Lacking enough memory I can't go beyond.
Can you run it - maybe up to e = 10 or more - and report where it fails for
you?
~~~
numeric digits 18
f = .File~new("TstCharOutLarge")
s = .Stream~new(f)
do e = 1 to 9
m = 5 * 10 ** e
s~open("write replace")
say e m s~description s~charOut(""~left(m)) s~description,
s~chars (s~chars == m)~?("Ok", "delta" m - s~chars)
s~close
end
~~~
_______________________________________________
Oorexx-users mailing list
Oorexx-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-users
