From 0af37472ad54976b0b4b1547930282123c46cc00 Mon Sep 17 00:00:00 2001
From: ceriel <devnull@localhost>
Date: Mon, 2 May 1988 08:46:58 +0000
Subject: [PATCH] fixed typo

---
 lang/m2/libm2/Streams.mod | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lang/m2/libm2/Streams.mod b/lang/m2/libm2/Streams.mod
index f4aca228..6e758c77 100644
--- a/lang/m2/libm2/Streams.mod
+++ b/lang/m2/libm2/Streams.mod
@@ -150,7 +150,7 @@ IMPLEMENTATION MODULE Streams;
 		IF (cnt > 0) THEN
 			cnt1 := cnt;
 			cnt := 0;
-			IF Unix.write(fildes, ADR(buf), cnt) < 0) THEN END;
+			IF Unix.write(fildes, ADR(buf), cnt) < 0 THEN END;
 		END;
 	END;
   END FlushStream;