|
|
@ -61,7 +61,8 @@
|
|
|
|
|
|
|
|
|
|
|
|
(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 (cons path (or (get-directory-require-files path) null)))])
|
|
|
|
|
|
|
|
(my-caching-compile-proc p))
|
|
|
|
(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))
|
|
|
|