Support non-nested #| |# comment.
[mes.git] / tests / read.test
index 3ebfe31df6d0a054755dfff578da8672655d88af..5c9305a15f9f7c879624259ef97c83e8ec3fe958 100755 (executable)
@@ -32,6 +32,9 @@ cons
 #!
 barf
 !#
+#|
+burp
+|#
 #;(bla) (display "must see!\n")
 (display `(display ,display)) (newline)
 (display `(display ,@'(string port))) (newline)