jolt unifies every integer as one exact-integer type, so (byte/short/int n) report Long not Byte/Short/Integer and instance? Byte is false. Confirmed substrate-inherent: (byte 5) is a Chez immediate identical? to 5 (nothing to tag, numbers carry no metadata), and arithmetic compiles to a raw Chez + that a boxed narrow type would crash. Value/arithmetic/equality are correct. Certify the value-correctness (= to plain int, arithmetic promotes, is a Number) and pin the class/instance? divergence under a new :integer-box-model category. Data/doc only.
9.5 KiB
The jolt conformance spec
This directory defines jolt's behavior as a host-neutral, executable language specification: a data file of cases, certified against reference Clojure, with a feature profile that lets any runtime declare a conformance level. The goal is to make hosting jolt on a new runtime (and proving it correct) a mechanical exercise: read one data file, run each case, compare, report.
The artifacts
| File | Role | Generated by |
|---|---|---|
test/chez/corpus.edn |
The spec. ~2900 cases of {:suite :label :expected :actual}, :expected sourced from reference JVM Clojure. |
test/conformance/regen-corpus.clj |
test/conformance/profile.edn |
Per-case feature classification — which non-portable cases need which host capability. | certify.clj --profile |
test/conformance/known-divergences.edn |
The few rows whose JVM value is an opaque host object that can't round-trip to readable source (Java arrays/transients/atoms/beans/proxies print as #object[..@addr]), so the corpus keeps jolt's value. |
regen-corpus.clj leftovers, hand-checked |
test/conformance/regen-corpus.clj |
Sources every :expected from reference JVM Clojure in one process. |
— |
test/conformance/certify.clj |
Certifies :expected against reference JVM Clojure; gates on new/stale divergences; emits the profile. |
— |
corpus.edn is JVM-sourced: regen-corpus.clj evaluates each case's :actual
on reference JVM Clojure and writes the JVM value as :expected. corpus.edn is
the canonical, frozen contract: it is what every runtime consumes, what
certify.clj certifies, and where new cases are authored directly.
Row schema
{:suite "numbers / arithmetic" ; grouping; "<suite> :: <label>" is the case id
:label "integer add" ; unique within a suite
:actual "(+ 1 2)" ; Clojure source to evaluate
:expected "3"} ; Clojure source whose value it must equal,
; or the keyword :throws
[:suite :label]is the canonical, unique case id (the generator disambiguates duplicate labels with(N)).- Comparison is value-equality (
=), never string/printed-form — so map/set iteration order never matters. - Because comparison is
=, a type or laziness difference is invisible to a plain value row:(= [0 1] '(0 1))is true, so a fn returning a vector where Clojure returns a seq still passes. Pin those explicitly — container/element type with a predicate row ((seq? …),(vector? …),(every? seq? …)), and laziness with a(take n (… (range)))row over an infinite source (it hangs, not just diverges, if the fn isn't lazy). Theseq / lazy over infinitesuite does both. :expected :throwsasserts evaluating:actualraises.
The oracle: reference JVM Clojure
Historically every :expected was hand-written. certify.clj removes that
weakness: it evaluates every :actual (and :expected) on JVM Clojure in a
fresh user namespace and checks jolt's :expected against what real Clojure
produces. Of ~2740 vanilla-certifiable rows, >2730 match reference Clojure
exactly. The rest are classified (see below) — none are silently wrong.
clojure -M test/conformance/certify.clj # gate
clojure -M test/conformance/certify.clj test/chez/corpus.edn --edn r.edn # + report
clojure -M test/conformance/certify.clj test/chez/corpus.edn --profile test/conformance/profile.edn
The gate fails only on a new (unclassified) divergence or a stale
allowlist entry; flaky timing-dependent cases (future-cancel) are tolerated.
Conformance levels & the feature profile
Not every case is portable: some assume a host capability jolt has on one runtime
but not another (Java interop, real threads, BigDecimal). profile.edn classifies
each non-portable case by the feature it requires. Cases not in the profile
are portable — they must pass on any faithful Clojure.
A runtime's conformance level = portable cases + the feature families it implements. Current profile (≈2735 portable, ≈167 non-portable):
| Feature | Meaning |
|---|---|
:numerics/double-only |
all-double numeric model — no Ratio/BigDecimal/float; (/ 1 2) ⇒ 0.5 |
:concurrency/snapshot |
isolated-heap futures/agents/pmap — captured atoms are snapshotted, not shared |
:host/jvm-interop |
Java classes / instance? on host classes / proxy / bean / definterface |
:host/arrays |
Java arrays (into-array, int-array, …) |
:async/core-async |
clojure.core.async channels/go |
:runtime/eval |
runtime eval / load-string |
:reader/jolt |
jolt reader features (#?(:jolt …)) + syntax-quote literal collapse |
:printer/jolt |
jolt's rendering of transients/atoms/print-method overrides |
:strictness/jolt |
intentionally stricter (throws on odd assoc! args, etc.) |
:impl/representation |
representation detail (e.g. syntax-quote yields a list?, not a Cons) |
:bug |
a known defect (tracked bead) — not a host difference |
Seq semantics
Values alone don't pin laziness — an eager map and a lazy map return the same
elements. The spec certifies seq semantics by reducing them to values with a
side-effect counter, so the corpus catches a laziness regression the value
comparison would miss.
Laziness (certified — jolt matches JVM). The whole producer family
(map/filter/remove/take/drop/concat/take-while/drop-while/mapcat/
partition/partition-all/partition-by/keep/keep-indexed/map-indexed/
distinct/interpose/interleave/take-nth/reductions/tree-seq/replace)
is lazy at construction: building over a side-effecting source realizes zero
elements (lazy / family is lazy at construction). Realization order is
left-to-right, take/nth/drop realize exactly as far as demanded, a lazy seq
memoizes (realize-once across walks), and next realizes head + one lookahead
while rest realizes only the head (lazy / realization order & count,
lazy / realization is memoized, lazy / realization timing). A lazy result is
clojure.lang.LazySeq.
Accepted divergences. jolt is a simpler, finer-grained superset of JVM seq
behavior; two classes diverge by representation, never by value, and are
allowlisted in known-divergences.edn:
:seq-type-model(seq-type-model / …suite, jolt-aei7) — jolt reifies every seq asPersistentList(eager) orLazySeq(deferred). JVM has a specialized class per producer (Cons,Iterate,LongRange,Repeat,Cycle,PersistentVector$ChunkedSeq,StringSeq,KeySeq/ValSeq,RSeq,ArraySeq,SubVector), so(class …)differs.instance? clojure.lang.ISeq/Sequentialand all values/laziness are correct.:chunking-model(chunking-model / …suite, jolt-mm6v) — jolt seqs are unchunked: forcing one element realizes one, where JVM realizes a ~32-element chunk;mapcat/deduperealize 0 at construction where JVM forces the first chunk. Strictly finer-grained laziness, decided after the chunk fast path (jolt-j9dz) was made O(n).
Narrow integer types
jolt unifies every integer as one exact-integer type (:integer-box-model,
jolt-k9sw). (byte n)/(short n)/(int n) produce value-correct integers —
arithmetic, =, and hash behave exactly as the JVM — but report Long, not
Byte/Short/Integer, so (class (byte 5)) and (instance? Byte (byte 5))
diverge. This is substrate-inherent: a Chez fixnum is an immediate identical?
to the plain integer (nothing to tag, and numbers carry no metadata), so the only
faithful representation is a boxed type — which would crash raw compiled (+ …)
(arithmetic emits a bare Chez +) or force every +/-/* through an
unwrapping dispatcher, de-optimizing all arithmetic. Same shape as the accepted
BigInt-vs-Long unification.
Hosting jolt on a new runtime
-
Implement the reader + analyzer + a backend for your runtime (see the Chez port under
host/chez/for a worked example). -
Write a ~30-line harness that, for each corpus row, evaluates
:actualand:expectedand compares by value-equality (skip:throwsrows to an expect-raises check). Pseudocode:(doseq [{:keys [suite label actual expected]} (read-edn "test/chez/corpus.edn")] (let [feats (profile-features [suite label])] ; from profile.edn (when (subset? feats my-implemented-features) ; only cases I claim to support (record! [suite label] (if (= :throws expected) (raises? actual) (value= (eval actual) (eval expected))))))) -
Run it. Your conformance level is the set of feature families with no failures. Portable-only is the floor; each feature you implement raises it.
The reference harness does exactly this on Chez: host/chez/run-corpus.ss (the
analyzer runs on Chez → Chez runtime), with a regression floor. Run it via make corpus.
Maintaining the spec
- Add/change cases: edit
test/chez/corpus.edndirectly, then re-source the answers withregen-corpus.clj. - Re-certify:
clojure -M test/conformance/certify.clj. A new divergence is either a real bug (file it, mark the allowlist entry:bug+:bead) or a deliberate delta (classify it inknown-divergences.edn). - Refresh the profile: re-run with
--profile test/conformance/profile.edn. - Re-floor the runtime gate when parity rises (
host/chez/run-corpus.ss).