wisp
 
(Arne Babenhauserheide)
2014-08-17: TODO: check if vs. when

TODO: check if vs. when

diff --git a/wisp-scheme.w b/wisp-scheme.w
--- a/wisp-scheme.w
+++ b/wisp-scheme.w
@@ -84,8 +84,9 @@ define : wisp-scheme-read-chunk port
                  throw 'wisp-syntax-error "initial underscores without following whitespace at beginning of the line after" : last indent-and-symbols
                : or (equal? #\newline next-char) (equal? #\return next-char)
                  read-char port ; remove the newline
+                 ; TODO: Check whether when or if should be preferred here. guile 1.8 only has if.
                  if : and (equal? #\newline next-char) : equal? #\return : peek-char port
-                        read-char port ; remove a full \n\r. Damn special cases...
+                      read-char port ; remove a full \n\r. Damn special cases...
                  let* ; distinguish pure whitespace lines and lines
                       ; with comment by giving the former zero
                       ; indent. Lines with a comment at zero indent