* genio.c, genio.h (scm_ungets): New function.

diff --git a/libguile/genio.h b/libguile/genio.h
index eeb1dae..3ee6917 100644 (file)
--- a/libguile/genio.h
+++ b/libguile/genio.h
@@ -54,6 +54,7 @@ extern void scm_lfwrite SCM_P ((char *ptr, scm_sizet size, SCM port));
 extern void scm_fflush SCM_P ((SCM port));
 extern int scm_getc SCM_P ((SCM port));
 extern void scm_ungetc SCM_P ((int c, SCM port));
+extern void scm_ungets SCM_P ((char *s, int n, SCM port));
 /* FIXME: this is a terrible name.  */
 extern char *scm_do_read_line SCM_P ((SCM port, int *len));