(Arne Babenhauserheide)
2015-04-10: hopefully fixed pair killing hopefully fixed pair killing
diff --git a/wisp-scheme.w b/wisp-scheme.w --- a/wisp-scheme.w +++ b/wisp-scheme.w @@ -404,6 +404,9 @@ define : wisp-propagate-source-propertie cond : and (null? processed) (not (pair? unprocessed)) (not (list? unprocessed)) . unprocessed + : and (pair? unprocessed) (not (list? unprocessed)) + . (wisp-propagate-source-properties (car unprocessed)) + . . (wisp-propagate-source-properties (cdr unprocessed)) : null? unprocessed . processed else