Don't unread #f as if it were a character.

diff --git a/src/runtime/generic-io.scm b/src/runtime/generic-io.scm
index 16f3560a70e15a1cf741d76f44f3c53483abca50..7638b74afd2e56d2cfbc8983bafae6c533c16da1 100644 (file)
--- a/src/runtime/generic-io.scm
+++ b/src/runtime/generic-io.scm
@@ -1450,7 +1450,6 @@ USA.
             ((#\u+000A)
              #\newline)
             ((#f)
-             (unread-decoded-char ib c1)
              (unread-decoded-char ib c0)
              #f)
             (else
@@ -1480,7 +1479,6 @@ USA.
             ((#\u+000A)
              #\newline)
             ((#f)
-             (unread-decoded-char ib c1)
              (unread-decoded-char ib c0)
              #f)
             (else
@@ -1502,7 +1500,6 @@ USA.
             ((#\u+000A #\u+0085)
              #\newline)
             ((#f)
-             (unread-decoded-char ib c1)
              (unread-decoded-char ib c0)
              #f)
             (else