diff options
Diffstat (limited to 'libguile/ports.c')
-rw-r--r-- | libguile/ports.c | 2 |
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); |