From a3ec616e4298ab0675a86f0097ca9f152fd6785f Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Fri, 30 Jan 1998 21:02:36 +0000 Subject: [PATCH] Small fix to scm_getc: Move FD_ZERO into the select loop --- libguile/genio.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libguile/genio.c b/libguile/genio.c index d1052fb87..74bc0d39e 100644 --- a/libguile/genio.c +++ b/libguile/genio.c @@ -116,9 +116,9 @@ scm_getc (port) int n; SELECT_TYPE readfds; int fd = fileno ((FILE *) f); - FD_ZERO (&readfds); do { + FD_ZERO (&readfds); FD_SET (fd, &readfds); n = scm_internal_select (fd + 1, &readfds, NULL, NULL, NULL); }