branch: elpa/geiser-chez
commit 21bc5bbd8c3a8defecc74d669bbcef7b2c86af15
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>
Delete trailing whitespace
---
scheme/chez/geiser/test.ss | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/scheme/chez/geiser/test.ss b/scheme/chez/geiser/test.ss
index a0259e1..2407448 100644
--- a/scheme/chez/geiser/test.ss
+++ b/scheme/chez/geiser/test.ss
@@ -58,7 +58,7 @@
;; (make-violation)
;;=> #<condition &violation>
(do-test
- '(make-violation)
+ '(make-violation)
"((result \"#<condition &violation>\\n\") (output . \"\"))\n")
;; (values 1 2 3)
@@ -118,4 +118,3 @@
rest)]
[(x1) (+ x1)]
[() (+)])) "((result \"(case-lambda\\n [(x1 x2) (+ x1 x2)]\\n [(x1 x2 x3)
(+ (+ x1 x2) x3)]\\n [(x1 x2 . rest)\\n ((letrec ([loop (lambda (x1 x2
rest)\\n (let ([x (+ x1 x2)])\\n (if
(null? rest)\\n x\\n (loop
x (car rest) (cdr rest)))))])\\n loop)\\n x1\\n x2\\n
rest)]\\n [(x1) (+ x1)]\\n [() (+)])\\n\") (output . \"\"))\n")
-
