ref: 062038c04a1cb9b7b161b670c5a3a948aaed42d1
dir: /libbio/test/bio-write.myr/
use std
use bio
const main = {
var i
var f
/* Must be bigger than a bio buffer (ie, > 64k) */
var buf : byte[64*1024]
match bio.create("tmpout/test-write", bio.Wr, 0o644)
| `std.Some bio: f = bio
| `std.None: std.fatal(1, "Unable to open data file")
;;
/* write a 5 byte chunk */
bio.write(f, "test\n")
/* again */
bio.write(f, "test\n")
/* write a 64k chunk */
for i = 0; i < 64*1024; i++
buf[i] = 0x31
;;
bio.write(f, buf[:])
/* final message after a big burst */
bio.write(f, "goodbye\n")
bio.flush(f)
/* and test for flush on close */
bio.close(f);
}