~ 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-intersperseTrap