~ chicken-core (chicken-5) 827218d1fcdce342e4e35bba95ad97edb52822f1
commit 827218d1fcdce342e4e35bba95ad97edb52822f1
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Dec 10 15:19:25 2010 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Fri Dec 10 15:19:25 2010 +0100
trivial change in message
diff --git a/library.scm b/library.scm
index 17198442..1c73a3d5 100644
--- a/library.scm
+++ b/library.scm
@@ -4414,7 +4414,7 @@ EOF
(set! working #t)
(let* ((c (##sys#slot ##sys#pending-finalizers 0)) )
(when (##sys#fudge 13)
- (print "[debug] running " c " finalizers (" (##sys#fudge 26) " live, "
+ (print "[debug] running " c " finalizer(s) (" (##sys#fudge 26) " live, "
(##sys#fudge 27) " allocated) ..."))
(do ([i 0 (fx+ i 1)])
((fx>= i c))
Trap