mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 21:40:33 +02:00
Code Activity

disable autocompilation when running guile-tools compile

Browse source 
* module/scripts/compile.scm (compile): Disable autocompilation when
  running guile-tools compile.
This commit is contained in:
Andy Wingo 2009-06-05 11:47:34 +02:00
parent b7393ea123
commit 5e89cd13c0
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
module/scripts/compile.scm
View file

@ -111,10 +111,13 @@ Compile each Guile source file FILE into a Guile object.
-f, --from=LANG specify a source language other than `scheme' -f, --from=LANG specify a source language other than `scheme'
-t, --to=LANG specify a target language other than `objcode' -t, --to=LANG specify a target language other than `objcode'
Note that autocompilation will be turned off.
Report bugs to <guile-user@gnu.org>.~%") Report bugs to <guile-user@gnu.org>.~%")
(exit 0))) (exit 0)))
(set! %load-path (append load-path %load-path)) (set! %load-path (append load-path %load-path))
(set! %load-should-autocompile #f)
(if (and output-file (if (and output-file
(or (null? input-files) (or (null? input-files)