subsystem C99 renamed to PosixC

[cpc.git] / src / posix / generic / Host / Mod / Console.cp

diff --git a/src/posix/generic/Host/Mod/Console.cp b/src/posix/generic/Host/Mod/Console.cp
index d29048ebf3612f6ec44dc2172f2ca13eaedcd705..3db386379326749aa38c2f217b4bdc3bada17db2 100644 (file)
--- a/src/posix/generic/Host/Mod/Console.cp
+++ b/src/posix/generic/Host/Mod/Console.cp
@@ -1,6 +1,6 @@
 MODULE HostConsole;
 
-  IMPORT S := SYSTEM, Console, HostLang, unistd := C99unistd;
+  IMPORT S := SYSTEM, Console, HostLang, unistd := PosixCunistd;
 
   TYPE
     Directory = POINTER TO RECORD (Console.Directory) END;
@@ -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)