~ 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