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

adjusted the automatic compilation in drracket so that it only avoids compiling files in the main collects dir

Browse Source
This commit is contained in:
Robby Findler 2010-08-24 09:40:50 -05:00
parent 0b71f65ba9
commit d98c5025cb
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
collects/drracket/private/module-language.rkt
View File

@ -248,10 +248,15 @@
(use-compiled-file-paths)))]))
(current-load/use-compiled (make-compilation-manager-load/use-compiled-handler))
(manager-skip-file-handler
(λ (p) (file-stamp-in-paths
p
(cons (CACHE-DIR) (current-library-collection-paths)))))))))
(let* ([cd (find-system-path 'collects-dir)]
[no-dirs (list (CACHE-DIR)
(if (relative-path? cd)
(find-executable-path
(find-system-path 'exec-file)
cd)
cd))])
(manager-skip-file-handler
(λ (p) (file-stamp-in-paths p no-dirs))))))))
(define/override (get-one-line-summary)
(string-constant module-language-one-line-summary))