1 files changed, 1 insertions, 1 deletions
diff --git a/stream.c b/stream.c
index 662ba359..bd8d463e 100644
--- a/stream.c
+++ b/stream.c
@@ -803,7 +803,7 @@ val generic_get_line(val stream)
 
   for (;;) {
     val chr = ops->get_char(stream);
-    wint_t ch = chr ? c_chr(chr) : WEOF;
+    wint_t ch = chr ? (wint_t) c_chr(chr) : WEOF;
 
     if (ch == WEOF && buf == 0)
       break;