index d29048ebf3612f6ec44dc2172f2ca13eaedcd705..3db386379326749aa38c2f217b4bdc3bada17db2 100644 (file)
MODULE HostConsole;
- IMPORT S := SYSTEM, Console, HostLang, unistd := C99unistd;
+ IMPORT S := SYSTEM, Console, HostLang, unistd := PosixCunistd;
TYPE
Directory = POINTER TO RECORD (Console.Directory) END;
VAR res: INTEGER; s: ARRAY 2 OF CHAR; ss: ARRAY 12 OF SHORTCHAR;
BEGIN
s[0] := ch; s[1] := 0X;
- HostLang.StringToHost(s, ss, TRUE, res);
+ HostLang.StringToHost(s, ss, HostLang.replace, res);
ASSERT(res = 0, 100);
res := unistd.write(1, S.ADR(ss[0]), LEN(ss$));
res := unistd.fsync(1)
VAR ss: POINTER TO ARRAY OF SHORTCHAR; res: INTEGER;
BEGIN
NEW(ss, LEN(s$) * 4 + 1);
- HostLang.StringToHost(s, ss, TRUE, res);
+ HostLang.StringToHost(s, ss, HostLang.replace, res);
ASSERT(res = 0, 100);
res := unistd.write(1, S.ADR(ss[0]), LEN(ss$));
res := unistd.fsync(1)