~ chicken-core (chicken-5) 5beba7488b92a9b622b09d348e0ac09ad9ce4963


commit 5beba7488b92a9b622b09d348e0ac09ad9ce4963
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Aug 20 14:54:30 2011 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sat Aug 20 14:54:30 2011 +0200

    disable debugging output in modules unit

diff --git a/modules.scm b/modules.scm
index 8bcb195b..a1d9f654 100644
--- a/modules.scm
+++ b/modules.scm
@@ -33,6 +33,8 @@
 
 (include "common-declarations.scm")
 
+(define-syntax d (syntax-rules () ((_ . _) (void))))
+
 (define-alias dd d)
 (define-alias dm d)
 (define-alias dx d)
Trap