summaryrefslogtreecommitdiff
path: root/libguile/unif.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/unif.c')
-rw-r--r--libguile/unif.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/unif.c b/libguile/unif.c
index e4b2c08d4..215897619 100644
--- a/libguile/unif.c
+++ b/libguile/unif.c
@@ -1547,7 +1547,7 @@ loop:
char *dest = SCM_CHARS (v) + (cstart + offset) * sz;
if (pt->rw_active == SCM_PORT_WRITE)
- scm_fflush (port_or_fd);
+ scm_flush (port_or_fd);
ans = cend - offset;
while (remaining > 0)
@@ -1564,7 +1564,7 @@ loop:
}
else
{
- if (scm_fill_buffer (port_or_fd) == EOF)
+ if (scm_fill_input (port_or_fd) == EOF)
{
if (remaining % sz != 0)
{