From 3d2fd7a262702b41e6f2578b96c00b6d28310590 Mon Sep 17 00:00:00 2001 From: Matthew Wette Date: Mon, 7 Oct 2024 17:06:23 -0700 Subject: Fix typo in naming function set-current-output-port * libguile/ports.c(scm_set_current_output_port): scheme name is set-current-output-port --- libguile/ports.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libguile/ports.c b/libguile/ports.c index d0e4e0c7f..e9919a1e8 100644 --- a/libguile/ports.c +++ b/libguile/ports.c @@ -511,7 +511,7 @@ scm_set_current_input_port (SCM port) SCM scm_set_current_output_port (SCM port) -#define FUNC_NAME "scm-set-current-output-port" +#define FUNC_NAME "set-current-output-port" { SCM ooutp = scm_fluid_ref (cur_outport_fluid); port = SCM_COERCE_OUTPORT (port); -- cgit v1.2.3