From 680149a066deef7263260d68a9bc6c4b183d5731 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Thu, 24 Dec 2015 02:21:16 -0500
Subject: [PATCH] Suppress unneeded write

---
 test.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test.scm b/test.scm
index 27d05fc2..d8a947be 100644
--- a/test.scm
+++ b/test.scm
@@ -25,7 +25,7 @@
                       ;(write tmp)
                       (cond
                        ((> (length tmp) 1000)
-                        (write "resetting tmp")
+                        ;(write "resetting tmp")
                         (set! tmp '()))
                        (else #f))
                       (loop))))