From e8d727c8a505806520b44cdc246774ecf34549db Mon Sep 17 00:00:00 2001 From: Abdulaziz Ghuloum Date: Sat, 13 Dec 2008 07:33:25 -0500 Subject: [PATCH] added printing of progress for guardians test (which takes along time) --- scheme/last-revision | 2 +- scheme/tests/guardians.ss | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/scheme/last-revision b/scheme/last-revision index bdc2aea..d75c403 100644 --- a/scheme/last-revision +++ b/scheme/last-revision @@ -1 +1 @@ -1717 +1718 diff --git a/scheme/tests/guardians.ss b/scheme/tests/guardians.ss index 1a19b9e..e2d9f59 100644 --- a/scheme/tests/guardians.ss +++ b/scheme/tests/guardians.ss @@ -25,6 +25,7 @@ (cond [(g) => (lambda (p) + (printf " [~s/~s]" i n) (assert (eq? (cdr p) ls)) (set! ls (cdr ls)) (f (+ i 1)))]