42725
#hash(((def ((lib "setup/path-to-relative.rkt") path->relative-string/library)) . ((32506 . 6))) ((def ((lib "compiler/zo-structs.rkt") phase-shift-cancel-id)) . ((46195 . 8))) ((def ((lib "compiler/zo-structs.rkt") make-expr)) . ((38938 . 4))) ((def ((lib "compiler/zo-structs.rkt") wrapped-tamper-status)) . ((44164 . 7))) ((def ((lib "setup/plt-single-installer.rkt") reindex-user-documentation)) . ((29349 . 2))) ((def ((lib "compiler/zo-structs.rkt") topsyntax)) . ((42327 . 7))) ((def ((lib "compiler/cm.rkt") make-caching-managed-compile-zo)) . ((974 . 7))) ((def ((lib "setup/getinfo.rkt") find-relevant-directories)) . ((31561 . 5))) ((def ((lib "compiler/zo-structs.rkt") free-id-info-phase0)) . ((44777 . 19))) ((def ((lib "compiler/compiler.rkt") compile-collection-zos)) . ((51583 . 12))) ((def ((lib "launcher/launcher.rkt") gracket-launcher-up-to-date?)) . ((16944 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:boxenv)) . ((41596 . 6))) ((def ((lib "compiler/zo-structs.rkt") make-beg0)) . ((43266 . 5))) ((def ((lib "compiler/zo-structs.rkt") branch)) . ((42784 . 7))) ((def ((lib "compiler/zo-structs.rkt") struct:phase-shift)) . ((46195 . 8))) ((def ((lib "compiler/zo-structs.rkt") phased-module-binding-phase)) . ((48353 . 13))) ((def ((lib "setup/pack.rkt") pack-collections-plt)) . ((18897 . 19))) ((def ((lib "compiler/zo-structs.rkt") nominal-module-binding)) . ((49499 . 6))) ((def ((lib "compiler/zo-structs.rkt") boxenv-body)) . ((41596 . 6))) ((def ((lib "compiler/zo-structs.rkt") global-bucket?)) . ((34368 . 5))) ((def ((lib "compiler/zo-structs.rkt") install-value)) . ((41091 . 9))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ call-install)) . ((27045 . 4))) ((def ((lib "launcher/launcher.rkt") racket-launcher-up-to-date?)) . ((17083 . 4))) ((def ((lib "compiler/zo-structs.rkt") make-provided)) . ((38584 . 10))) ((def ((lib "compiler/zo-structs.rkt") mod?)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") struct:primval)) . ((44021 . 5))) ((def ((lib "compiler/zo-structs.rkt") struct:seq-for-syntax)) . ((35513 . 8))) ((def ((lib "compiler/zo-structs.rkt") closure?)) . ((40267 . 6))) ((def ((lib "compiler/zo-structs.rkt") make-nominal-module-binding)) . ((49499 . 6))) ((def ((lib "launcher/launcher.rkt") racket-launcher-is-directory?)) . ((15251 . 2))) ((def ((lib "compiler/zo-structs.rkt") simple-nominal-path?)) . ((50056 . 5))) ((def ((lib "compiler/zo-structs.rkt") module-variable-phase)) . ((34506 . 8))) ((def ((lib "compiler/zo-structs.rkt") branch?)) . ((42784 . 7))) ((def ((lib "compiler/zo-structs.rkt") struct:with-cont-mark)) . ((43019 . 7))) ((def ((lib "compiler/zo-structs.rkt") seq-for-syntax-forms)) . ((35513 . 8))) ((def ((lib "compiler/zo-structs.rkt") closure-code)) . ((40267 . 6))) ((def ((lib "compiler/zo-structs.rkt") top-level-rename)) . ((44490 . 5))) ((def ((lib "compiler/zo-structs.rkt") case-lam-name)) . ((40422 . 6))) ((def ((lib "compiler/zo-structs.rkt") mark-barrier?)) . ((44637 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-module-variable)) . ((34506 . 8))) ((def ((lib "compiler/zo-structs.rkt") let-one-unused?)) . ((40608 . 8))) ((def ((lib "setup/getinfo.rkt") find-relevant-directory-records)) . ((31749 . 5))) ((def ((lib "compiler/zo-structs.rkt") module-variable-pos)) . ((34506 . 8))) ((def ((lib "compiler/xform.rkt") xform)) . ((50729 . 11))) ((def ((lib "compiler/zo-structs.rkt") let-rec-procs)) . ((41414 . 6))) ((def ((lib "compiler/cm.rkt") trust-existing-zos)) . ((868 . 4))) ((def ((lib "compiler/zo-structs.rkt") lam-num-params)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") phased-nominal-path-import-phase)) . ((50455 . 7))) ((def ((lib "setup/getinfo.rkt") directory-record-path)) . ((31916 . 8))) ((def ((lib "compiler/zo-structs.rkt") phased-module-binding-nominal-path)) . ((48353 . 13))) ((def ((lib "compiler/zo-structs.rkt") phased-nominal-path?)) . ((50455 . 7))) ((def ((lib "compiler/zo-structs.rkt") phased-nominal-path)) . ((50455 . 7))) ((def ((lib "compiler/zo-structs.rkt") struct:module-rename)) . ((46475 . 17))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ make-docs)) . ((26685 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:mark-barrier)) . ((44637 . 5))) ((def ((lib "compiler/zo-structs.rkt") struct:phased-module-binding)) . ((48353 . 13))) ((def ((lib "setup/pack.rkt") std-filter)) . ((22955 . 3))) ((def ((lib "setup/dirs.rkt") find-user-include-dir)) . ((30857 . 2))) ((def ((lib "compiler/zo-structs.rkt") with-cont-mark-body)) . ((43019 . 7))) ((def ((lib "compiler/zo-structs.rkt") mod-requires)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") with-cont-mark)) . ((43019 . 7))) ((def ((lib "setup/path-to-relative.rkt") path->relative-string/setup)) . ((32776 . 5))) ((def ((lib "setup/dirs.rkt") get-lib-search-dirs)) . ((30747 . 2))) ((def ((lib "compiler/zo-structs.rkt") make-form)) . ((34890 . 4))) ((def ((lib "compiler/zo-structs.rkt") top-level-rename-flag)) . ((44490 . 5))) ((def ((lib "setup/dirs.rkt") get-doc-search-dirs)) . ((30547 . 2))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ clean)) . ((26224 . 4))) ((def ((lib "compiler/zo-structs.rkt") all-from-module-phase)) . ((47247 . 17))) ((def ((lib "compiler/zo-structs.rkt") imported-nominal-path)) . ((50229 . 6))) ((def ((lib "launcher/launcher.rkt") mred-launcher-put-file-extension+style+filters)) . ((16274 . 5))) ((def ((lib "compiler/zo-parse.rkt") zo-parse)) . ((33447 . 3))) ((def ((lib "launcher/launcher.rkt") make-racket-program-launcher)) . ((12977 . 7))) ((def ((lib "compiler/zo-structs.rkt") make-phased-nominal-path)) . ((50455 . 7))) ((def ((lib "setup/getinfo.rkt") reset-relevant-directories-state!)) . ((32145 . 2))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ current-target-directory-getter)) . ((28430 . 4))) ((def ((lib "compiler/zo-structs.rkt") def-syntaxes?)) . ((35189 . 9))) ((def ((lib "compiler/cm.rkt") with-compile-output)) . ((2248 . 4))) ((def ((lib "launcher/launcher.rkt") mred-program-launcher-path)) . ((15992 . 3))) ((def ((lib "compiler/zo-structs.rkt") nominal-module-binding?)) . ((49499 . 6))) ((def ((lib "compiler/zo-structs.rkt") lam?)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") case-lam)) . ((40422 . 6))) ((def ((lib "setup/getinfo.rkt") directory-record-spec)) . ((31916 . 8))) ((def ((lib "compiler/zo-structs.rkt") let-rec-body)) . ((41414 . 6))) ((def ((lib "compiler/zo-structs.rkt") req)) . ((35815 . 6))) ((def ((lib "compiler/zo-structs.rkt") make-mark-barrier)) . ((44637 . 5))) ((def ((lib "compiler/zo-structs.rkt") branch-then)) . ((42784 . 7))) ((def ((lib "compiler/zo-structs.rkt") def-values?)) . ((34985 . 6))) ((def ((lib "compiler/zo-structs.rkt") varref)) . ((43415 . 6))) ((def ((lib "compiler/zo-structs.rkt") all-from-module-prefix)) . ((47247 . 17))) ((def ((lib "launcher/launcher.rkt") available-gracket-variants)) . ((17552 . 2))) ((def ((lib "compiler/zo-structs.rkt") struct:let-one)) . ((40608 . 8))) ((def ((lib "compiler/zo-structs.rkt") lexical-rename-alist)) . ((45651 . 12))) ((form ((lib "setup/option-sig.rkt") setup-option^)) . ((25821 . 2))) ((def ((lib "compiler/zo-structs.rkt") provided-nom-src)) . ((38584 . 10))) ((def ((lib "compiler/zo-structs.rkt") toplevel-pos)) . ((42071 . 8))) ((def ((lib "compiler/zo-structs.rkt") struct:module-binding)) . ((48061 . 4))) ((def ((lib "compiler/zo-structs.rkt") lam-closure-types)) . ((39035 . 24))) ((def ((lib "launcher/launcher.rkt") mred-launcher-up-to-date?)) . ((17675 . 4))) ((def ((lib "compiler/zo-structs.rkt") wrap?)) . ((44395 . 4))) ((form ((lib "compiler/sig.rkt") compiler^)) . ((53464 . 2))) ((def ((lib "compiler/zo-structs.rkt") exported-module-binding-path)) . ((49726 . 6))) ((def ((lib "compiler/zo-structs.rkt") imported-nominal-path-value)) . ((50229 . 6))) ((def ((lib "compiler/zo-structs.rkt") compilation-top)) . ((33801 . 7))) ((def ((lib "compiler/zo-structs.rkt") def-values)) . ((34985 . 6))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ parallel-workers)) . ((27325 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:exported-module-binding)) . ((49726 . 6))) ((def ((lib "compiler/zo-structs.rkt") exported-module-binding-export-name)) . ((49726 . 6))) ((def ((lib "compiler/zo-structs.rkt") mod-lang-info)) . ((36430 . 40))) ((def ((lib "setup/getinfo.rkt") directory-record)) . ((31916 . 8))) ((def ((lib "compiler/embed.rkt") write-module-bundle)) . ((10897 . 13))) ((def ((lib "setup/getinfo.rkt") directory-record-syms)) . ((31916 . 8))) ((def ((lib "launcher/launcher.rkt") current-launcher-variant)) . ((17431 . 4))) ((def ((lib "compiler/zo-structs.rkt") def-syntaxes-max-let-depth)) . ((35189 . 9))) ((def ((lib "compiler/zo-structs.rkt") struct:wrapped)) . ((44164 . 7))) ((def ((lib "compiler/zo-structs.rkt") all-from-module?)) . ((47247 . 17))) ((def ((lib "compiler/zo-structs.rkt") mod-max-let-depth)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") free-id-info-phase2)) . ((44777 . 19))) ((def ((lib "compiler/cm.rkt") manager-compile-notify-handler)) . ((1355 . 4))) ((def ((lib "compiler/zo-structs.rkt") make-apply-values)) . ((43809 . 6))) ((def ((lib "compiler/zo-structs.rkt") topsyntax-depth)) . ((42327 . 7))) ((def ((lib "compiler/zo-structs.rkt") make-application)) . ((42570 . 6))) ((def ((lib "compiler/zo-structs.rkt") zo)) . ((33714 . 4))) ((def ((lib "compiler/zo-structs.rkt") def-syntaxes-ids)) . ((35189 . 9))) ((def ((lib "compiler/zo-structs.rkt") varref?)) . ((43415 . 6))) ((def ((lib "compiler/bundle-dist.rkt") bundle-put-file-extension+style+filters)) . ((18720 . 5))) ((def ((lib "compiler/zo-structs.rkt") inline-variant)) . ((36258 . 6))) ((def ((lib "compiler/zo-structs.rkt") apply-values?)) . ((43809 . 6))) ((def ((lib "launcher/launcher.rkt") make-gracket-program-launcher)) . ((12733 . 7))) ((def ((lib "launcher/launcher.rkt") gracket-launcher-put-file-extension+style+filters)) . ((15619 . 5))) ((def ((lib "compiler/zo-structs.rkt") lam-toplevel-map)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") global-bucket-name)) . ((34368 . 5))) ((def ((lib "compiler/zo-structs.rkt") mod-internal-context)) . ((36430 . 40))) ((def ((lib "setup/plt-single-installer.rkt") run-single-installer)) . ((28889 . 4))) ((def ((lib "setup/getinfo.rkt") directory-record-min)) . ((31916 . 8))) ((def ((lib "compiler/zo-structs.rkt") phase-shift-src)) . ((46195 . 8))) ((def ((lib "compiler/zo-structs.rkt") simple-nominal-path-value)) . ((50056 . 5))) ((def ((lib "compiler/zo-structs.rkt") module-rename?)) . ((46475 . 17))) ((def ((lib "compiler/zo-structs.rkt") make-free-id-info)) . ((44777 . 19))) ((def ((lib "compiler/zo-structs.rkt") struct:req)) . ((35815 . 6))) ((def ((lib "launcher/launcher.rkt") racket-program-launcher-path)) . ((15115 . 3))) ((def ((lib "compiler/zo-structs.rkt") localref-flonum?)) . ((41784 . 9))) ((def ((lib "compiler/zo-structs.rkt") toplevel)) . ((42071 . 8))) ((def ((lib "setup/dirs.rkt") find-dll-dir)) . ((30653 . 2))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ compile-mode)) . ((26298 . 4))) ((def ((lib "compiler/zo-structs.rkt") module-variable-modidx)) . ((34506 . 8))) ((def ((lib "compiler/zo-structs.rkt") seq-for-syntax-max-let-depth)) . ((35513 . 8))) ((def ((lib "compiler/cm.rkt") manager-trace-handler)) . ((1512 . 4))) ((def ((lib "compiler/zo-structs.rkt") phase-shift-dest)) . ((46195 . 8))) ((def ((lib "compiler/zo-structs.rkt") req?)) . ((35815 . 6))) ((def ((lib "compiler/zo-structs.rkt") struct:install-value)) . ((41091 . 9))) ((def ((lib "setup/dirs.rkt") find-collects-dir)) . ((30291 . 2))) ((def ((lib "compiler/zo-structs.rkt") lexical-rename)) . ((45651 . 12))) ((def ((lib "compiler/zo-structs.rkt") wrapped)) . ((44164 . 7))) ((def ((lib "compiler/zo-structs.rkt") phase-shift)) . ((46195 . 8))) ((def ((lib "compiler/zo-structs.rkt") struct:def-values)) . ((34985 . 6))) ((def ((lib "compiler/zo-structs.rkt") struct:mod)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") prefix)) . ((34049 . 8))) ((def ((lib "launcher/launcher.rkt") mzscheme-launcher-up-to-date?)) . ((17811 . 4))) ((def ((lib "launcher/launcher.rkt") gracket-launcher-add-suffix)) . ((15438 . 3))) ((def ((lib "compiler/zo-structs.rkt") let-void)) . ((40864 . 7))) ((def ((lib "compiler/zo-marshal.rkt") zo-marshal)) . ((33645 . 3))) ((def ((lib "compiler/zo-structs.rkt") beg0-seq)) . ((43266 . 5))) ((def ((lib "setup/pack.rkt") pack)) . ((22003 . 26))) ((def ((lib "compiler/zo-structs.rkt") toplevel-const?)) . ((42071 . 8))) ((def ((lib "compiler/zo-structs.rkt") install-value-boxes?)) . ((41091 . 9))) ((def ((lib "compiler/zo-structs.rkt") make-nominal-path)) . ((49945 . 4))) ((def ((lib "compiler/option.rkt") compile-subcollections)) . ((53331 . 4))) ((def ((lib "compiler/cm.rkt") get-file-sha1)) . ((2099 . 3))) ((def ((lib "setup/pack.rkt") pack-collections)) . ((19863 . 15))) ((def ((lib "setup/dirs.rkt") find-include-dir)) . ((30800 . 2))) ((def ((lib "compiler/zo-structs.rkt") make-splice)) . ((36107 . 5))) ((def ((lib "setup/getinfo.rkt") make-directory-record)) . ((31916 . 8))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ make-launchers)) . ((26593 . 4))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ archives)) . ((28207 . 4))) ((def ((lib "compiler/zo-structs.rkt") let-one)) . ((40608 . 8))) ((def ((lib "compiler/zo-structs.rkt") struct:let-rec)) . ((41414 . 6))) ((def ((lib "compiler/zo-structs.rkt") topsyntax-midpt)) . ((42327 . 7))) ((def ((lib "compiler/zo-structs.rkt") make-phased-module-binding)) . ((48353 . 13))) ((def ((lib "compiler/option.rkt") verbose)) . ((53253 . 4))) ((def ((lib "compiler/zo-structs.rkt") free-id-info-symbol0)) . ((44777 . 19))) ((def ((lib "compiler/zo-structs.rkt") splice?)) . ((36107 . 5))) ((def ((lib "compiler/zo-structs.rkt") localref?)) . ((41784 . 9))) ((def ((lib "compiler/zo-structs.rkt") module-rename-renames)) . ((46475 . 17))) ((def ((lib "setup/plt-installer.rkt") run-installer)) . ((29678 . 3))) ((def ((lib "compiler/cm-accomplice.rkt") register-external-file)) . ((4703 . 3))) ((def ((lib "compiler/zo-structs.rkt") expr?)) . ((38938 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:closure)) . ((40267 . 6))) ((def ((lib "compiler/zo-structs.rkt") make-exported-module-binding)) . ((49726 . 6))) ((def ((lib "compiler/zo-structs.rkt") free-id-info-symbol1)) . ((44777 . 19))) ((def ((lib "compiler/zo-structs.rkt") localref)) . ((41784 . 9))) ((def ((lib "compiler/zo-structs.rkt") topsyntax?)) . ((42327 . 7))) ((def ((lib "compiler/option-unit.rkt") compiler:option@)) . ((53565 . 2))) ((def ((lib "launcher/launcher.rkt") install-racket-program-launcher)) . ((13466 . 7))) ((def ((lib "setup/dirs.rkt") find-lib-dir)) . ((30600 . 2))) ((def ((lib "compiler/compiler.rkt") current-compiler-dynamic-require-wrapper)) . ((52975 . 5))) ((def ((lib "compiler/zo-structs.rkt") struct:expr)) . ((38938 . 4))) ((def ((lib "compiler/zo-structs.rkt") beg0?)) . ((43266 . 5))) ((def ((lib "compiler/zo-structs.rkt") application)) . ((42570 . 6))) ((def ((lib "launcher/launcher.rkt") mzscheme-launcher-add-suffix)) . ((16664 . 3))) ((def ((lib "compiler/zo-structs.rkt") assign?)) . ((43605 . 7))) ((def ((lib "setup/dirs.rkt") find-user-lib-dir)) . ((30706 . 2))) ((def ((lib "setup/getinfo.rkt") directory-record?)) . ((31916 . 8))) ((def ((lib "compiler/zo-marshal.rkt") zo-marshal-to)) . ((33544 . 4))) ((def ((lib "compiler/cm.rkt") compile-lock->parallel-lock-client)) . ((3163 . 6))) ((def ((lib "compiler/zo-structs.rkt") application-rands)) . ((42570 . 6))) ((def ((lib "setup/getinfo.rkt") struct:directory-record)) . ((31916 . 8))) ((def ((lib "launcher/launcher.rkt") mred-launcher-is-directory?)) . ((16069 . 2))) ((def ((lib "compiler/zo-structs.rkt") phased-module-binding-export-name)) . ((48353 . 13))) ((def ((lib "compiler/zo-structs.rkt") nominal-module-binding-path)) . ((49499 . 6))) ((def ((lib "setup/plt-single-installer.rkt") install-planet-package)) . ((29036 . 8))) ((def ((lib "compiler/zo-structs.rkt") struct:compilation-top)) . ((33801 . 7))) ((def ((lib "compiler/zo-structs.rkt") install-value-pos)) . ((41091 . 9))) ((def ((lib "compiler/zo-structs.rkt") struct:module-variable)) . ((34506 . 8))) ((def ((lib "compiler/zo-structs.rkt") provided-src)) . ((38584 . 10))) ((def ((lib "compiler/zo-structs.rkt") mod-prefix)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") make-case-lam)) . ((40422 . 6))) ((def ((lib "compiler/zo-structs.rkt") closure)) . ((40267 . 6))) ((def ((lib "compiler/zo-structs.rkt") struct:nominal-module-binding)) . ((49499 . 6))) ((def ((lib "compiler/zo-structs.rkt") module-binding)) . ((48061 . 4))) ((def ((lib "compiler/zo-structs.rkt") case-lam?)) . ((40422 . 6))) ((def ((lib "compiler/zo-structs.rkt") module-rename-mark-renames)) . ((46475 . 17))) ((def ((lib "compiler/zo-structs.rkt") zo?)) . ((33714 . 4))) ((def ((lib "compiler/zo-structs.rkt") simple-module-binding-path)) . ((48176 . 5))) ((def ((lib "compiler/zo-structs.rkt") module-variable-sym)) . ((34506 . 8))) ((def ((lib "compiler/zo-structs.rkt") make-branch)) . ((42784 . 7))) ((def ((lib "compiler/zo-structs.rkt") let-rec)) . ((41414 . 6))) ((def ((lib "compiler/zo-structs.rkt") seq-for-syntax?)) . ((35513 . 8))) ((def ((lib "compiler/zo-structs.rkt") struct:application)) . ((42570 . 6))) ((def ((lib "compiler/zo-structs.rkt") make-top-level-rename)) . ((44490 . 5))) ((def ((lib "compiler/zo-structs.rkt") boxenv)) . ((41596 . 6))) ((def ((lib "compiler/zo-structs.rkt") let-void?)) . ((40864 . 7))) ((def ((lib "compiler/zo-structs.rkt") struct:zo)) . ((33714 . 4))) ((def ((lib "compiler/zo-structs.rkt") let-one-flonum?)) . ((40608 . 8))) ((def ((lib "compiler/zo-structs.rkt") make-module-rename)) . ((46475 . 17))) ((def ((lib "compiler/zo-structs.rkt") def-values-rhs)) . ((34985 . 6))) ((def ((lib "compiler/compiler-unit.rkt") compiler@)) . ((53539 . 2))) ((def ((lib "compiler/zo-structs.rkt") seq)) . ((35962 . 5))) ((def ((lib "setup/dirs.rkt") absolute-installation?)) . ((31077 . 2))) ((def ((lib "compiler/zo-structs.rkt") struct:apply-values)) . ((43809 . 6))) ((def ((lib "compiler/zo-structs.rkt") mod-provides)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") exported-nominal-module-binding-path)) . ((48976 . 12))) ((def ((lib "compiler/zo-structs.rkt") branch-test)) . ((42784 . 7))) ((def ((lib "compiler/zo-structs.rkt") all-from-module-context)) . ((47247 . 17))) ((def ((lib "compiler/zo-structs.rkt") mark-barrier-value)) . ((44637 . 5))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ make-user)) . ((26767 . 4))) ((def ((lib "launcher/launcher.rkt") racket-launcher-put-file-extension+style+filters)) . ((15806 . 5))) ((def ((lib "launcher/launcher.rkt") gracket-program-launcher-path)) . ((15035 . 3))) ((def ((lib "compiler/zo-structs.rkt") prefix?)) . ((34049 . 8))) ((def ((lib "setup/setup-unit.rkt") setup@)) . ((25768 . 2))) ((def ((lib "compiler/zo-structs.rkt") stx)) . ((34765 . 5))) ((def ((lib "compiler/cm.rkt") manager-skip-file-handler)) . ((1655 . 5))) ((def ((lib "compiler/zo-structs.rkt") mod-body)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") with-cont-mark?)) . ((43019 . 7))) ((def ((lib "setup/parallel-build.rkt") parallel-compile-files)) . ((3440 . 12))) ((def ((lib "compiler/zo-structs.rkt") struct:exported-nominal-module-binding)) . ((48976 . 12))) ((def ((lib "launcher/launcher.rkt") mzscheme-program-launcher-path)) . ((16458 . 3))) ((def ((lib "compiler/zo-structs.rkt") def-syntaxes-rhs)) . ((35189 . 9))) ((def ((lib "setup/xref.rkt") load-collections-xref)) . ((33271 . 3))) ((def ((lib "compiler/zo-structs.rkt") all-from-module-src-phase)) . ((47247 . 17))) ((def ((lib "compiler/zo-structs.rkt") closure-gen-id)) . ((40267 . 6))) ((def ((lib "compiler/zo-structs.rkt") lam-rest?)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") simple-module-binding)) . ((48176 . 5))) ((def ((lib "setup/dirs.rkt") find-gui-bin-dir)) . ((31020 . 2))) ((def ((lib "compiler/zo-structs.rkt") provided-src-phase)) . ((38584 . 10))) ((def ((lib "compiler/zo-structs.rkt") def-syntaxes-prefix)) . ((35189 . 9))) ((def ((lib "compiler/zo-structs.rkt") make-module-binding)) . ((48061 . 4))) ((def ((lib "compiler/zo-structs.rkt") assign-rhs)) . ((43605 . 7))) ((def ((lib "compiler/embed.rkt") embedding-executable-add-suffix)) . ((12002 . 5))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ make-verbose)) . ((26040 . 4))) ((def ((lib "compiler/zo-structs.rkt") lam-name)) . ((39035 . 24))) ((def ((lib "compiler/compiler.rkt") compile-directory-zos)) . ((52189 . 16))) ((def ((lib "setup/getinfo.rkt") directory-record-maj)) . ((31916 . 8))) ((def ((lib "compiler/cm.rkt") make-compile-lock)) . ((3390 . 2))) ((def ((lib "compiler/zo-structs.rkt") toplevel-depth)) . ((42071 . 8))) ((def ((lib "compiler/zo-structs.rkt") branch-else)) . ((42784 . 7))) ((def ((lib "compiler/zo-structs.rkt") exported-module-binding?)) . ((49726 . 6))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ make-info-domain)) . ((26497 . 4))) ((def ((lib "launcher/launcher.rkt") mzscheme-launcher-is-directory?)) . ((16539 . 2))) ((def ((lib "setup/link.rkt") links)) . ((4797 . 24))) ((def ((lib "compiler/zo-structs.rkt") def-values-ids)) . ((34985 . 6))) ((def ((lib "compiler/zo-structs.rkt") struct:imported-nominal-path)) . ((50229 . 6))) ((def ((lib "compiler/zo-structs.rkt") lam-body)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") toplevel?)) . ((42071 . 8))) ((def ((lib "compiler/zo-structs.rkt") with-cont-mark-key)) . ((43019 . 7))) ((def ((lib "compiler/zo-structs.rkt") provided?)) . ((38584 . 10))) ((def ((lib "compiler/zo-structs.rkt") exported-nominal-module-binding-nominal-path)) . ((48976 . 12))) ((def ((lib "compiler/cm.rkt") make-compilation-manager-load/use-compiled-handler)) . ((0 . 7))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ compiler-verbose)) . ((26128 . 4))) ((def ((lib "setup/parallel-build.rkt") parallel-compile)) . ((3996 . 17))) ((def ((lib "raco/command-name.rkt") current-command-name)) . ((53598 . 4))) ((def ((lib "compiler/zo-structs.rkt") make-compilation-top)) . ((33801 . 7))) ((def ((lib "compiler/zo-structs.rkt") lexical-rename-has-free-id-info?)) . ((45651 . 12))) ((form ((lib "launcher/launcher-sig.rkt") launcher^)) . ((18073 . 2))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ current-target-plt-directory-getter)) . ((28587 . 9))) ((def ((lib "compiler/bundle-dist.rkt") bundle-directory)) . ((18570 . 5))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ setup-program-name)) . ((25859 . 4))) ((def ((lib "compiler/zo-structs.rkt") make-prefix)) . ((34049 . 8))) ((def ((lib "setup/dirs.rkt") find-user-collects-dir)) . ((30349 . 2))) ((def ((lib "setup/plt-installer.rkt") with-installer-window)) . ((29860 . 6))) ((def ((lib "setup/dirs.rkt") find-console-bin-dir)) . ((30959 . 2))) ((def ((lib "compiler/zo-structs.rkt") mod-unexported)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") free-id-info-use-current-inspector?)) . ((44777 . 19))) ((def ((lib "setup/option-unit.rkt") setup:option@)) . ((25791 . 2))) ((def ((lib "launcher/launcher.rkt") mred-launcher-is-actually-directory?)) . ((16123 . 2))) ((def ((lib "setup/main-collects.rkt") main-collects-relative->path)) . ((32350 . 4))) ((def ((lib "compiler/zo-structs.rkt") primval)) . ((44021 . 5))) ((def ((lib "compiler/zo-structs.rkt") all-from-module)) . ((47247 . 17))) ((def ((lib "launcher/launcher.rkt") make-racket-launcher)) . ((12557 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-varref)) . ((43415 . 6))) ((def ((lib "compiler/zo-structs.rkt") inline-variant?)) . ((36258 . 6))) ((def ((lib "compiler/zo-structs.rkt") apply-values)) . ((43809 . 6))) ((form ((lib "compiler/sig.rkt") compiler:option^)) . ((53498 . 2))) ((def ((lib "compiler/zo-structs.rkt") struct:topsyntax)) . ((42327 . 7))) ((def ((lib "launcher/launcher.rkt") mzscheme-launcher-put-file-extension+style+filters)) . ((16756 . 5))) ((def ((lib "compiler/zo-structs.rkt") struct:provided)) . ((38584 . 10))) ((def ((lib "launcher/launcher.rkt") make-mzscheme-program-launcher)) . ((14537 . 7))) ((def ((lib "setup/pack.rkt") mztar)) . ((23018 . 11))) ((def ((lib "compiler/zo-structs.rkt") def-syntaxes)) . ((35189 . 9))) ((def ((lib "compiler/zo-structs.rkt") varref-toplevel)) . ((43415 . 6))) ((def ((lib "compiler/compiler.rkt") compile-zos)) . ((51142 . 11))) ((def ((lib "compiler/zo-structs.rkt") inline-variant-direct)) . ((36258 . 6))) ((def ((lib "compiler/zo-structs.rkt") struct:assign)) . ((43605 . 7))) ((def ((lib "launcher/launcher.rkt") install-gracket-program-launcher)) . ((13218 . 7))) ((def ((lib "compiler/zo-structs.rkt") make-phase-shift)) . ((46195 . 8))) ((def ((lib "compiler/zo-structs.rkt") lam-max-let-depth)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") free-id-info-path0)) . ((44777 . 19))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ force-unpacks)) . ((27460 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:global-bucket)) . ((34368 . 5))) ((def ((lib "compiler/zo-structs.rkt") mod-pre-submodules)) . ((36430 . 40))) ((def ((lib "launcher/launcher-unit.rkt") launcher@)) . ((18107 . 2))) ((def ((lib "compiler/zo-structs.rkt") make-zo)) . ((33714 . 4))) ((def ((lib "compiler/zo-structs.rkt") localref-other-clears?)) . ((41784 . 9))) ((def ((lib "launcher/launcher.rkt") install-mred-program-launcher)) . ((14120 . 7))) ((def ((lib "raco/command-name.rkt") short-program+command-name)) . ((53729 . 2))) ((def ((lib "compiler/zo-structs.rkt") simple-nominal-path)) . ((50056 . 5))) ((def ((lib "compiler/zo-structs.rkt") module-rename-set-id)) . ((46475 . 17))) ((def ((lib "compiler/zo-structs.rkt") seq-forms)) . ((35962 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-global-bucket)) . ((34368 . 5))) ((def ((lib "compiler/zo-structs.rkt") splice-forms)) . ((36107 . 5))) ((def ((lib "compiler/zo-structs.rkt") expr)) . ((38938 . 4))) ((def ((lib "compiler/option.rkt") somewhat-verbose)) . ((53157 . 4))) ((def ((lib "compiler/zo-structs.rkt") wrapped?)) . ((44164 . 7))) ((def ((lib "compiler/zo-structs.rkt") struct:wrap)) . ((44395 . 4))) ((def ((lib "compiler/zo-structs.rkt") module-variable)) . ((34506 . 8))) ((def ((lib "compiler/zo-structs.rkt") seq-for-syntax-prefix)) . ((35513 . 8))) ((def ((lib "compiler/zo-structs.rkt") struct:all-from-module)) . ((47247 . 17))) ((def ((lib "compiler/zo-structs.rkt") make-req)) . ((35815 . 6))) ((def ((lib "compiler/zo-structs.rkt") seq?)) . ((35962 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-lexical-rename)) . ((45651 . 12))) ((def ((lib "compiler/zo-structs.rkt") form)) . ((34890 . 4))) ((def ((lib "compiler/zo-structs.rkt") install-value-body)) . ((41091 . 9))) ((def ((lib "compiler/zo-structs.rkt") module-variable?)) . ((34506 . 8))) ((def ((lib "compiler/zo-structs.rkt") make-mod)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") stx-encoded)) . ((34765 . 5))) ((def ((lib "compiler/zo-structs.rkt") form?)) . ((34890 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:beg0)) . ((43266 . 5))) ((def ((lib "setup/unpack.rkt") unpack)) . ((23410 . 20))) ((def ((lib "compiler/zo-structs.rkt") req-dummy)) . ((35815 . 6))) ((def ((lib "compiler/zo-structs.rkt") struct:seq)) . ((35962 . 5))) ((def ((lib "launcher/launcher.rkt") available-mred-variants)) . ((17951 . 2))) ((def ((lib "compiler/zo-structs.rkt") struct:prefix)) . ((34049 . 8))) ((def ((lib "compiler/zo-structs.rkt") struct:splice)) . ((36107 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-let-void)) . ((40864 . 7))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ make-planet)) . ((26849 . 4))) ((def ((lib "compiler/zo-structs.rkt") prefix-stxs)) . ((34049 . 8))) ((def ((lib "compiler/zo-structs.rkt") make-let-one)) . ((40608 . 8))) ((def ((lib "compiler/zo-structs.rkt") phased-module-binding?)) . ((48353 . 13))) ((def ((lib "compiler/zo-structs.rkt") module-binding?)) . ((48061 . 4))) ((def ((lib "compiler/zo-structs.rkt") free-id-info?)) . ((44777 . 19))) ((def ((lib "compiler/zo-structs.rkt") localref-clear?)) . ((41784 . 9))) ((def ((lib "compiler/zo-structs.rkt") module-rename-plus-kern?)) . ((46475 . 17))) ((def ((lib "compiler/cm.rkt") get-compiled-file-sha1)) . ((2169 . 3))) ((def ((lib "compiler/zo-structs.rkt") struct:simple-module-binding)) . ((48176 . 5))) ((def ((lib "launcher/launcher.rkt") make-mzscheme-launcher)) . ((14359 . 5))) ((def ((lib "launcher/launcher.rkt") mred-launcher-add-suffix)) . ((16186 . 3))) ((def ((lib "compiler/zo-structs.rkt") exported-nominal-module-binding-export-name)) . ((48976 . 12))) ((def ((lib "setup/plt-installer.rkt") on-installer-run)) . ((29755 . 4))) ((def ((lib "compiler/zo-structs.rkt") topsyntax-pos)) . ((42327 . 7))) ((def ((lib "compiler/zo-structs.rkt") primval?)) . ((44021 . 5))) ((def ((lib "compiler/zo-structs.rkt") assign)) . ((43605 . 7))) ((def ((lib "compiler/zo-structs.rkt") nominal-module-binding-nominal-path)) . ((49499 . 6))) ((def ((lib "compiler/zo-structs.rkt") let-void-body)) . ((40864 . 7))) ((def ((lib "compiler/zo-structs.rkt") boxenv-pos)) . ((41596 . 6))) ((def ((lib "compiler/zo-structs.rkt") mod-post-submodules)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") exported-module-binding)) . ((49726 . 6))) ((def ((lib "setup/plt-single-installer.rkt") clean-planet-package)) . ((29399 . 7))) ((def ((lib "compiler/distribute.rkt") assemble-distribution)) . ((18133 . 9))) ((def ((lib "compiler/zo-structs.rkt") free-id-info-phase1)) . ((44777 . 19))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ make-zo)) . ((26419 . 4))) ((def ((lib "compiler/zo-structs.rkt") install-value?)) . ((41091 . 9))) ((def ((lib "setup/main-collects.rkt") path->main-collects-relative)) . ((32202 . 4))) ((def ((lib "compiler/zo-structs.rkt") provided-src-name)) . ((38584 . 10))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ verbose)) . ((25962 . 4))) ((def ((lib "compiler/zo-structs.rkt") mod-self-modidx)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") phase-shift-amt)) . ((46195 . 8))) ((def ((lib "compiler/zo-structs.rkt") make-seq-for-syntax)) . ((35513 . 8))) ((def ((lib "compiler/zo-structs.rkt") application-rator)) . ((42570 . 6))) ((def ((lib "launcher/launcher.rkt") available-racket-variants)) . ((17614 . 2))) ((def ((lib "compiler/zo-structs.rkt") boxenv?)) . ((41596 . 6))) ((def ((lib "compiler/zo-structs.rkt") compilation-top-max-let-depth)) . ((33801 . 7))) ((def ((lib "compiler/zo-structs.rkt") make-install-value)) . ((41091 . 9))) ((def ((lib "compiler/embed-unit.rkt") compiler:embed@)) . ((12208 . 2))) ((def ((lib "compiler/zo-structs.rkt") let-void-boxes?)) . ((40864 . 7))) ((def ((lib "compiler/zo-structs.rkt") make-simple-nominal-path)) . ((50056 . 5))) ((def ((lib "compiler/zo-structs.rkt") mod-srcname)) . ((36430 . 40))) ((def ((lib "launcher/launcher.rkt") gracket-launcher-is-directory?)) . ((15194 . 2))) ((def ((lib "compiler/zo-structs.rkt") make-closure)) . ((40267 . 6))) ((def ((lib "setup/dirs.rkt") get-collects-search-dirs)) . ((30395 . 2))) ((def ((lib "compiler/zo-structs.rkt") top-level-rename?)) . ((44490 . 5))) ((def ((lib "compiler/zo-structs.rkt") case-lam-clauses)) . ((40422 . 6))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ archive-implies-reindex)) . ((28320 . 4))) ((def ((lib "compiler/zo-structs.rkt") make-def-values)) . ((34985 . 6))) ((def ((lib "compiler/zo-structs.rkt") struct:varref)) . ((43415 . 6))) ((def ((lib "compiler/zo-structs.rkt") module-rename-phase)) . ((46475 . 17))) ((def ((lib "compiler/embed.rkt") embedding-executable-put-file-extension+style+filters)) . ((11784 . 6))) ((def ((lib "compiler/zo-structs.rkt") let-rec?)) . ((41414 . 6))) ((def ((lib "compiler/zo-structs.rkt") seq-for-syntax)) . ((35513 . 8))) ((def ((lib "compiler/zo-structs.rkt") lam-flags)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") phased-nominal-path-phase)) . ((50455 . 7))) ((def ((lib "compiler/zo-structs.rkt") make-boxenv)) . ((41596 . 6))) ((def ((lib "compiler/zo-structs.rkt") let-one-body)) . ((40608 . 8))) ((def ((lib "compiler/zo-structs.rkt") module-rename)) . ((46475 . 17))) ((def ((lib "launcher/launcher.rkt") available-mzscheme-variants)) . ((18010 . 2))) ((def ((lib "compiler/zo-structs.rkt") apply-values-proc)) . ((43809 . 6))) ((def ((lib "compiler/zo-structs.rkt") mod-syntax-bodies)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") make-with-cont-mark)) . ((43019 . 7))) ((def ((lib "compiler/zo-structs.rkt") exported-nominal-module-binding)) . ((48976 . 12))) ((def ((lib "compiler/zo-structs.rkt") struct:form)) . ((34890 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:top-level-rename)) . ((44490 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-def-syntaxes)) . ((35189 . 9))) ((def ((lib "compiler/zo-structs.rkt") phased-module-binding)) . ((48353 . 13))) ((def ((lib "launcher/launcher.rkt") install-mzscheme-program-launcher)) . ((14784 . 7))) ((def ((lib "compiler/zo-structs.rkt") lam-closure-map)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") make-simple-module-binding)) . ((48176 . 5))) ((def ((lib "compiler/zo-structs.rkt") with-cont-mark-val)) . ((43019 . 7))) ((def ((lib "compiler/zo-structs.rkt") phased-nominal-path-value)) . ((50455 . 7))) ((def ((lib "compiler/zo-structs.rkt") compilation-top-prefix)) . ((33801 . 7))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ call-post-install)) . ((27133 . 4))) ((def ((lib "compiler/zo-structs.rkt") phased-module-binding-path)) . ((48353 . 13))) ((def ((lib "launcher/launcher.rkt") make-mred-launcher)) . ((13711 . 5))) ((def ((lib "launcher/launcher.rkt") racket-launcher-add-suffix)) . ((15529 . 3))) ((def ((lib "compiler/zo-structs.rkt") lam-param-types)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") simple-module-binding?)) . ((48176 . 5))) ((form ((lib "compiler/embed-sig.rkt") compiler:embed^)) . ((12168 . 2))) ((def ((lib "compiler/zo-structs.rkt") struct:phased-nominal-path)) . ((50455 . 7))) ((def ((lib "compiler/zo-structs.rkt") struct:inline-variant)) . ((36258 . 6))) ((def ((lib "compiler/zo-structs.rkt") mark-barrier)) . ((44637 . 5))) ((def ((lib "compiler/zo-structs.rkt") wrap)) . ((44395 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:case-lam)) . ((40422 . 6))) ((def ((lib "compiler/zo-structs.rkt") make-assign)) . ((43605 . 7))) ((def ((lib "compiler/zo-structs.rkt") all-from-module-exceptions)) . ((47247 . 17))) ((def ((lib "compiler/cm.rkt") file-stamp-in-paths)) . ((1965 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-lam)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") lexical-rename-bool2)) . ((45651 . 12))) ((def ((lib "compiler/zo-structs.rkt") make-imported-nominal-path)) . ((50229 . 6))) ((def ((lib "compiler/zo-structs.rkt") provided-protected?)) . ((38584 . 10))) ((def ((lib "compiler/zo-structs.rkt") make-toplevel)) . ((42071 . 8))) ((def ((lib "compiler/zo-structs.rkt") phased-module-binding-nominal-export-name)) . ((48353 . 13))) ((def ((lib "compiler/zo-structs.rkt") struct:lam)) . ((39035 . 24))) ((def ((lib "compiler/zo-structs.rkt") free-id-info)) . ((44777 . 19))) ((def ((lib "compiler/zo-structs.rkt") assign-undef-ok?)) . ((43605 . 7))) ((def ((lib "compiler/zo-structs.rkt") exported-nominal-module-binding?)) . ((48976 . 12))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ avoid-main-installation)) . ((26935 . 4))) ((def ((lib "setup/pack.rkt") pack-plt)) . ((20533 . 30))) ((def ((lib "compiler/zo-structs.rkt") imported-nominal-path?)) . ((50229 . 6))) ((def ((lib "compiler/zo-structs.rkt") make-let-rec)) . ((41414 . 6))) ((def ((lib "setup/getinfo.rkt") get-info)) . ((31119 . 8))) ((def ((lib "compiler/zo-structs.rkt") primval-id)) . ((44021 . 5))) ((def ((lib "setup/unpack.rkt") fold-plt-archive)) . ((24364 . 29))) ((def ((lib "compiler/zo-structs.rkt") make-exported-nominal-module-binding)) . ((48976 . 12))) ((def ((lib "setup/dirs.rkt") find-doc-dir)) . ((30453 . 2))) ((def ((lib "setup/dirs.rkt") get-include-search-dirs)) . ((30902 . 2))) ((def ((lib "launcher/launcher.rkt") racket-launcher-is-actually-directory?)) . ((15373 . 2))) ((def ((lib "compiler/embed.rkt") embedding-executable-is-directory?)) . ((11600 . 3))) ((def ((lib "compiler/zo-structs.rkt") compilation-top-code)) . ((33801 . 7))) ((def ((lib "compiler/zo-structs.rkt") lam)) . ((39035 . 24))) ((def ((lib "setup/dirs.rkt") find-user-doc-dir)) . ((30506 . 2))) ((def ((lib "compiler/decompile.rkt") decompile)) . ((33380 . 3))) ((def ((lib "compiler/zo-structs.rkt") def-syntaxes-dummy)) . ((35189 . 9))) ((def ((lib "compiler/zo-structs.rkt") wrapped-datum)) . ((44164 . 7))) ((def ((lib "compiler/zo-structs.rkt") all-from-module-path)) . ((47247 . 17))) ((def ((lib "compiler/zo-structs.rkt") mod-dummy)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") compilation-top?)) . ((33801 . 7))) ((def ((lib "compiler/zo-structs.rkt") imported-nominal-path-import-phase)) . ((50229 . 6))) ((def ((lib "launcher/launcher.rkt") make-mred-program-launcher)) . ((13885 . 7))) ((def ((lib "setup/plt-installer.rkt") run-single-installer)) . ((30099 . 4))) ((def ((lib "compiler/embed.rkt") make-embedding-executable)) . ((9389 . 29))) ((def ((lib "compiler/zo-structs.rkt") struct:lexical-rename)) . ((45651 . 12))) ((def ((lib "compiler/zo-structs.rkt") make-primval)) . ((44021 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-all-from-module)) . ((47247 . 17))) ((def ((lib "compiler/zo-structs.rkt") varref-dummy)) . ((43415 . 6))) ((def ((lib "compiler/zo-structs.rkt") struct:simple-nominal-path)) . ((50056 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-inline-variant)) . ((36258 . 6))) ((def ((lib "compiler/zo-structs.rkt") apply-values-args-expr)) . ((43809 . 6))) ((def ((lib "setup/path-to-relative.rkt") make-path->relative-string)) . ((32995 . 6))) ((def ((lib "compiler/zo-structs.rkt") application?)) . ((42570 . 6))) ((def ((lib "compiler/zo-structs.rkt") provided-name)) . ((38584 . 10))) ((def ((lib "compiler/zo-structs.rkt") mod)) . ((36430 . 40))) ((def ((lib "compiler/cm.rkt") parallel-lock-client)) . ((2390 . 15))) ((def ((lib "compiler/zo-structs.rkt") struct:def-syntaxes)) . ((35189 . 9))) ((def ((lib "compiler/zo-structs.rkt") struct:localref)) . ((41784 . 9))) ((def ((lib "setup/getinfo.rkt") get-info/full)) . ((31367 . 7))) ((def ((lib "compiler/zo-structs.rkt") assign-id)) . ((43605 . 7))) ((def ((lib "compiler/cm.rkt") managed-compile-zo)) . ((476 . 8))) ((def ((lib "compiler/zo-structs.rkt") phase-shift?)) . ((46195 . 8))) ((def ((lib "compiler/zo-structs.rkt") provided)) . ((38584 . 10))) ((def ((lib "compiler/zo-structs.rkt") struct:free-id-info)) . ((44777 . 19))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ specific-planet-dirs)) . ((27709 . 11))) ((def ((lib "compiler/zo-structs.rkt") localref-unbox?)) . ((41784 . 9))) ((def ((lib "compiler/zo-structs.rkt") struct:stx)) . ((34765 . 5))) ((def ((lib "compiler/zo-structs.rkt") nominal-path?)) . ((49945 . 4))) ((def ((lib "compiler/zo-structs.rkt") struct:toplevel)) . ((42071 . 8))) ((def ((lib "compiler/find-exe.rkt") find-exe)) . ((12240 . 4))) ((def ((lib "compiler/zo-structs.rkt") make-wrapped)) . ((44164 . 7))) ((def ((lib "compiler/zo-structs.rkt") make-wrap)) . ((44395 . 4))) ((def ((lib "compiler/zo-structs.rkt") nominal-path)) . ((49945 . 4))) ((def ((lib "compiler/zo-structs.rkt") seq-for-syntax-dummy)) . ((35513 . 8))) ((def ((lib "compiler/zo-structs.rkt") module-rename-unmarshals)) . ((46475 . 17))) ((def ((lib "launcher/launcher.rkt") gracket-launcher-is-actually-directory?)) . ((15307 . 2))) ((def ((lib "compiler/zo-structs.rkt") req-reqs)) . ((35815 . 6))) ((def ((lib "compiler/zo-structs.rkt") make-localref)) . ((41784 . 9))) ((def ((lib "compiler/zo-structs.rkt") make-seq)) . ((35962 . 5))) ((def ((lib "compiler/zo-structs.rkt") lexical-rename?)) . ((45651 . 12))) ((def ((lib "compiler/zo-structs.rkt") wrapped-wraps)) . ((44164 . 7))) ((def ((lib "compiler/zo-structs.rkt") module-rename-kind)) . ((46475 . 17))) ((def ((lib "compiler/zo-structs.rkt") stx?)) . ((34765 . 5))) ((def ((lib "compiler/zo-structs.rkt") make-stx)) . ((34765 . 5))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ specific-collections)) . ((27550 . 4))) ((def ((lib "raco/command-name.rkt") program+command-name)) . ((53781 . 2))) ((def ((lib "compiler/zo-structs.rkt") global-bucket)) . ((34368 . 5))) ((def ((lib "compiler/zo-structs.rkt") install-value-count)) . ((41091 . 9))) ((def ((lib "launcher/launcher.rkt") extract-aux-from-path)) . ((17325 . 3))) ((def ((lib "compiler/zo-structs.rkt") inline-variant-inline)) . ((36258 . 6))) ((def ((lib "compiler/zo-structs.rkt") toplevel-ready?)) . ((42071 . 8))) ((def ((lib "compiler/zo-structs.rkt") install-value-rhs)) . ((41091 . 9))) ((def ((lib "compiler/zo-structs.rkt") struct:nominal-path)) . ((49945 . 4))) ((def ((lib "compiler/zo-structs.rkt") mod-name)) . ((36430 . 40))) ((def ((lib "compiler/zo-structs.rkt") exported-nominal-module-binding-nominal-export-name)) . ((48976 . 12))) ((def ((lib "launcher/launcher.rkt") make-gracket-launcher)) . ((12380 . 5))) ((def ((lib "compiler/zo-structs.rkt") struct:branch)) . ((42784 . 7))) ((def ((lib "compiler/embed.rkt") embedding-executable-is-actually-directory?)) . ((11687 . 3))) ((def ((lib "compiler/zo-structs.rkt") let-void-count)) . ((40864 . 7))) ((sig-val ((lib "setup/option-sig.rkt") setup-option^ pause-on-errors)) . ((27231 . 4))) ((def ((lib "compiler/zo-structs.rkt") beg0)) . ((43266 . 5))) ((def ((lib "compiler/zo-structs.rkt") let-one-rhs)) . ((40608 . 8))) ((def ((lib "launcher/launcher.rkt") mzscheme-launcher-is-actually-directory?)) . ((16597 . 2))) ((form ((lib "setup/infotab.rkt") require)) . ((25738 . 2))) ((def ((lib "compiler/zo-structs.rkt") prefix-num-lifts)) . ((34049 . 8))) ((def ((lib "compiler/zo-structs.rkt") free-id-info-path1)) . ((44777 . 19))) ((def ((lib "compiler/zo-structs.rkt") splice)) . ((36107 . 5))) ((def ((lib "compiler/zo-structs.rkt") struct:let-void)) . ((40864 . 7))) ((form ((lib "setup/plt-installer-sig.rkt") setup:plt-installer^)) . ((30246 . 2))) ((def ((lib "compiler/zo-structs.rkt") let-one?)) . ((40608 . 8))) ((def ((lib "compiler/embed.rkt") create-embedding-executable)) . ((5827 . 57))) ((def ((lib "compiler/zo-structs.rkt") prefix-toplevels)) . ((34049 . 8))) ((def ((lib "compiler/cm.rkt") file-stamp-in-collection)) . ((1863 . 4))) ((def ((lib "launcher/launcher.rkt") build-aux-from-path)) . ((17221 . 3))) ((def ((lib "compiler/zo-structs.rkt") localref-pos)) . ((41784 . 9))) ((def ((lib "compiler/zo-structs.rkt") make-topsyntax)) . ((42327 . 7))))
procedure
(make-compilation-manager-load/use-compiled-handler                                           
                                                    [delete-zos-when-rkt-file-does-not-exist? 
                                                     #:security-guard security-guard])        
 -> (path? (or/c symbol? false/c) . -> . any)
  delete-zos-when-rkt-file-does-not-exist? : any/c = #f
  security-guard : (or/c security-guard? #f) = #f
procedure
(managed-compile-zo  file                                  
                    [read-src-syntax                       
                     #:security-guard security-guard]) -> void?
  file : path-string?
  read-src-syntax : (any/c input-port? . -> . syntax?)
                  = read-syntax
  security-guard : (or/c security-guard? #f) = #f
parameter
(trust-existing-zos) -> boolean?
(trust-existing-zos trust?) -> void?
  trust? : any/c
procedure
(make-caching-managed-compile-zo                                    
                                  read-src-syntax                   
                                 [#:security-guard security-guard]) 
 -> (path-string? . -> . void?)
  read-src-syntax : (any/c input-port? . -> . syntax?)
  security-guard : (or/c security-guard? #f) = #f
parameter
(manager-compile-notify-handler) -> (path? . -> . any)
(manager-compile-notify-handler notify) -> void?
  notify : (path? . -> . any)
parameter
(manager-trace-handler) -> (string? . -> . any)
(manager-trace-handler notify) -> void?
  notify : (string? . -> . any)
parameter
(manager-skip-file-handler)
 -> (-> path? (or/c (cons/c number? promise?) #f))
(manager-skip-file-handler proc) -> void?
  proc : (-> path? (or/c (cons/c number? promise?) #f))
procedure
(file-stamp-in-collection p)
 -> (or/c (cons/c number? promise?) #f)
  p : path?
procedure
(file-stamp-in-paths p paths)
 -> (or/c (cons/c number? promise?) #f)
  p : path?
  paths : (listof path?)
procedure
(get-file-sha1 p) -> (or/c string? #f)
  p : path?
procedure
(get-compiled-file-sha1 p) -> (or/c string? #f)
  p : path?
procedure
(with-compile-output p proc) -> any
  p : path-string?
  proc : ([port input-port?] [tmp-path path?]  . -> . any)
parameter
(parallel-lock-client)
 -> (or/c #f
          (->i ([command (or/c 'lock 'unlock)]
                [file bytes?])
               [res (command) (if (eq? command 'lock)
                                  boolean?
                                  void?)]))
(parallel-lock-client proc) -> void?
  proc : (or/c #f
               (->i ([command (or/c 'lock 'unlock)]
                     [file bytes?])
                    [res (command) (if (eq? command 'lock)
                                       boolean?
                                       void?)]))
procedure
(compile-lock->parallel-lock-client  pc     
                                    [cust]) 
 -> (-> (or/c 'lock 'unlock) bytes? boolean?)
  pc : place-channel?
  cust : (or/c #f custodian?) = #f
procedure
(make-compile-lock) -> place-channel?
procedure
(parallel-compile-files  list-of-files                   
                        [#:worker-count worker-count     
                         #:handler handler])         -> void?
  list-of-files : (listof path?)
  worker-count : non-negative-integer? = (processor-count)
  handler : (->i ([handler-type symbol?] = void
                  [path path-string?]
                  [msg string?]
                  [out string?]
                  [err string?])
                 void?)
procedure
(parallel-compile worker-count       
                  setup-fprintf      
                  append-error       
                  collects-tree) -> (void)
  worker-count : non-negative-integer?
  setup-fprintf : (->* ([stage string?] [format string?])
                       ()
                       #:rest (listof any/c) void)
  append-error : (-> cc?
                     [prefix string?]
                     [exn (or/c exn? null?)]
                     [out string?]
                     [err srtring?]
                     [message string?]
                     void?)
  collects-tree : (listof any/c)
procedure
(register-external-file file) -> void?
  file : (and path? complete-path?)
procedure
(links  dir                                 
        ...                                 
       [#:user? user?                       
        #:file file                         
        #:name name                         
        #:root? root?                       
        #:version-regexp version-regexp     
        #:error error-proc                  
        #:remove? remove?                   
        #:show? show?                       
        #:repair? repair?                   
        #:with-path? with-path?])       -> list?
  dir : path?
  user? : any/c = #t
  file : (or/c path-string? #f) = #f
  name : (or/c string? #f) = #f
  root? : any/c = #f
  version-regexp : (or/c regexp? #f) = #f
  error-proc : (symbol? string? any/c ... . -> . any) = error
  remove? : any/c = #f
  show? : any/c = #f
  repair? : any/c = #f
  with-path? : any/c = #f
procedure
(create-embedding-executable                                                  
                              dest                                            
                              #:modules mod-list                              
                             [#:configure-via-first-module? config-via-first? 
                              #:literal-files literal-files                   
                              #:literal-expression literal-sexp               
                              #:literal-expressions literal-sexps             
                              #:cmdline cmdline                               
                              #:gracket? gracket?                             
                              #:mred? mred?                                   
                              #:variant variant                               
                              #:aux aux                                       
                              #:collects-path collects-path                   
                              #:collects-dest collects-dest                   
                              #:launcher? launcher?                           
                              #:verbose? verbose?                             
                              #:expand-namespace expand-namespace             
                              #:compiler compile-proc                         
                              #:src-filter src-filter                         
                              #:on-extension ext-proc                         
                              #:get-extra-imports extras-proc])               
 -> void?
  dest : path-string?
  mod-list : (listof (or/c (list/c (or/c symbol? (one-of/c #t #f))
                                   (or/c module-path? path?))
                           (list/c (or/c symbol? (one-of/c #t #f))
                                   (or/c module-path? path?)
                                   (listof symbol?))))
  config-via-first? : any/c = #f
  literal-files : (listof path-string?) = null
  literal-sexp : any/c = #f
  literal-sexps : list? = (if literal-sexp
                              (list literal-sexp)
                              null)
  cmdline : (listof string?) = null
  gracket? : any/c = #f
  mred? : any/c = #f
  variant : (or/c 'cgc '3m) = (system-type 'gc)
  aux : (listof (cons/c symbol? any/c)) = null
  collects-path : (or/c #f                     = #f
                        path-string?
                        (listof path-string?))
  collects-dest : (or/c #f path-string?) = #f
  launcher? : any/c = #f
  verbose? : any/c = #f
  expand-namespace : namespace? = (current-namespace)
  compile-proc : (any/c . -> . compiled-expression?)
               = (lambda (e)
                   (parameterize ([current-namespace
                                   expand-namespace])
                     (compile e)))
  src-filter : (path? . -> . any) = (lambda (p) #t)
  ext-proc : (or/c #f (path-string? boolean? . -> . any)) = #f
  extras-proc : (path? compiled-module-expression?
                 . -> . (listof module-path?))
              = (lambda (p m) null)
procedure
(make-embedding-executable  dest                
                            mred?               
                            verbose?            
                            mod-list            
                            literal-files       
                            literal-sexp        
                            cmdline             
                           [aux                 
                            launcher?           
                            variant             
                            collects-path]) -> void?
  dest : path-string?
  mred? : any/c
  verbose? : any/c
  mod-list : (listof (or/c (list/c (or/c symbol? (one-of/c #t #f))
                                   (or/c module-path? path?))
                           (list/c (or/c symbol? (one-of/c #t #f))
                                   (or/c module-path? path?)
                                   (listof symbol?))))
  literal-files : (listof path-string?)
  literal-sexp : any/c
  cmdline : (listof string?)
  aux : (listof (cons/c symbol? any/c)) = null
  launcher? : any/c = #f
  variant : (one-of/c 'cgc '3m) = (system-type 'gc)
  collects-path : (or/c #f                     = #f
                        path-string?
                        (listof path-string?))
procedure
(write-module-bundle verbose?          
                     mod-list          
                     literal-files     
                     literal-sexp) -> void?
  verbose? : any/c
  mod-list : (listof (or/c (list/c (or/c symbol? (one-of/c #t #f))
                                   (or/c module-path? path?))
                           (list/c (or/c symbol? (one-of/c #t #f))
                                   (or/c module-path? path?)
                                   (listof symbol?))))
  literal-files : (listof path-string?)
  literal-sexp : any/c
procedure
(embedding-executable-is-directory? mred?) -> boolean
  mred? : any/c
procedure
(embedding-executable-is-actually-directory? mred?) -> boolean?
  mred? : any/c
procedure
(embedding-executable-put-file-extension+style+filters mred?)
 -> (or/c string? false/c)
    (listof (one-of/c 'packages 'enter-packages))
    (listof (list/c string? string?))
  mred? : any/c
procedure
(embedding-executable-add-suffix path       
                                 mred?) -> path-string?
  path : path-string?
  mred? : any/c
signature
compiler:embed^ : signature
value
compiler:embed@ : unit?
procedure
(find-exe [gracket? variant]) -> path?
  gracket? : any/c = #f
  variant : (or/c 'cgc '3m) = (system-type 'gc)
procedure
(make-gracket-launcher args dest [aux]) -> void?
  args : (listof string?)
  dest : path-string?
  aux : (listof (cons/c symbol? any/c)) = null
procedure
(make-racket-launcher args dest [aux]) -> void?
  args : (listof string?)
  dest : path-string?
  aux : (listof (cons/c symbol? any/c)) = null
procedure
(make-gracket-program-launcher file           
                               collection     
                               dest)      -> void?
  file : string?
  collection : string?
  dest : path-string?
procedure
(make-racket-program-launcher file           
                              collection     
                              dest)      -> void?
  file : string?
  collection : string?
  dest : path-string?
procedure
(install-gracket-program-launcher file           
                                  collection     
                                  name)      -> void?
  file : string?
  collection : string?
  name : string?
procedure
(install-racket-program-launcher file           
                                 collection     
                                 name)      -> void?
  file : string?
  collection : string?
  name : string?
procedure
(make-mred-launcher args dest [aux]) -> void?
  args : (listof string?)
  dest : path-string?
  aux : (listof (cons/c symbol? any/c)) = null
procedure
(make-mred-program-launcher file           
                            collection     
                            dest)      -> void?
  file : string?
  collection : string?
  dest : path-string?
procedure
(install-mred-program-launcher file           
                               collection     
                               name)      -> void?
  file : string?
  collection : string?
  name : string?
procedure
(make-mzscheme-launcher args dest [aux]) -> void?
  args : (listof string?)
  dest : path-string?
  aux : (listof (cons/c symbol? any/c)) = null
procedure
(make-mzscheme-program-launcher file           
                                collection     
                                dest)      -> void?
  file : string?
  collection : string?
  dest : path-string?
procedure
(install-mzscheme-program-launcher file           
                                   collection     
                                   name)      -> void?
  file : string?
  collection : string?
  name : string?
procedure
(gracket-program-launcher-path name) -> path?
  name : string?
procedure
(racket-program-launcher-path name) -> path?
  name : string?
procedure
(gracket-launcher-is-directory?) -> boolean?
procedure
(racket-launcher-is-directory?) -> boolean?
procedure
(gracket-launcher-is-actually-directory?) -> boolean?
procedure
(racket-launcher-is-actually-directory?) -> boolean?
procedure
(gracket-launcher-add-suffix path-string?) -> path?
  path-string? : path
procedure
(racket-launcher-add-suffix path-string?) -> path?
  path-string? : path
procedure
(gracket-launcher-put-file-extension+style+filters)
 -> (or/c string? false/c)
    (listof (one-of/c 'packages 'enter-packages))
    (listof (list/c string? string?))
procedure
(racket-launcher-put-file-extension+style+filters)
 -> (or/c string? false/c)
    (listof (one-of/c 'packages 'enter-packages))
    (listof (list/c string? string?))
procedure
(mred-program-launcher-path name) -> path?
  name : string?
procedure
(mred-launcher-is-directory?) -> boolean?
procedure
(mred-launcher-is-actually-directory?) -> boolean?
procedure
(mred-launcher-add-suffix path-string?) -> path?
  path-string? : path
procedure
(mred-launcher-put-file-extension+style+filters)
 -> (or/c string? false/c)
    (listof (one-of/c 'packages 'enter-packages))
    (listof (list/c string? string?))
procedure
(mzscheme-program-launcher-path name) -> path?
  name : string?
procedure
(mzscheme-launcher-is-directory?) -> boolean?
procedure
(mzscheme-launcher-is-actually-directory?) -> boolean?
procedure
(mzscheme-launcher-add-suffix path-string?) -> path?
  path-string? : path
procedure
(mzscheme-launcher-put-file-extension+style+filters)
 -> (or/c string? false/c)
    (listof (one-of/c 'packages 'enter-packages))
    (listof (list/c string? string?))
procedure
(gracket-launcher-up-to-date? dest aux) -> boolean?
  dest : path-string?
  aux : (listof (cons/c symbol? any/c))
procedure
(racket-launcher-up-to-date? dest aux) -> boolean?
  dest : path-string?
  aux : (listof (cons/c symbol? any/c))
procedure
(build-aux-from-path path) -> (listof (cons/c symbol? any/c))
  path : path-string?
procedure
(extract-aux-from-path path) -> (listof (cons/c symbol? any/c))
  path : path-string?
parameter
(current-launcher-variant) -> symbol?
(current-launcher-variant variant) -> void?
  variant : symbol?
procedure
(available-gracket-variants) -> (listof symbol?)
procedure
(available-racket-variants) -> (listof symbol?)
procedure
(mred-launcher-up-to-date? dest aux) -> boolean?
  dest : path-string?
  aux : (listof (cons/c symbol? any/c))
procedure
(mzscheme-launcher-up-to-date? dest aux) -> boolean?
  dest : path-string?
  aux : (listof (cons/c symbol? any/c))
procedure
(available-mred-variants) -> (listof symbol?)
procedure
(available-mzscheme-variants) -> (listof symbol?)
signature
launcher^ : signature
value
launcher@ : unit?
procedure
(assemble-distribution  dest-dir                   
                        exec-files                 
                       [#:collects-path path       
                        #:copy-collects dirs]) -> void?
  dest-dir : path-string?
  exec-files : (listof path-string?)
  path : (or/c false/c (and/c path-string? relative-path?)) = #f
  dirs : (listof path-string?) = null
procedure
(bundle-directory dist-file dir [for-exe?]) -> void?
  dist-file : file-path?
  dir : file-path?
  for-exe? : any/c = #f
procedure
(bundle-put-file-extension+style+filters)
 -> (or/c string? false/c)
    (listof (one-of/c 'packages 'enter-packages))
    (listof (list/c string? string?))
procedure
(pack-collections-plt                                            
                       dest                                      
                       name                                      
                       collections                               
                      [#:replace? replace?                       
                       #:at-plt-home? at-home?                   
                       #:test-plt-collects? test?                
                       #:extra-setup-collections collection-list 
                       #:file-filter filter-proc])               
 -> void?
  dest : path-string?
  name : string?
  collections : (listof (listof path-string?))
  replace? : boolean? = #f
  at-home? : boolean? = #f
  test? : boolean? = #t
  collection-list : (listof path-string?) = null
  filter-proc : (path-string? . -> . boolean?) = std-filter
procedure
(pack-collections  dest                        
                   name                        
                   collections                 
                   replace?                    
                   extra-setup-collections     
                  [filter                      
                   at-plt-home?])          -> void?
  dest : path-string?
  name : string?
  collections : (listof (listof path-string?))
  replace? : boolean?
  extra-setup-collections : (listof path-string?)
  filter : (path-string? . -> . boolean?) = std-filter
  at-plt-home? : boolean? = #f
procedure
(pack-plt  dest                                
           name                                
           paths                               
          [#:as-paths as-paths                 
           #:file-filter filter-proc           
           #:encode? encode?                   
           #:file-mode file-mode-sym           
           #:unpack-unit unit200-expr          
           #:collections collection-list       
           #:plt-relative? plt-relative?       
           #:at-plt-home? at-plt-home?         
           #:test-plt-dirs dirs                
           #:requires mod-and-version-list     
           #:conflicts mod-list])          -> void?
  dest : path-string?
  name : string?
  paths : (listof path-string?)
  as-paths : (listof path-string?) = paths
  filter-proc : (path-string? . -> . boolean?) = std-filter
  encode? : boolean? = #t
  file-mode-sym : symbol? = 'file
  unit200-expr : any/c = #f
  collection-list : (listof path-string?) = null
  plt-relative? : any/c = #f
  at-plt-home? : any/c = #f
  dirs : (or/c (listof path-string?) false/c) = #f
  mod-and-version-list : (listof (listof path-string?)    = null
                                 (listof exact-integer?))
  mod-list : (listof (listof path-string?)) = null
procedure
(pack  dest               
       name               
       paths              
       collections        
      [filter             
       encode?            
       file-mode          
       unpack-unit        
       plt-relative?      
       requires           
       conflicts          
       at-plt-home?]) -> void?
  dest : path-string?
  name : string?
  paths : (listof path-string?)
  collections : (listof path-string?)
  filter : (path-string? . -> . boolean?) = std-filter
  encode? : boolean? = #t
  file-mode : symbol? = 'file
  unpack-unit : boolean? = #f
  plt-relative? : boolean? = #t
  requires : (listof (listof path-string?)    = null
                     (listof exact-integer?))
  conflicts : (listof (listof path-string?)) = null
  at-plt-home? : boolean? = #f
procedure
(std-filter p) -> boolean?
  p : path-string?
procedure
(mztar  path                   
       [#:as-path as-path]     
        output                 
        filter                 
        file-mode)         -> void?
  path : path-string?
  as-path : path-string? = path
  output : output-port?
  filter : (path-string? . -> . boolean?)
  file-mode : (symbols 'file 'file-replace)
procedure
(unpack  archive                        
        [main-collects-parent-dir       
         print-status                   
         get-target-directory           
         force?                         
         get-target-plt-directory]) -> void?
  archive : path-string?
  main-collects-parent-dir : path-string? = (current-directory)
  print-status : (string? . -> . any)
               = (lambda (x) (printf "~a\n" x))
  get-target-directory : (-> path-string?)
                       = (lambda () (current-directory))
  force? : any/c = #f
  get-target-plt-directory : (path-string?
                              path-string?
                              (listof path-string?)
                              . -> . path-string?)
                           = (lambda (preferred-dir main-dir options)
                               preferred-dir)
procedure
(fold-plt-archive archive            
                  on-config-fn       
                  on-setup-unit      
                  on-directory       
                  on-file            
                  initial-value) -> any/c
  archive : path-string?
  on-config-fn : (any/c any/c . -> . any/c)
  on-setup-unit : (any/c input-port? any/c . -> . any/c)
  on-directory : ((or/c path-string?
                        (list/c (or/c 'collects 'doc 'lib 'include)
                                path-string?))
                  any/c
                  . -> . any/c)
  on-file : (or/c ((or/c path-string?
                         (list/c (or/c 'collects 'doc 'lib 'include)
                                 path-string?))
                   input-port?
                   any/c
                   . -> . any/c)
                  ((or/c path-string?
                         (list/c (or/c 'collects 'doc 'lib 'include)
                                 path-string?))
                   input-port?
                   (one-of/c 'file 'file-replace)
                   any/c
                   . -> . any/c))
  initial-value : any/c
syntax
(require module-path)
value
setup@ : unit?
value
setup:option@ : unit?
signature
setup-option^ : signature
parameter
(setup-program-name) -> string?
(setup-program-name name) -> void?
  name : string?
parameter
(verbose) -> boolean?
(verbose on?) -> void?
  on? : any/c
parameter
(make-verbose) -> boolean?
(make-verbose on?) -> void?
  on? : any/c
parameter
(compiler-verbose) -> boolean?
(compiler-verbose on?) -> void?
  on? : any/c
parameter
(clean) -> boolean?
(clean on?) -> void?
  on? : any/c
parameter
(compile-mode) -> (or/c path? false/c)
(compile-mode path) -> void?
  path : (or/c path? false/c)
parameter
(make-zo) -> boolean?
(make-zo on?) -> void?
  on? : any/c
parameter
(make-info-domain) -> boolean?
(make-info-domain on?) -> void?
  on? : any/c
parameter
(make-launchers) -> boolean?
(make-launchers on?) -> void?
  on? : any/c
parameter
(make-docs) -> boolean?
(make-docs on?) -> void?
  on? : any/c
parameter
(make-user) -> boolean?
(make-user on?) -> void?
  on? : any/c
parameter
(make-planet) -> boolean?
(make-planet on?) -> void?
  on? : any/c
parameter
(avoid-main-installation) -> boolean?
(avoid-main-installation on?) -> void?
  on? : any/c
parameter
(call-install) -> boolean?
(call-install on?) -> void?
  on? : any/c
parameter
(call-post-install) -> boolean?
(call-post-install on?) -> void?
  on? : any/c
parameter
(pause-on-errors) -> boolean?
(pause-on-errors on?) -> void?
  on? : any/c
parameter
(parallel-workers) -> exact-nonnegative-integer?
(parallel-workers num) -> void?
  num : exact-nonnegative-integer?
parameter
(force-unpacks) -> boolean?
(force-unpacks on?) -> void?
  on? : any/c
parameter
(specific-collections) -> (listof (listof path-string?))
(specific-collections colls) -> void?
  colls : (listof (listof path-string?))
parameter
(specific-planet-dirs)
 -> (listof (list/c string?
                    string?
                    exact-nonnegative-integer?
                    exact-nonnegative-integer?))
(specific-planet-dirs dir) -> void?
  dir : (listof (list/c string?
                        string?
                        exact-nonnegative-integer?
                        exact-nonnegative-integer?))
parameter
(archives) -> (listof path-string?)
(archives arch) -> void?
  arch : (listof path-string?)
parameter
(archive-implies-reindex) -> boolean?
(archive-implies-reindex on?) -> void?
  on? : any/c
parameter
(current-target-directory-getter) -> (-> . path-string?)
(current-target-directory-getter thunk) -> void?
  thunk : (-> . path-string?)
parameter
(current-target-plt-directory-getter)
 -> (path-string?
     path-string?
     (listof path-string?) . -> . path-string?)
(current-target-plt-directory-getter proc) -> void?
  proc : (path-string?
          path-string?
          (listof path-string?) . -> . path-string?)
procedure
(run-single-installer file get-dir-proc) -> void?
  file : path-string?
  get-dir-proc : (-> (or/c path-string? false/c))
procedure
(install-planet-package file directory spec) -> void?
  file : path-string?
  directory : path-string?
  spec : (list/c string? string?
                 (listof string?)
                 exact-nonnegative-integer?
                 exact-nonnegative-integer?)
procedure
(reindex-user-documentation) -> void?
procedure
(clean-planet-package directory spec) -> void?
  directory : path-string?
  spec : (list/c string? string?
                 (listof string?)
                 exact-nonnegative-integer?
                 exact-nonnegative-integer?)
procedure
(run-installer filename) -> void?
  filename : path-string?
parameter
(on-installer-run) -> (-> any)
(on-installer-run thunk) -> void?
  thunk : (-> any)
procedure
(with-installer-window do-install         
                       cleanup-thunk) -> void?
  do-install : ((or/c (is-a?/c dialog%) (is-a?/c frame%))
                . -> . void?)
  cleanup-thunk : (-> any)
procedure
(run-single-installer file get-dir-proc) -> void?
  file : path-string?
  get-dir-proc : (-> (or/c path-string? false/c))
signature
setup:plt-installer^ : signature
procedure
(find-collects-dir) -> (or/c path? false/c)
procedure
(find-user-collects-dir) -> path?
procedure
(get-collects-search-dirs) -> (listof path?)
procedure
(find-doc-dir) -> (or/c path? false/c)
procedure
(find-user-doc-dir) -> path?
procedure
(get-doc-search-dirs) -> (listof path?)
procedure
(find-lib-dir) -> (or/c path? false/c)
procedure
(find-dll-dir) -> (or/c path? false/c)
procedure
(find-user-lib-dir) -> path?
procedure
(get-lib-search-dirs) -> (listof path?)
procedure
(find-include-dir) -> (or/c path? false/c)
procedure
(find-user-include-dir) -> path?
procedure
(get-include-search-dirs) -> (listof path?)
procedure
(find-console-bin-dir) -> (or/c path? false/c)
procedure
(find-gui-bin-dir) -> (or/c path? false/c)
value
absolute-installation? : boolean?
procedure
(get-info  collection-names        
          [#:namespace namespace]) 
 -> (or/c
     (symbol? [(-> any)] . -> . any)
     false/c)
  collection-names : (listof string?)
  namespace : (or/c namespace? #f) = #f
procedure
(get-info/full path [#:namespace namespace])
 -> (or/c
     (symbol? [(-> any)] . -> . any)
     false/c)
  path : path?
  namespace : (or/c namespace? #f) = #f
procedure
(find-relevant-directories syms [mode]) -> (listof path?)
  syms : (listof symbol?)
  mode : (or/c 'preferred 'all-available 'no-planet)
       = 'preferred
procedure
(find-relevant-directory-records syms key)
 -> (listof directory-record?)
  syms : (listof symbol?)
  key : (or/c 'preferred 'all-available)
struct
(struct directory-record (maj min spec path syms)
        #:extra-constructor-name make-directory-record)
  maj : integer?
  min : integer?
  spec : any/c
  path : path?
  syms : (listof symbol?)
procedure
(reset-relevant-directories-state!) -> void?
procedure
(path->main-collects-relative path)
 -> (or/c path? (cons/c 'collects (listof bytes?)))
  path : (or/c bytes? path-string?)
procedure
(main-collects-relative->path rel) -> path?
  rel : (or/c bytes? path-string?
              (cons/c 'collects (listof bytes?)))
procedure
(path->relative-string/library  path          
                               [default]) -> any/c
  path : path-string?
  default : (or/c (-> path-string? any/c) any/c)
          = (lambda (x) (if (path? x) (path->string x) x))
procedure
(path->relative-string/setup path [default]) -> any
  path : path-string?
  default : (or/c (-> path-string? any/c) any/c)
          = (lambda (x) (if (path? x) (path->string x) x))
procedure
(make-path->relative-string dirs [default])
 -> (path-string? any/c . -> . any)
  dirs : (listof (cons (-> path?) string?))
  default : (or/c (-> path-string? any/c) any/c)
          = (lambda (x) (if (path? x) (path->string x) x))
procedure
(load-collections-xref [on-load]) -> xref?
  on-load : (-> any/c) = (lambda () (void))
procedure
(decompile top) -> any/c
  top : compilation-top?
procedure
(zo-parse [in]) -> compilation-top?
  in : input-port? = (current-input-port)
procedure
(zo-marshal-to top out) -> void?
  top : compilation-top?
  out : output-port?
procedure
(zo-marshal top) -> bytes?
  top : compilation-top?
struct
(struct zo ()
        #:extra-constructor-name make-zo
        #:prefab)
struct
(struct compilation-top zo (max-let-depth prefix code)
        #:extra-constructor-name make-compilation-top
        #:prefab)
  max-let-depth : exact-nonnegative-integer?
  prefix : prefix?
  code : (or/c form? any/c)
struct
(struct prefix zo (num-lifts toplevels stxs)
        #:extra-constructor-name make-prefix
        #:prefab)
  num-lifts : exact-nonnegative-integer?
  toplevels : (listof (or/c #f symbol? global-bucket?
                            module-variable?))
  stxs : (listof stx?)
struct
(struct global-bucket zo (name)
        #:extra-constructor-name make-global-bucket
        #:prefab)
  name : symbol?
struct
(struct module-variable zo (modidx sym pos phase)
        #:extra-constructor-name make-module-variable
        #:prefab)
  modidx : module-path-index?
  sym : symbol?
  pos : exact-integer?
  phase : exact-nonnegative-integer?
struct
(struct stx zo (encoded)
        #:extra-constructor-name make-stx
        #:prefab)
  encoded : wrapped?
struct
(struct form zo ()
        #:extra-constructor-name make-form
        #:prefab)
struct
(struct def-values form (ids rhs)
        #:extra-constructor-name make-def-values
        #:prefab)
  ids : (listof toplevel?)
  rhs : (or/c expr? seq? inline-variant? any/c)
struct
(struct def-syntaxes form (ids rhs prefix max-let-depth dummy)
        #:extra-constructor-name make-def-syntaxes
        #:prefab)
  ids : (listof symbol?)
  rhs : (or/c expr? seq? any/c)
  prefix : prefix?
  max-let-depth : exact-nonnegative-integer?
  dummy : (or/c toplevel? #f)
struct
(struct seq-for-syntax form (forms prefix max-let-depth dummy)
        #:extra-constructor-name make-seq-for-syntax
        #:prefab)
  forms : (listof (or/c form? any/c))
  prefix : prefix?
  max-let-depth : exact-nonnegative-integer?
  dummy : (or/c toplevel? #f)
struct
(struct req form (reqs dummy)
        #:extra-constructor-name make-req
        #:prefab)
  reqs : stx?
  dummy : toplevel?
struct
(struct seq form (forms)
        #:extra-constructor-name make-seq
        #:prefab)
  forms : (listof (or/c form? any/c))
struct
(struct splice form (forms)
        #:extra-constructor-name make-splice
        #:prefab)
  forms : (listof (or/c form? any/c))
struct
(struct inline-variant form (direct inline)
        #:extra-constructor-name make-inline-variant
        #:prefab)
  direct : expr?
  inline : expr?
struct
(struct mod form                          (name
                                          srcname
                                          self-modidx
                                          prefix
                                          provides
                                          requires
                                          body
                                          syntax-bodies
                                          unexported
                                          max-let-depth
                                          dummy
                                          lang-info
                                          internal-context
                                          pre-submodules
                                          post-submodules)
        #:extra-constructor-name make-mod
        #:prefab)
  name : (or/c symbol? (listof symbol?))
  srcname : symbol?
  self-modidx : module-path-index?
  prefix : prefix?
  provides : (listof (list/c (or/c exact-integer? #f)
                             (listof provided?)
                             (listof provided?)))
  requires : (listof (cons/c (or/c exact-integer? #f)
                             (listof module-path-index?)))
  body : (listof (or/c form? any/c))
  syntax-bodies : (listof (cons/c exact-positive-integer?
                                  (listof (or/c def-syntaxes?
                                                seq-for-syntax?))))
  unexported : (listof (list/c exact-nonnegative-integer?
                               (listof symbol?)
                               (listof symbol?)))
  max-let-depth : exact-nonnegative-integer?
  dummy : toplevel?
  lang-info : (or/c #f (vector/c module-path? symbol? any/c))
  internal-context : (or/c #f #t stx? (vectorof stx?))
  pre-submodules : (listof mod?)
  post-submodules : (listof mod?)
struct
(struct provided (name src src-name nom-src src-phase protected?)
        #:extra-constructor-name make-provided
        #:prefab)
  name : symbol?
  src : (or/c module-path-index? #f)
  src-name : symbol?
  nom-src : (or/c module-path-index? #f)
  src-phase : exact-nonnegative-integer?
  protected? : boolean?
struct
(struct expr form ()
        #:extra-constructor-name make-expr
        #:prefab)
struct
(struct lam expr                          (name
                                          flags
                                          num-params
                                          param-types
                                          rest?
                                          closure-map
                                          closure-types
                                          toplevel-map
                                          max-let-depth
                                          body)
        #:extra-constructor-name make-lam
        #:prefab)
  name : (or/c symbol? vector?)
  flags : (listof (or/c 'preserves-marks 'is-method 'single-result
                        'only-rest-arg-not-used 'sfs-clear-rest-args))
  num-params : exact-nonnegative-integer?
  param-types : (listof (or/c 'val 'ref 'flonum))
  rest? : boolean?
  closure-map : (vectorof exact-nonnegative-integer?)
  closure-types : (listof (or/c 'val/ref 'flonum))
  toplevel-map : (or/c #f (set/c exact-nonnegative-integer?))
  max-let-depth : exact-nonnegative-integer?
  body : (or/c expr? seq? any/c)
struct
(struct closure expr (code gen-id)
        #:extra-constructor-name make-closure
        #:prefab)
  code : lam?
  gen-id : symbol?
struct
(struct case-lam expr (name clauses)
        #:extra-constructor-name make-case-lam
        #:prefab)
  name : (or/c symbol? vector?)
  clauses : (listof lam?)
struct
(struct let-one expr (rhs body flonum? unused?)
        #:extra-constructor-name make-let-one
        #:prefab)
  rhs : (or/c expr? seq? any/c)
  body : (or/c expr? seq? any/c)
  flonum? : boolean?
  unused? : boolean?
struct
(struct let-void expr (count boxes? body)
        #:extra-constructor-name make-let-void
        #:prefab)
  count : exact-nonnegative-integer?
  boxes? : boolean?
  body : (or/c expr? seq? any/c)
struct
(struct install-value expr (count pos boxes? rhs body)
        #:extra-constructor-name make-install-value
        #:prefab)
  count : exact-nonnegative-integer?
  pos : exact-nonnegative-integer?
  boxes? : boolean?
  rhs : (or/c expr? seq? any/c)
  body : (or/c expr? seq? any/c)
struct
(struct let-rec expr (procs body)
        #:extra-constructor-name make-let-rec
        #:prefab)
  procs : (listof lam?)
  body : (or/c expr? seq? any/c)
struct
(struct boxenv expr (pos body)
        #:extra-constructor-name make-boxenv
        #:prefab)
  pos : exact-nonnegative-integer?
  body : (or/c expr? seq? any/c)
struct
(struct localref expr (unbox? pos clear? other-clears? flonum?)
        #:extra-constructor-name make-localref
        #:prefab)
  unbox? : boolean?
  pos : exact-nonnegative-integer?
  clear? : boolean?
  other-clears? : boolean?
  flonum? : boolean?
struct
(struct toplevel expr (depth pos const? ready?)
        #:extra-constructor-name make-toplevel
        #:prefab)
  depth : exact-nonnegative-integer?
  pos : exact-nonnegative-integer?
  const? : boolean?
  ready? : boolean?
struct
(struct topsyntax expr (depth pos midpt)
        #:extra-constructor-name make-topsyntax
        #:prefab)
  depth : exact-nonnegative-integer?
  pos : exact-nonnegative-integer?
  midpt : exact-nonnegative-integer?
struct
(struct application expr (rator rands)
        #:extra-constructor-name make-application
        #:prefab)
  rator : (or/c expr? seq? any/c)
  rands : (listof (or/c expr? seq? any/c))
struct
(struct branch expr (test then else)
        #:extra-constructor-name make-branch
        #:prefab)
  test : (or/c expr? seq? any/c)
  then : (or/c expr? seq? any/c)
  else : (or/c expr? seq? any/c)
struct
(struct with-cont-mark expr (key val body)
        #:extra-constructor-name make-with-cont-mark
        #:prefab)
  key : (or/c expr? seq? any/c)
  val : (or/c expr? seq? any/c)
  body : (or/c expr? seq? any/c)
struct
(struct beg0 expr (seq)
        #:extra-constructor-name make-beg0
        #:prefab)
  seq : (listof (or/c expr? seq? any/c))
struct
(struct varref expr (toplevel dummy)
        #:extra-constructor-name make-varref
        #:prefab)
  toplevel : (or/c toplevel? #t)
  dummy : (or/c toplevel? #f)
struct
(struct assign expr (id rhs undef-ok?)
        #:extra-constructor-name make-assign
        #:prefab)
  id : toplevel?
  rhs : (or/c expr? seq? any/c)
  undef-ok? : boolean?
struct
(struct apply-values expr (proc args-expr)
        #:extra-constructor-name make-apply-values
        #:prefab)
  proc : (or/c expr? seq? any/c)
  args-expr : (or/c expr? seq? any/c)
struct
(struct primval expr (id)
        #:extra-constructor-name make-primval
        #:prefab)
  id : exact-nonnegative-integer?
struct
(struct wrapped zo (datum wraps tamper-status)
        #:extra-constructor-name make-wrapped
        #:prefab)
  datum : any/c
  wraps : (listof wrap?)
  tamper-status : (or/c 'clean 'armed 'tainted)
struct
(struct wrap zo ()
        #:extra-constructor-name make-wrap
        #:prefab)
struct
(struct top-level-rename wrap (flag)
        #:extra-constructor-name make-top-level-rename
        #:prefab)
  flag : boolean?
struct
(struct mark-barrier wrap (value)
        #:extra-constructor-name make-mark-barrier
        #:prefab)
  value : symbol?
struct
(struct free-id-info zo                            (path0
                                                   symbol0
                                                   path1
                                                   symbol1
                                                   phase0
                                                   phase1
                                                   phase2
                                                   use-current-inspector?)
        #:extra-constructor-name make-free-id-info
        #:prefab)
  path0 : module-path-index?
  symbol0 : symbol?
  path1 : module-path-index?
  symbol1 : symbol?
  phase0 : (or/c exact-integer? #f)
  phase1 : (or/c exact-integer? #f)
  phase2 : (or/c exact-integer? #f)
  use-current-inspector? : boolean?
struct
(struct lexical-rename wrap (has-free-id-info? bool2 alist)
        #:extra-constructor-name make-lexical-rename
        #:prefab)
  has-free-id-info? : boolean?
  bool2 : boolean?
  alist : (listof
           (cons/c symbol?
                   (or/c symbol?
                         (cons/c symbol?
                                 (or/c (cons/c symbol? (or/c symbol? #f))
                                       free-id-info?)))))
struct
(struct phase-shift wrap (amt src dest cancel-id)
        #:extra-constructor-name make-phase-shift
        #:prefab)
  amt : (or/c exact-integer? #f)
  src : module-path-index?
  dest : module-path-index?
  cancel-id : (or/c exact-integer? #f)
struct
(struct module-rename wrap                          (phase
                                                    kind
                                                    set-id
                                                    unmarshals
                                                    renames
                                                    mark-renames
                                                    plus-kern?)
        #:extra-constructor-name make-module-rename
        #:prefab)
  phase : exact-integer?
  kind : (or/c 'marked 'normal)
  set-id : any/c
  unmarshals : (listof make-all-from-module?)
  renames : (listof module-binding?)
  mark-renames : any/c
  plus-kern? : boolean?
struct
(struct all-from-module zo                            (path
                                                      phase
                                                      src-phase
                                                      exceptions
                                                      prefix
                                                      context)
        #:extra-constructor-name make-all-from-module
        #:prefab)
  path : module-path-index?
  phase : (or/c exact-integer? #f)
  src-phase : (or/c exact-integer? #f)
  exceptions : (listof symbol?)
  prefix : (or/c symbol? #f)
  context : (or/c (listof exact-integer?)
                  (vector/c (listof exact-integer?) any/c)
                  #f)
struct
(struct module-binding zo ()
        #:extra-constructor-name make-module-binding
        #:prefab)
struct
(struct simple-module-binding module-binding (path)
        #:extra-constructor-name make-simple-module-binding
        #:prefab)
  path : module-path-index?
struct
(struct phased-module-binding module-binding                (path
                                                            phase
                                                            export-name
                                                            nominal-path
                                                            nominal-export-name)
        #:extra-constructor-name make-phased-module-binding
        #:prefab)
  path : module-path-index?
  phase : exact-integer?
  export-name : any/c
  nominal-path : nominal-path?
  nominal-export-name : any/c
struct
(struct exported-nominal-module-binding module-binding (path
                                                       export-name
                                                       nominal-path
                                                       nominal-export-name)
        #:extra-constructor-name
        make-exported-nominal-module-binding
        #:prefab)
  path : module-path-index?
  export-name : any/c
  nominal-path : nominal-path?
  nominal-export-name : any/c
struct
(struct nominal-module-binding module-binding (path nominal-path)
        #:extra-constructor-name make-nominal-module-binding
        #:prefab)
  path : module-path-index?
  nominal-path : nominal-path?
struct
(struct exported-module-binding module-binding (path export-name)
        #:extra-constructor-name make-exported-module-binding
        #:prefab)
  path : module-path-index?
  export-name : any/c
struct
(struct nominal-path zo ()
        #:extra-constructor-name make-nominal-path
        #:prefab)
struct
(struct simple-nominal-path nominal-path (value)
        #:extra-constructor-name make-simple-nominal-path
        #:prefab)
  value : module-path-index?
struct
(struct imported-nominal-path nominal-path (value import-phase)
        #:extra-constructor-name make-imported-nominal-path
        #:prefab)
  value : module-path-index?
  import-phase : exact-integer?
struct
(struct phased-nominal-path nominal-path (value import-phase phase)
        #:extra-constructor-name make-phased-nominal-path
        #:prefab)
  value : module-path-index?
  import-phase : (or/c false/c exact-integer?)
  phase : exact-integer?
procedure
(xform  quiet?                          
        input-file                      
        output-file                     
        include-dirs                    
       [#:keep-lines? keep-lines?]) -> any/c
  quiet? : any/c
  input-file : path-string?
  output-file : path-string?
  include-dirs : (listof path-string?)
  keep-lines? : boolean? = #f
procedure
((compile-zos  expr                      
              [#:module? module?         
               #:verbose? verbose?])     
               racket-files              
               dest-dir)             -> void?
  expr : any/c
  module? : any/c = #f
  verbose? : any/c = #f
  racket-files : (listof path-string?)
  dest-dir : (or/c path-string? false/c (one-of/c 'auto))
procedure
(compile-collection-zos                                            
                         collection ...+                           
                        [#:skip-path skip-path                     
                         #:skip-doc-sources? skip-docs?            
                         #:managed-compile-zo managed-compile-zo]) 
 -> void?
  collection : string?
  skip-path : (or/c path-string? #f) = #f
  skip-docs? : any/c = #f
  managed-compile-zo : (path-string? . -> . void?)
                     = (make-caching-managed-compile-zo)
procedure
(compile-directory-zos                                            
                        path                                      
                        info                                      
                       [#:verbose verbose?                        
                        #:skip-path skip-path                     
                        #:skip-doc-sources? skip-docs?            
                        #:managed-compile-zo managed-compile-zo]) 
 -> void?
  path : path-string?
  info : ()
  verbose? : any/c = #f
  skip-path : (or/c path-string? #f) = #f
  skip-docs? : any/c = #f
  managed-compile-zo : (path-string? . -> . void?)
                     = (make-caching-managed-compile-zo)
parameter
(current-compiler-dynamic-require-wrapper)
 -> ((-> any) . -> . any)
(current-compiler-dynamic-require-wrapper proc) -> void?
  proc : ((-> any) . -> . any)
parameter
(somewhat-verbose) -> boolean?
(somewhat-verbose on?) -> void?
  on? : any/c
parameter
(verbose) -> boolean?
(verbose on?) -> void?
  on? : any/c
parameter
(compile-subcollections) -> (one-of/c #t #f)
(compile-subcollections cols) -> void?
  cols : (one-of/c #t #f)
signature
compiler^ : signature
signature
compiler:option^ : signature
value
compiler@ : unit?
value
compiler:option@ : unit?
parameter
(current-command-name) -> (or/c string? #f)
(current-command-name name) -> void?
  name : (or/c string? #f)
procedure
(short-program+command-name) -> string?
procedure
(program+command-name) -> string?
