|
|
|
@ -9,10 +9,11 @@
|
|
|
|
(define max-places 8) ; number of parallel processes to spawn at a time
|
|
|
|
(define max-places 8) ; number of parallel processes to spawn at a time
|
|
|
|
|
|
|
|
|
|
|
|
(define paths-that-should-be-cached (for/list ([path (in-directory starting-dir)]
|
|
|
|
(define paths-that-should-be-cached (for/list ([path (in-directory starting-dir)]
|
|
|
|
#:when (or (preproc-source? path)
|
|
|
|
#:when (for/or ([proc (in-list (list preproc-source?
|
|
|
|
(markup-source? path)
|
|
|
|
markup-source?
|
|
|
|
(markdown-source? path)
|
|
|
|
markdown-source?
|
|
|
|
(pagetree-source? path)))
|
|
|
|
pagetree-source?))])
|
|
|
|
|
|
|
|
(proc path)))
|
|
|
|
path))
|
|
|
|
path))
|
|
|
|
|
|
|
|
|
|
|
|
;; if a file is already in the cache, no need to hit it again.
|
|
|
|
;; if a file is already in the cache, no need to hit it again.
|
|
|
|
|
