Source the conformance corpus from JVM Clojure; retire the prelude gate
corpus.edn :expected is now the value reference JVM Clojure produces, set by the new test/conformance/regen-corpus.clj (one JVM process, per-row thread watchdog). 167 rows moved to the JVM value: ratios (/ 1 2)=>1/2, doubles (double 3)=>3.0, shared-heap concurrency (the future/pmap/agent cases), clojure.math doubles. The JVM is the spec; jolt is measured against it. known-divergences.edn shrinks to the rows whose JVM value is an opaque host object that can't round-trip to source (Java arrays, transients, atoms, beans, proxies, chunks all print as #object[..@addr]) plus (fn* foo) and a few racy concurrency cases (:flaky). The zero-janet gate's allowlist becomes the set of host gaps vs the JVM spec (no Class/array/BigDecimal, :jolt reader, jolt's own printing). Math/clojure.math sqrt/pow/floor/trig now return doubles (Chez returns exact for exact args, e.g. (sqrt 9)=>3); JVM always returns a double. extract-corpus.janet no longer writes corpus.edn unless asked (the test runner imported it and was silently overwriting the JVM corpus with the spec sources' placeholder answers). The prelude parity gate is deleted — the zero-janet spine + certify.clj are the oracles. zero-janet 2678 (0 new divergences), certify 0 new / 0 stale, emit-test 330/330.
This commit is contained in:
Yogthos
parent
467ad75ff7
commit
da775802d6
13 changed files with 435 additions and 823 deletions
|
|
@ -1,5 +1,5 @@
|
|||
{:doc
|
||||
"Known divergences of test/chez/corpus.edn :expected from JVM Clojure, classified. Most are deliberate jolt-specific or host-model differences (-> :features in conformance inc3). :bug entries are genuine and tracked. The certifier (certify.clj) gates on NEW (unlisted) divergences only. Keyed by [suite label].",
|
||||
"Rows of test/chez/corpus.edn whose :expected differs from reference JVM Clojure. The corpus is JVM-sourced (regen-corpus.clj), so this list is only the rows whose JVM value is an opaque host object that cannot round-trip to readable source — Java arrays, transients, atoms, beans, proxies, and chunks print as #object[..@addr] with a per-run identity — plus the (fn* foo) strictness case and a few racy concurrency cases (:flaky). For those the corpus keeps jolt's value. certify.clj gates on NEW (unlisted) divergences and STALE entries. Keyed by [suite label].",
|
||||
:legend
|
||||
{:numeric-model
|
||||
"jolt is all-double: no Ratio/BigDecimal/float; (/ 1 2)=>0.5, 3.0 prints 3",
|
||||
|
|
@ -16,67 +16,36 @@
|
|||
:impl-detail
|
||||
"representation detail: syntax-quote yields a list? (JVM yields a Cons)"},
|
||||
:entries
|
||||
[{:suite "clojure.core / futures — predicates",
|
||||
[{:suite "forms / fn",
|
||||
:label "no param vector",
|
||||
:category :strictness}
|
||||
;; racy: agent send / future-cancel observe state that the action thread may or
|
||||
;; may not have reached yet, so the JVM value is nondeterministic run-to-run.
|
||||
{:suite "state / agents (synchronous shim)", :label "send applies",
|
||||
:category :concurrency-model, :flaky true}
|
||||
{:suite "state / agents (synchronous shim)", :label "send-off applies",
|
||||
:category :concurrency-model, :flaky true}
|
||||
{:suite "clojure.core / futures — predicates",
|
||||
:label "cancel an in-flight future returns true",
|
||||
:category :concurrency-model,
|
||||
:flaky true}
|
||||
{:suite "clojure.core / futures — snapshot (copy) semantics",
|
||||
:label "captured atom is snapshotted, not shared",
|
||||
:category :concurrency-model}
|
||||
{:suite "clojure.core / pmap family",
|
||||
:label "snapshot semantics",
|
||||
:category :concurrency-model}
|
||||
{:suite "state / agents (synchronous shim)",
|
||||
:label "send applies",
|
||||
:category :concurrency-model}
|
||||
{:suite "state / agents (synchronous shim)",
|
||||
:label "send-off applies",
|
||||
:category :concurrency-model}
|
||||
{:suite "core / extenders",
|
||||
:label "lists extended type",
|
||||
:category :host-model}
|
||||
{:suite "core / extenders",
|
||||
:label "seq of tags",
|
||||
:category :host-model}
|
||||
{:suite "core / with-open",
|
||||
:label "close on throw",
|
||||
:category :host-model}
|
||||
{:suite "host-interop / class tokens & readers",
|
||||
:label "class name evaluates to canonical string",
|
||||
:category :host-model}
|
||||
{:suite "host-interop / exception + HashMap shims",
|
||||
:label "getMessage on a thrown string",
|
||||
:category :host-model}
|
||||
{:suite "io / *in* + with-in-str + read-line",
|
||||
:label "*in* is bound",
|
||||
:category :host-model}
|
||||
{:suite "metadata / def metadata",
|
||||
:label "^Type tag on var",
|
||||
:category :host-model}
|
||||
:category :concurrency-model, :flaky true}
|
||||
{:suite "clojure.core / futures — predicates",
|
||||
:label "future-cancelled? after cancel",
|
||||
:category :concurrency-model, :flaky true}
|
||||
{:suite "io / cold tagged types via print-method",
|
||||
:label "atom override fires nested",
|
||||
:category :reader-model}
|
||||
{:suite "io / cold tagged types via print-method",
|
||||
:label "transient map",
|
||||
:category :printer-model}
|
||||
{:suite "io / cold tagged types via print-method",
|
||||
:label "transient vector",
|
||||
:category :printer-model}
|
||||
{:suite "metadata / type hints",
|
||||
:label "symbol hint -> :tag",
|
||||
:category :host-model}
|
||||
{:suite "predicates / compare, type, any? (stage 3)",
|
||||
:label "type of record",
|
||||
:category :host-model}
|
||||
{:suite "predicates / tagged-value (Phase 4)",
|
||||
:label "chunked-seq? always false",
|
||||
:category :host-model}
|
||||
{:suite "untested / JVM-shape stubs (documented jolt behavior)",
|
||||
:label "bean is the map",
|
||||
:category :host-model}
|
||||
{:suite "untested / JVM-shape stubs (documented jolt behavior)",
|
||||
:label "class keyword",
|
||||
:category :host-model}
|
||||
{:suite "untested / JVM-shape stubs (documented jolt behavior)",
|
||||
:label "class number",
|
||||
:category :host-model}
|
||||
{:suite "untested / JVM-shape stubs (documented jolt behavior)",
|
||||
:label "class string",
|
||||
:category :host-model}
|
||||
{:suite "untested / JVM-shape stubs (documented jolt behavior)",
|
||||
:label "definterface defines",
|
||||
:category :host-model}
|
||||
{:suite "untested / JVM-shape stubs (documented jolt behavior)",
|
||||
:label "proxy resolves nil",
|
||||
:category :host-model}
|
||||
|
|
@ -106,119 +75,4 @@
|
|||
:category :host-model}
|
||||
{:suite "untested / chunk family (eager equivalents) + cat",
|
||||
:label "chunk round-trip",
|
||||
:category :host-model}
|
||||
{:suite "untested / ns + REPL machinery",
|
||||
:label "*in* bound",
|
||||
:category :host-model}
|
||||
{:suite "untested / ns + REPL machinery",
|
||||
:label "ns-imports empty user",
|
||||
:category :host-model}
|
||||
{:suite "untested / unchecked-* are plain ops",
|
||||
:label "unchecked-char",
|
||||
:category :host-model}
|
||||
{:suite "macros / defmacro",
|
||||
:label "macroexpand-1",
|
||||
:category :impl-detail}
|
||||
{:suite "clojure.core / leaf batch (complement fnil munge etc.)",
|
||||
:label "bigdec",
|
||||
:category :numeric-model}
|
||||
{:suite
|
||||
"conformance / native-op parity (compile emits janet ops at guarded arities)",
|
||||
:label "native unary div",
|
||||
:category :numeric-model}
|
||||
{:suite "numbers / arithmetic",
|
||||
:label "divide to fraction",
|
||||
:category :numeric-model}
|
||||
{:suite "numbers / literal syntax",
|
||||
:label "bigdec int M",
|
||||
:category :numeric-model}
|
||||
{:suite "numbers / literal syntax",
|
||||
:label "bigdec suffix M",
|
||||
:category :numeric-model}
|
||||
{:suite "numbers / literal syntax",
|
||||
:label "neg ratio",
|
||||
:category :numeric-model}
|
||||
{:suite "numbers / literal syntax",
|
||||
:label "ratio -> double",
|
||||
:category :numeric-model}
|
||||
{:suite "numbers / literal syntax",
|
||||
:label "ratio 3/4",
|
||||
:category :numeric-model}
|
||||
{:suite "numbers / printing of inf & nan",
|
||||
:label "inf inside coll",
|
||||
:category :numeric-model}
|
||||
{:suite "numbers / printing of inf & nan",
|
||||
:label "pr-str Infinity",
|
||||
:category :numeric-model}
|
||||
{:suite "reader / scalar literals",
|
||||
:label "bigdec suffix M",
|
||||
:category :numeric-model}
|
||||
{:suite "reader / scalar literals",
|
||||
:label "ratio -> double",
|
||||
:category :numeric-model}
|
||||
{:suite "untested / primed + division + bit ops",
|
||||
:label "/ ratio-as-double",
|
||||
:category :numeric-model}
|
||||
{:suite "untested / typed coercion views",
|
||||
:label "double",
|
||||
:category :numeric-model}
|
||||
{:suite "untested / typed coercion views",
|
||||
:label "float",
|
||||
:category :numeric-model}
|
||||
{:suite "untested / unchecked-* are plain ops",
|
||||
:label "unchecked-double",
|
||||
:category :numeric-model}
|
||||
{:suite "untested / unchecked-* are plain ops",
|
||||
:label "unchecked-float",
|
||||
:category :numeric-model}
|
||||
{:suite "io / cold tagged types via print-method",
|
||||
:label "transient map",
|
||||
:category :printer-model}
|
||||
{:suite "io / cold tagged types via print-method",
|
||||
:label "transient vector",
|
||||
:category :printer-model}
|
||||
{:suite "io / print-method multimethod",
|
||||
:label "defmethod fires through prn",
|
||||
:category :printer-model}
|
||||
{:suite "io / print-method multimethod",
|
||||
:label "defmethod overrides a record, top level",
|
||||
:category :printer-model}
|
||||
{:suite "io / cold tagged types via print-method",
|
||||
:label "atom override fires nested",
|
||||
:category :reader-model}
|
||||
{:suite "io / print-method multimethod",
|
||||
:label "defmethod fires nested in a map",
|
||||
:category :reader-model}
|
||||
{:suite "maps / literal construction",
|
||||
:label "source order through syntax-quote",
|
||||
:category :reader-model}
|
||||
{:suite "reader / dispatch & sugar",
|
||||
:label "reader cond :jolt",
|
||||
:category :reader-model}
|
||||
{:suite "reader / dispatch & sugar",
|
||||
:label "reader cond no match",
|
||||
:category :reader-model}
|
||||
{:suite "reader / dispatch & sugar",
|
||||
:label "reader cond splice",
|
||||
:category :reader-model}
|
||||
{:suite "reader / dispatch & sugar",
|
||||
:label "reader cond splice no match",
|
||||
:category :reader-model}
|
||||
{:suite "reader / dispatch & sugar",
|
||||
:label "reader conditional",
|
||||
:category :reader-model}
|
||||
{:suite "reader / syntax-quote literal collapse (spec 2.4 S25)",
|
||||
:label "bool nested",
|
||||
:category :reader-model}
|
||||
{:suite "reader / syntax-quote literal collapse (spec 2.4 S25)",
|
||||
:label "nil nested",
|
||||
:category :reader-model}
|
||||
{:suite "forms / fn",
|
||||
:label "no param vector",
|
||||
:category :strictness}
|
||||
{:suite "transient / assoc! odd args throw",
|
||||
:label "map dangling key",
|
||||
:category :strictness}
|
||||
{:suite "transient / assoc! odd args throw",
|
||||
:label "vector dangling",
|
||||
:category :strictness}]}
|
||||
:category :host-model}]}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue