~ chicken-core (chicken-5) 8deaf07f6622a51ee7199cc3f379bf2c76cff215
commit 8deaf07f6622a51ee7199cc3f379bf2c76cff215
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Tue Oct 12 10:54:57 2010 -0400
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Tue Oct 12 10:54:57 2010 -0400
disabled debugging output in scheduler
diff --git a/scheduler.scm b/scheduler.scm
index adbd2dd6..8fa8a77c 100644
--- a/scheduler.scm
+++ b/scheduler.scm
@@ -82,7 +82,7 @@ EOF
(include "common-declarations.scm")
-(begin
+#;(begin
(define stderr ##sys#standard-error) ; use default stderr port
(define (dbg . args)
(parameterize ((##sys#print-length-limit #f))
@@ -92,7 +92,7 @@ EOF
args)
(newline stderr))))
-#;(define-syntax dbg
+(define-syntax dbg
(syntax-rules ()
((_ . _) #f)))
Trap