fixed another typo

This commit is contained in:
ceriel 1988-05-02 12:35:39 +00:00
parent 7af7f27042
commit f6f8a5e858

View file

@ -150,7 +150,7 @@ IMPLEMENTATION MODULE Streams;
IF (cnt > 0) THEN IF (cnt > 0) THEN
cnt1 := cnt; cnt1 := cnt;
cnt := 0; cnt := 0;
IF Unix.write(fildes, ADR(buf), cnt) < 0 THEN END; IF Unix.write(fildes, ADR(buf), cnt1) < 0 THEN END;
END; END;
END; END;
END FlushStream; END FlushStream;