...

original commit: 26d01b12380e33b4b68118d2f62b9a8658a74028
1999-10-26 17:36:46 +00:00 · 1999-10-26 17:36:46 +00:00 · 00bc664bcd
commit 00bc664bcd
parent adf7bea91b
1 changed files with 1 additions and 1 deletions
--- a/collects/tests/framework/mem.ss
+++ b/collects/tests/framework/mem.ss
@ -40,7 +40,7 @@
               (collect-garbage))
             (let ([res (calc-results)])
               (when (<= res ,mem-cutoff)
-                 (set! anything #t)
+                 (set! anything? #t)
                 (make-object message% (format "~a: ~a of ~a~n" tag res ,mem-count) f)))))
         mem-boxes)
        (cond