more bytecode for CS

dev-nonsettable
Matthew Butterick 5 years ago
parent 3b7c03f950
commit 98abad7b4b

@ -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))

@ -1 +1 @@
1588697216 1588777265

Loading…
Cancel
Save