index d29048ebf3612f6ec44dc2172f2ca13eaedcd705..95820c708877ffa96923be53ae54f8d80611bbb3 100644 (file)
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)