|
|
@ -61,7 +61,12 @@
|
|
|
|
|
|
|
|
|
|
|
|
(define my-caching-compile-proc (make-caching-managed-compile-zo))
|
|
|
|
(define my-caching-compile-proc (make-caching-managed-compile-zo))
|
|
|
|
(define (path->hash path)
|
|
|
|
(define (path->hash path)
|
|
|
|
(for-each my-caching-compile-proc (or (get-directory-require-files path) null))
|
|
|
|
(for ([p (in-list (or (get-directory-require-files path) null))])
|
|
|
|
|
|
|
|
(my-caching-compile-proc p))
|
|
|
|
|
|
|
|
(when (eq? (system-type 'vm) 'chez-scheme)
|
|
|
|
|
|
|
|
;; this makes builds faster, but a bytecode-caching bug in Racket BC
|
|
|
|
|
|
|
|
;; restricts it to CS for now
|
|
|
|
|
|
|
|
(my-caching-compile-proc path))
|
|
|
|
(apply hasheq
|
|
|
|
(apply hasheq
|
|
|
|
(let ([doc-key (setup:main-export)] [meta-key (setup:meta-export)])
|
|
|
|
(let ([doc-key (setup:main-export)] [meta-key (setup:meta-export)])
|
|
|
|
(unless (and (symbol? doc-key) (symbol? meta-key))
|
|
|
|
(unless (and (symbol? doc-key) (symbol? meta-key))
|
|
|
|