Allow multi-line legacy define-c arg lists

This commit is contained in:
Justin Ethier 2021-03-09 22:36:35 -05:00
parent 8a0986cb0b
commit 93a548e106

View file

@ -2413,7 +2413,7 @@
(list->string
(filter
(lambda (c)
(not (member c '(#\( #\)))))
(not (member c '(#\newline #\( #\)))))
(string->list str))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;