W14: C9 eliminate empty suite labels (test-only) — section E complete

The finding ("spec suites print with empty suite label") was six files
wide: test-chars (43 suite-less top-level deftests), test-import-bind
(14), test-ports (12), test-let-match (8), test-math (deftests NESTED in
deftests — every test reported as " > sin"), and 4 stray deftests between
suites in test-hyperscript-conformance.

Fixes: file-level defsuite wraps for the four flat files (mechanical wrap,
sx_validate-checked); test-math restructured deftest->defsuite ("math >
string->number"); hs strays wrapped in suites named for their section
comments (hs-compat-blockLiteral/cookies/some/where). The two
baseline-visible identities are renamed in spec/tests/known-failures.txt
in this same commit — the F10 gate enforces exactly this coupling.

Full baseline gate validated GREEN: 5798p/273f, fail set identical
(the -2 passes are the two wrapper deftests that no longer self-report
a vacuous PASS around their children).

Test-only: no semantics edits, no push.

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
2026-07-04 04:39:23 +00:00
parent 8ba68e0365
commit 59adee0d2b
8 changed files with 52 additions and 11 deletions

View File

@@ -1,7 +1,10 @@
;; Math completeness tests. C9 note: this file used NESTED deftests with no
;; defsuite, so every test reported with an empty suite label (" > sin").
;; Restructured to defsuite/deftest — labels are now "math > sin" etc.
(deftest
"math completeness"
(deftest
(defsuite
"math"
(defsuite
"trigonometry"
(deftest
"sin"
@@ -124,7 +127,10 @@
true
(< (abs (- (cos (acos 0.5)) 0.5)) 0.0001)
"cos(acos(x)) = x")
(assert= true (< (abs (- (exp (log 2)) 2)) 0.0001) "exp(log(x)) = x")
(assert=
true
(< (abs (- (exp (log 2)) 2)) 0.0001)
"exp(log(x)) = x")
(assert=
(* 12 18)
(* (gcd 12 18) (lcm 12 18))