[CM] [PATCH] Fix conditional compilation bug in file_display function

Jinser Kafka aimer at purejs.icu
Wed Sep 17 02:34:38 PDT 2025


The bug was introduced in commit bed4a92230c3c81a5f43f537399fa847471eb689
which changed the parameter name from 's' to 'str' but failed to update
the conditional compilation branch under WITH_WARNINGS, causing a
compilation error when WITH_WARNINGS is defined.

Fixes the fputs() call in the WITH_WARNINGS section to use the correct
parameter name 'str' instead of the old 's'.
---
 s7.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/s7.c b/s7.c
index 273f6d1..de0a33e 100644
--- a/s7.c
+++ b/s7.c
@@ -30183,7 +30183,7 @@ static void file_display(s7_scheme *sc, const char *str, s7_pointer port)
 	  port_position(port) = 0;
 	}
 #if WITH_WARNINGS
-      if (fputs(s, port_file(port)) == EOF)
+      if (fputs(str, port_file(port)) == EOF)
 	s7_warn(sc, 64, "write to %s: %s\n", port_filename(port), strerror(errno));
 #else
       fputs(str, port_file(port));
-- 
2.51.0



More information about the Cmdist mailing list