summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMikael Djurfeldt <djurfeldt@nada.kth.se>1998-01-30 21:02:36 +0000
committerMikael Djurfeldt <djurfeldt@nada.kth.se>1998-01-30 21:02:36 +0000
commita3ec616e4298ab0675a86f0097ca9f152fd6785f (patch)
tree775b08d07be30bb64e1c9953498daaf82732b038
parent6905611f41801762d73e33edd94ecd3fd279f356 (diff)
downloadguile-a3ec616e4298ab0675a86f0097ca9f152fd6785f.tar.gz
Small fix to scm_getc: Move FD_ZERO into the select loop
-rw-r--r--libguile/genio.c2
1 files changed, 1 insertions, 1 deletions
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);
}