X-Git-Url: https://deadsoftware.ru/gitweb?p=cpc.git;a=blobdiff_plain;f=src%2Fposix%2Fgeneric%2FHost%2FMod%2FConsole.cp;h=95820c708877ffa96923be53ae54f8d80611bbb3;hp=d29048ebf3612f6ec44dc2172f2ca13eaedcd705;hb=d10ed94458a936c8a20510a86a80ebc244695b4a;hpb=7d831abc12050416777f2a9e6d352950af688560 diff --git a/src/posix/generic/Host/Mod/Console.cp b/src/posix/generic/Host/Mod/Console.cp index d29048e..95820c7 100644 --- a/src/posix/generic/Host/Mod/Console.cp +++ b/src/posix/generic/Host/Mod/Console.cp @@ -9,7 +9,7 @@ MODULE HostConsole; 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) @@ -19,7 +19,7 @@ MODULE HostConsole; 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)