From a328b3fb4a14411d20e5dc0bfc541fedcb380737 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Sun, 7 Jan 2018 14:53:03 +0900 Subject: [PATCH] re-enable fixed tests --- lib/chibi/show-test.sld | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/chibi/show-test.sld b/lib/chibi/show-test.sld index a9ae25cb..e33196c4 100644 --- a/lib/chibi/show-test.sld +++ b/lib/chibi/show-test.sld @@ -503,7 +503,7 @@ equivalent to REVERSE. (lp (cdr ls) (kons (car ls) acc))))))))) - '(test + (test "(define (fold kons knil ls) ; The fundamental list iterator. (let lp ((ls ls) (acc knil)) ; Applies KONS to each element of (if (null? ls) ; LS and the result of the previous @@ -527,7 +527,7 @@ equivalent to REVERSE. (with ((width 36)) (wrapped "The fundamental list iterator. Applies KONS to each element of LS and the result of the previous application, beginning with KNIL. With KONS as CONS and KNIL as '(), equivalent to REVERSE.")))))) - '(test + (test "(define (fold kons knil ls) ; The fundamental list iterator. (let lp ((ls ls) (acc knil)) ; Applies KONS to each element of (if (null? ls) ; LS and the result of the previous