~ chicken-core (chicken-5) e53bea422fe8b80d3c9dec066fe5369ca17e9e58
commit e53bea422fe8b80d3c9dec066fe5369ca17e9e58 Author: Evan Hanson <evhan@foldling.org> AuthorDate: Tue Jul 14 21:34:12 2015 +1200 Commit: Evan Hanson <evhan@foldling.org> CommitDate: Tue Jul 14 21:34:12 2015 +1200 Use `print` for debug-mode printing Now that `pp` comes from the extras module, we can't rely on it having been imported anywhere `common-declarations.scm' is used since the chicken.extras import library may not have been built yet. (The use of `pp` can be restored after a release that includes a chicken.extras module.) diff --git a/common-declarations.scm b/common-declarations.scm index 843177bc..b3bbd4df 100644 --- a/common-declarations.scm +++ b/common-declarations.scm @@ -31,12 +31,9 @@ (debugbuild (define-syntax d (syntax-rules () - ((_ arg1) + ((_ arg ...) (when (##sys#fudge 13) ; debug-mode - (chicken.extras#pp arg1))) - ((_ arg1 more ...) - (when (##sys#fudge 13) - (print arg1 more ...)))))) + (print arg ...)))))) (else (begin (declareTrap