Commit84a7e940Recorded25 Aug 2026Repositoryfolio

test: T2/T2c plants carry their markers as inert quoted symbols

Message

The comment-style markers swallowed each line's trailing closes -- the same class TA's first spelling hit -- and both legs SETUP-FAILED on the planted build, exactly what the build_planted guard exists to catch. (begin (quote sab-t2) out) keeps the balance and the grep-ability; both plants re-dry-verified to land uniquely AND format clean.

Changed
 test/sabotage-f3b.sh | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)
Diff
test/sabotage-f3b.shmodified
@@ -120,8 +120,8 @@ echo " asserts on the referrer files are what catches it"
120
echo " PREDICT RED: b5-rename (residue in ref files)"
121
echo " PREDICT GREEN: b1"
122
sed -i 's/(if (= accounted (length hits))/(if #t ;; SAB-T1/' src/folio/doc/structural.sgl
−123
sed -i 's/(walk rest (if f (cons (list n f) out) out))/(walk rest out) ;; SAB-T2/' src/folio/doc/structural.sgl
−124
if plant_landed T2 "$ST" "$h_st" "SAB-T2" 1 && build_planted T2; then
+123
sed -i 's/(walk rest (if f (cons (list n f) out) out))/(walk rest (begin (quote sab-t2) out))/' src/folio/doc/structural.sgl
+124
if plant_landed T2 "$ST" "$h_st" "sab-t2" 1 && build_planted T2; then
125
run_battery T2 || true
126
ok=0
127
expect T2 b5-rename RED || ok=1
@@ -137,8 +137,8 @@ echo " two sites stale, which is exactly the residue GRAPH CLOSURE exists"
137
echo " to catch"
138
echo " PREDICT RED: b5-rename WITH the closure signature"
139
sed -i 's/(if (= accounted (length hits))/(if #t ;; SAB-T1/' src/folio/doc/structural.sgl
−140
sed -i 's/(walk rest (if f (cons (list n f) out) out))/(walk rest (if (and f (null? out)) (cons (list n f) out) out)) ;; SAB-T2C/' src/folio/doc/structural.sgl
−141
if plant_landed T2c "$ST" "$h_st" "SAB-T2C" 1 && build_planted T2c; then
+140
sed -i 's/(walk rest (if f (cons (list n f) out) out))/(walk rest (if (and f (null? out)) (cons (list n f) out) (begin (quote sab-t2c) out)))/' src/folio/doc/structural.sgl
+141
if plant_landed T2c "$ST" "$h_st" "sab-t2c" 1 && build_planted T2c; then
142
run_battery T2c || true
143
ok=0
144
expect T2c b5-rename RED || ok=1