summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guile-readline/readline.c7
1 files changed, 5 insertions, 2 deletions
diff --git a/guile-readline/readline.c b/guile-readline/readline.c
index 9f3d14ff7..09ce69545 100644
--- a/guile-readline/readline.c
+++ b/guile-readline/readline.c
@@ -30,6 +30,9 @@
#include "libguile/gh.h"
#include "libguile/iselect.h"
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
#include <readline/readline.h>
#include <readline/history.h>
#include <sys/time.h>
@@ -147,7 +150,7 @@ static scm_mutex_t reentry_barrier_mutex;
static SCM internal_readline (SCM text);
static SCM handle_error (void *data, SCM tag, SCM args);
-static void reentry_barrier ();
+static void reentry_barrier (void);
SCM_DEFINE (scm_readline, "%readline", 0, 4, 0,
@@ -172,7 +175,7 @@ SCM_DEFINE (scm_readline, "%readline", 0, 4, 0,
}
if (!((SCM_UNBNDP (inp) && SCM_NIMP (scm_cur_inp) && SCM_OPINFPORTP (inp))
- || SCM_NIMP (inp) && SCM_OPINFPORTP (inp)))
+ || (SCM_NIMP (inp) && SCM_OPINFPORTP (inp))))
{
--in_readline;
scm_misc_error (s_scm_readline,