Rename src/jolt -> stdlib (the runtime-loaded layer; jolt-core stays the seed-baked layer) and update the loader / emit-image / doc paths. Drop dead code: the spike/ experiments, the duplicate clojuredocs-export.edn (json moves to tools/), the Janet-era jolt.http binding, and the orphaned persistent_vector.clj whose ns/path didn't even match. Strip porting residue from comments and docstrings across host/chez, jolt-core, stdlib, tests, and docs: internal issue ids, "Phase N" markers, and the "vs Janet" historical exposition, leaving present-tense descriptions and the real JVM-Clojure semantic contrasts. Same pass over the corpus suite labels. The seed is unchanged (docstrings/comments aren't emitted), so the self-host fixpoint and corpus are untouched. Port tools/spec_coverage.py off the dead janet probe to bin/joltc and regenerate coverage.md; drop the dead :host/janet rule from certify.clj and regenerate the conformance profile. Add docs/host-interop.md (the JVM shims and how to register your own host class from a library) and a writing-style note in CLAUDE.md. Stabilize the four racy concurrency corpus cases (future-cancel and agent send/send-off): give the future a sleeping body and the agent a slow action, so cancel reliably catches an in-flight future and deref reliably reads the pre-update snapshot. They certify deterministically now, so drop their :flaky allowlist entries and the orphaned legend.
41 lines
1.8 KiB
Scheme
41 lines
1.8 KiB
Scheme
;; bootstrap.ss — the pure-Chez self-build.
|
|
;;
|
|
;; Given a SEED (prelude, image) pair — the bootstrap compiler, checked in under
|
|
;; host/chez/seed/ — it loads them, then rebuilds the clojure.core prelude AND the
|
|
;; compiler image from the .clj/.ss sources using the on-Chez compiler
|
|
;; (emit-image.ss), writing fresh artifacts: read -> analyze -> emit all run on
|
|
;; Chez. The seed is a JOINT fixpoint, so a rebuild from an up-to-date seed
|
|
;; reproduces it byte-for-byte (`make selfhost` checks this); when the sources
|
|
;; change, run it twice to reconverge and re-mint the seed.
|
|
;;
|
|
;; Run from the repo root:
|
|
;; chez --script host/chez/bootstrap.ss SEED-PRELUDE SEED-IMAGE OUT-PRELUDE OUT-IMAGE
|
|
(import (chezscheme))
|
|
|
|
(define bs-args (cdr (command-line))) ; drop the script name
|
|
(when (< (length bs-args) 4)
|
|
(display "usage: bootstrap.ss SEED-PRELUDE SEED-IMAGE OUT-PRELUDE OUT-IMAGE\n")
|
|
(exit 2))
|
|
(define bs-seed-prelude (list-ref bs-args 0))
|
|
(define bs-seed-image (list-ref bs-args 1))
|
|
(define bs-out-prelude (list-ref bs-args 2))
|
|
(define bs-out-image (list-ref bs-args 3))
|
|
|
|
;; Load the runtime + the SEED compiler (prelude for macros, image for the
|
|
;; analyzer/emitter), exactly as the spine assembles a program.
|
|
(load "host/chez/rt.ss")
|
|
(set-chez-ns! "clojure.core")
|
|
(load bs-seed-prelude)
|
|
(load "host/chez/post-prelude.ss")
|
|
(set-chez-ns! "user")
|
|
(load "host/chez/host-contract.ss")
|
|
(load bs-seed-image)
|
|
(load "host/chez/compile-eval.ss")
|
|
(load "host/chez/emit-image.ss")
|
|
|
|
;; Rebuild both artifacts from source ON CHEZ and write them out.
|
|
(let ((p (open-output-file bs-out-prelude 'replace)))
|
|
(put-string p (jolt-emit-prelude)) (close-port p))
|
|
(let ((p (open-output-file bs-out-image 'replace)))
|
|
(put-string p (jolt-emit-image)) (close-port p))
|
|
(display "bootstrap: rebuilt prelude + compiler image on Chez\n")
|