From a3b0877584b9154bf5a5e2218e8ad07ea3c44ff3 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Mon, 7 Mar 2016 06:09:50 -0800
Subject: Bugfix: incorrect error string from stdio streams.

* stream.c (errno_to_string): Fix wrong test; it is a nil
value of err which is the "no error" case, not non-nil.
Due to this bug, any non-numeric error condition will
be reported as "no error", including the case t ("eof").
---
 stream.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'stream.c')

diff --git a/stream.c b/stream.c
index df1faa2d..bca44769 100644
--- a/stream.c
+++ b/stream.c
@@ -412,7 +412,7 @@ val errno_to_string(val err)
     return lit("unspecified error");
   else if (is_num(err))
     return string_utf8(strerror(c_num(err)));
-  else if (err)
+  else if (!err)
     return lit("no error");
   else if (err == t)
     return lit("eof");
-- 
cgit v1.2.3