From e8d727c8a505806520b44cdc246774ecf34549db Mon Sep 17 00:00:00 2001
From: Abdulaziz Ghuloum <aghuloum@cs.indiana.edu>
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)))]