From 93a548e106a1c103355174745700cb3e5e90ee23 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Tue, 9 Mar 2021 22:36:35 -0500
Subject: [PATCH] Allow multi-line legacy define-c arg lists

---
 scheme/cyclone/cgen.sld | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scheme/cyclone/cgen.sld b/scheme/cyclone/cgen.sld
index 4193008e..c26fd872 100644
--- a/scheme/cyclone/cgen.sld
+++ b/scheme/cyclone/cgen.sld
@@ -2413,7 +2413,7 @@
   (list->string
     (filter
       (lambda (c)
-        (not (member c '(#\( #\)))))
+        (not (member c '(#\newline #\( #\)))))
       (string->list str))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;