new compiler handling, better trace into for _loader parts

original commit: 18a5652c46e9319a1f75ba819ef9788786cfc152
tokens
Matthew Flatt 27 years ago
commit 3056b8ace6

@ -1,19 +1,22 @@
(lambda (request failure) (let ([elaboration-time-files
(case request (list "awk.ss" "compatm.ss" "constan.ss" "defstru.ss"
[(name) "MzLib"] "macro.ss" "macrox.ss" "match.ss"
[(compile-prefix) '(begin "shared.ss"
(require-library "refer.ss") "spidey.ss" "synrule.ss" "trace.ss"
(require-library "mzlibs.ss") "mzlibs.ss" "cores.ss"
(require-library "constan.ss"))] "cmdlines.ss" "dates.ss" "strings.ss"
[(compile-omit-files) "compats.ss" "files.ss" "threads.ss"
(list "awk.ss" "compatm.ss" "constan.ss" "defstru.ss" "compiles.ss" "functios.ss" "pconvers.ss" "triggers.ss"
"macro.ss" "macrox.ss" "match.ss" "macroxr.ss" ; goes away after zodiac is fixed "inflates.ss" "prettys.ss" "zmaths.ss")])
"letplus.ss" "letplsrc.ss" "refer.ss" "shared.ss" (lambda (request failure)
"spidey.ss" "synrule.ss" "trace.ss" "sfunctor.ss" (case request
"mzlibs.ss" "cores.ss" [(name) "MzLib"]
"cmdlines.ss" "dates.ss" "strings.ss" [(compile-prefix) '(begin
"compats.ss" "files.ss" "threads.ss" (require-library "refer.ss")
"compiles.ss" "functios.ss" "pconvers.ss" "triggers.ss" (require-library "mzlibs.ss")
"inflates.ss" "prettys.ss" "zmaths.ss")] (require-library "constan.ss"))]
[else (failure)])) [(compile-omit-files) (append elaboration-time-files
(list "refer.ss" "letplsrc.ss" "sfunctor.ss"))]
[(compile-elaboration-zos) elaboration-time-files]
[else (failure)])))

Loading…
Cancel
Save