[Guile-commits] 01/03: Fix reading of #true / #false

[Andy Wingo]

wingo pushed a commit to branch master
in repository guile.

commit 9897650f7a75a205b08dbe4c155644860c12cb53
Author: Andy Wingo <wingo@pobox.com>
AuthorDate: Fri Mar 5 20:35:22 2021 +0100

    Fix reading of #true / #false
    
    * module/ice-9/read.scm (%read): Fix bad argument order to unread-char.
---
 module/ice-9/read.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/module/ice-9/read.scm b/module/ice-9/read.scm
index 80f145b..e403e01 100644
--- a/module/ice-9/read.scm
+++ b/module/ice-9/read.scm
@@ -407,7 +407,7 @@
                          (next)
                          (lp (1+ i)))
                        (begin
-                         (unread-char port ch)
+                         (unread-char ch port)
                          #f))))))))
 
   (define (read-false-or-srfi-4-vector)