www

commit d2fa9e337088c7e6b8b26861e0978ee523c34431
parent fc47228c6f841ba7b1cee487e2dd559d50bf3725
Author: Georges Dupéron <georges.duperon@gmail.com>
Date:   Thu, 26 Jan 2017 06:24:54 +0100

Remove test output

Diffstat:
M
test/assumption-free-identifier-equal.rkt
 | 
4
++--
M
test/assumption-weak-hash.rkt
 | 
2
+-

2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/test/assumption-free-identifier-equal.rkt b/test/assumption-free-identifier-equal.rkt
@@ -14,7 +14,7 @@
     (let ([y 3])
       (define-syntax (compare stx)
         (define candidate (datum->syntax #'y 'x))
-        (displayln (free-identifier=? candidate inner))
-        (displayln (free-identifier=? candidate outer))
+        #;(displayln (free-identifier=? candidate inner))
+        #;(displayln (free-identifier=? candidate outer))
         #'(void))
       (compare))))
 \ No newline at end of file
diff --git a/test/assumption-weak-hash.rkt b/test/assumption-weak-hash.rkt
@@ -18,7 +18,7 @@
                    (gensym)))
     (displayln (hash->list h))
     (all-eq? (for/list ([range-b (in-range 5)])
-               ;(collect-garbage)
+               (collect-garbage)
                ;(collect-garbage)
                ;(collect-garbage)
                (hh)))))
 \ No newline at end of file