summaryrefslogtreecommitdiff
path: root/libguile/fports.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/fports.c')
-rw-r--r--libguile/fports.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/fports.c b/libguile/fports.c
index fbd5eb443..6e1a895c8 100644
--- a/libguile/fports.c
+++ b/libguile/fports.c
@@ -193,7 +193,7 @@ scm_open_file (filename, modes)
port = scm_mkfile (SCM_ROCHARS (filename), SCM_ROCHARS (modes));
if (port == SCM_BOOL_F) {
- SCM_SYSERROR (s_open_file);
+ SCM_SYSERROR1 (s_open_file);
/* Force the compiler to keep filename and modes alive. */
scm_cons (filename, modes);
}