d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Terminal now writes to fd 1, not fd 0.

Browse source 
Fixes problem where `./program </dev/null` didn't show output.
This commit is contained in:
George Koehler 2017-10-28 17:20:39 -04:00
parent 75ae957c75
commit 9a965efae8
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lang/m2/libm2/Terminal.mod
View file

@ -19,7 +19,7 @@ IMPLEMENTATION MODULE Terminal;
#else
FROM Unix IMPORT read, write, open, ioctl;
#endif
VAR fildes: INTEGER;
VAR fildes, fdout: INTEGER;
unreadch: CHAR;
unread: BOOLEAN;
tty: ARRAY[0..8] OF CHAR;
@ -87,7 +87,7 @@ IMPLEMENTATION MODULE Terminal;
PROCEDURE Write(ch: CHAR);
BEGIN
IF write(fildes, ADR(ch), 1) < 0 THEN
IF write(fdout, ADR(ch), 1) < 0 THEN
;
END;
END Write;
@ -116,5 +116,6 @@ BEGIN
(* dtrg: changed so that instead of opening /dev/tty, fd 0 is always used. *)
tty := "stdio";
fildes := 0;
fdout := 1;
unread := FALSE;
END Terminal.