suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

dont show message if not compiling anything

Browse Source 
svn: r1336
This commit is contained in:
Eli Barzilay 2005-11-17 03:00:00 +00:00
parent 2c05b49878
commit 19c958cb3b
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/plot/pre-installer.ss
View File

@ -22,7 +22,6 @@
[so-name (build-path top-dir "compiled" "native" [so-name (build-path top-dir "compiled" "native"
(system-library-subpath) (system-library-subpath)
(append-extension-suffix libname))]) (append-extension-suffix libname))])
(printf "plot: compiling \"~a\" -> \"~a\"...\n" lib so-name)
(parameterize ([current-directory lib] (parameterize ([current-directory lib]
[current-extension-compiler-flags [current-extension-compiler-flags
(append (current-extension-compiler-flags) (append (current-extension-compiler-flags)
@ -42,7 +41,7 @@
(> (file-or-directory-modify-seconds f) (> (file-or-directory-modify-seconds f)
so-time)) so-time))
c-files))) c-files)))
(printf " Compiling \"~a\"\n" lib) (printf "plot: compiling \"~a\" -> \"~a\"...\n" lib so-name)
(make-directory* tmp-dir) (make-directory* tmp-dir)
(compile-c-extension-parts c-files tmp-dir) (compile-c-extension-parts c-files tmp-dir)
(parameterize ([current-directory tmp-dir]) (parameterize ([current-directory tmp-dir])