diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1998-01-30 21:02:36 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1998-01-30 21:02:36 +0000 |
commit | a3ec616e4298ab0675a86f0097ca9f152fd6785f (patch) | |
tree | 775b08d07be30bb64e1c9953498daaf82732b038 | |
parent | 6905611f41801762d73e33edd94ecd3fd279f356 (diff) | |
download | guile-a3ec616e4298ab0675a86f0097ca9f152fd6785f.tar.gz |
Small fix to scm_getc: Move FD_ZERO into the select loop
-rw-r--r-- | libguile/genio.c | 2 |
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); } |