~ 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