* ports.c (scm_char_ready_p): bug fix: in SCM_PROC char-ready's

argument wasn't declared to be optional.

diff --git a/libguile/ChangeLog b/libguile/ChangeLog
index 2d14875..57c6831 100644 (file)
--- a/libguile/ChangeLog
+++ b/libguile/ChangeLog
@@ -1,3 +1,8 @@
+Mon Mar  3 09:07:56 1997  Gary Houston  <ghouston@actrix.gen.nz>
+
+       * ports.c (scm_char_ready_p): bug fix: in SCM_PROC char-ready's
+       argument wasn't declared to be optional.
+
 Sun Mar  2 16:34:40 1997  Mikael Djurfeldt  <mdj@mdj.nada.kth.se>
 
        * stime.c (scm_init_stime): Add feature "current-time".

diff --git a/libguile/ports.c b/libguile/ports.c
index 01324bd..ead8310 100644 (file)
--- a/libguile/ports.c
+++ b/libguile/ports.c
@@ -135,7 +135,7 @@ scm_fflush (port)
 
 \f
 
-SCM_PROC(s_char_ready_p, "char-ready?", 1, 0, 0, scm_char_ready_p);
+SCM_PROC(s_char_ready_p, "char-ready?", 0, 1, 0, scm_char_ready_p);
 
 SCM 
 scm_char_ready_p (port)