(Arne Babenhauserheide)
2014-08-17: implemented equal indentation. implemented equal indentation.
diff --git a/wisp-scheme.w b/wisp-scheme.w
--- a/wisp-scheme.w
+++ b/wisp-scheme.w
@@ -245,6 +245,22 @@ define : wisp-indentation-to-parens line
. current-line
cdr unprocessed
. indentation-levels
+ : = (line-indent current-line) (line-indent next-line)
+ if : line-continues? current-line ; no parens needed
+ loop
+ append processed : list current-line
+ . next-line
+ cdr unprocessed
+ . indentation-levels
+ loop
+ append processed
+ list
+ line-prepend-n-parens 1
+ line-append-n-parens 1
+ . current-line
+ . next-line
+ cdr unprocessed
+ . indentation-levels
else
throw 'wisp-not-implemented "Still need to implement the line comparisons."