summaryrefslogtreecommitdiff
path: root/libguile/ports.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/ports.c')
-rw-r--r--libguile/ports.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/ports.c b/libguile/ports.c
index 68951a416..a62c4236e 100644
--- a/libguile/ports.c
+++ b/libguile/ports.c
@@ -483,7 +483,7 @@ scm_remove_from_port_table (SCM port)
long i = p->entry;
if (i >= scm_t_portable_size)
- SCM_MISC_ERROR ("Port not in table: ~S", SCM_LIST1 (port));
+ SCM_MISC_ERROR ("Port not in table: ~S", scm_list_1 (port));
if (p->putback_buf)
scm_must_free (p->putback_buf);
scm_must_free (p);