Hojun-Cho
d456263f7e
The r-prefixed waves absorb the runtime, reject, and byte-compare rows of the migrated native carriers; each fixture is one directory with one case.ww and a //ww:error, //ww:compile, //ww:run, or //ww:run-exit directive covering both frontends.
28 lines
981 B
Plaintext
28 lines
981 B
Plaintext
//ww:run-exit 43
|
|
// Migrated from 777_fmt_handle_run row fprintln_file_multi.
|
|
package main;
|
|
import os;
|
|
import fmt;
|
|
import io;
|
|
export fn main() i32 = {
|
|
let path: str = "wwfmth_777_b";
|
|
let fd: i32 = os.open(path, os.flag.RDWR | os.flag.CREATE | os.flag.TRUNC, 0o644: i32);
|
|
if (fd < 0) { return 90; };
|
|
let wr = fmt.fprintln(fd: io.file, 7i64, "hi", true);
|
|
let nw: size = 0;
|
|
match (wr) {
|
|
case let n: size => { nw = n; };
|
|
case io.error => { return 91; };
|
|
};
|
|
os.close(fd);
|
|
let rd: i32 = os.open(path, os.flag.RDONLY, 0i32);
|
|
if (rd < 0) { return 92; };
|
|
let buf: [16]u8;
|
|
let n: i64 = os.read(rd, &buf[0], 16u64);
|
|
os.close(rd);
|
|
if (n != 10i64) { return 93; };
|
|
if (nw != 10: size) { return 94; };
|
|
if (buf[0] != 55u8 || buf[1] != 32u8 || buf[2] != 104u8 || buf[3] != 105u8 || buf[4] != 32u8 || buf[5] != 116u8 || buf[6] != 114u8 || buf[7] != 117u8 || buf[8] != 101u8 || buf[9] != 10u8) { return 95; };
|
|
return 43;
|
|
};
|