~ chicken-core (chicken-5) 7313167f3aae755f4404030efd1ba002ef1df5e3


commit 7313167f3aae755f4404030efd1ba002ef1df5e3
Author:     felix <felix@y.(none)>
AuthorDate: Sat Feb 20 11:46:39 2010 +0100
Commit:     felix <felix@y.(none)>
CommitDate: Sat Feb 20 11:46:39 2010 +0100

    trivial change

diff --git a/csc.scm b/csc.scm
index a4399fa6..7564d71a 100644
--- a/csc.scm
+++ b/csc.scm
@@ -872,7 +872,8 @@ EOF
 	     (pathname-file target-filename))))
       (set! target (quotewrap target-filename))
       (unless (directory-exists? targetdir)
-	(print "creating " targetdir)
+	(when verbose
+	(print "mkdir " targetdir)
 	(create-directory targetdir)))
     (command
      (string-intersperse 
Trap