diff options
Diffstat (limited to 'libguile/read.c')
-rw-r--r-- | libguile/read.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/read.c b/libguile/read.c index 5219334b4..cd9b2b521 100644 --- a/libguile/read.c +++ b/libguile/read.c @@ -1012,7 +1012,7 @@ scm_read_r6rs_block_comment (scm_t_wchar chr, SCM port) int c = scm_getc (port); if (c == EOF) - scm_i_input_error (__FUNCTION__, port, + scm_i_input_error ("scm_read_r6rs_block_comment", port, "unterminated `#| ... |#' comment", SCM_EOL); if (opening_seen) |