wwstage dotchainresolve gated its *T roots on an N_TPTR-over-N_TNAME
tnode; an inferred `let p = alloc(S{...})!` rides the checker-
SYNTHESIZED N_TPTR whose pointee is the struct BODY node (the #24
TNAME-normalize covers only the direct struct-lit binding), so the
root gate failed and chained p.field.pseudo reads fell to the
unfused deref arms — shape-only divergence vs cstage's type-keyed
fold (both stages runtime-correct; the historical field(SB) leak the
pin described was already fixed). Widen the local and global root
gates to accept the N_TSTRUCT pointee; correctness stays enforced by
the stamped-tinfo peel below (TY_PTR -> pointee TY_STRUCT).
Graduates alias_g73_heapfill out of DATABYTEID_DIVERGED (2 pins
remain, both the tagged-spill family); adds compile fixtures pinning
the newly-converged siblings (nested read+store, slice .cap,
inferred-global root; pin 1730/22/3460) and a runtime lang row that
mutates then re-points the heap base — a read bypassing the pointer
returns the wrong len.
99 lines
1.7 KiB
Plaintext
99 lines
1.7 KiB
Plaintext
package wwfixture;
|
|
|
|
def protocolversion: i32 = 1;
|
|
def corpuscount: i32 = 1730;
|
|
def errorcount: i32 = 343;
|
|
def compilecount: i32 = 22;
|
|
def runcount: i32 = 209;
|
|
def runexitcount: i32 = 1156;
|
|
def nativecount: i32 = 3460;
|
|
def corpushash: str = "5c20c19b826359fcceb45c8db5cf405f39183a68783582eaaf5f38f0e88f3771";
|
|
|
|
type directive = enum i32 {
|
|
ERROR = 0,
|
|
RUN = 1,
|
|
RUNEXIT = 2,
|
|
COMPILE = 3,
|
|
};
|
|
|
|
type stage = enum i32 {
|
|
C = 0,
|
|
WW = 1,
|
|
};
|
|
|
|
type phase = enum i32 {
|
|
COMPILE = 0,
|
|
BUILD = 1,
|
|
RUN = 2,
|
|
};
|
|
|
|
type verdict = enum i32 {
|
|
PASS = 0,
|
|
FAIL = 1,
|
|
ERROR = 2,
|
|
};
|
|
|
|
type termination = enum i32 {
|
|
EXIT = 0,
|
|
SIGNAL = 1,
|
|
TIMEOUT = 2,
|
|
SETUP = 3,
|
|
};
|
|
|
|
type fixture = struct {
|
|
name: str,
|
|
id: str,
|
|
source: str,
|
|
directive: directive,
|
|
diagnostic: str,
|
|
wwdiagnostic: str,
|
|
exitcode: i32,
|
|
};
|
|
|
|
type corpus = struct {
|
|
root: str,
|
|
fixtures: []fixture,
|
|
};
|
|
|
|
type identity = struct {
|
|
ordinal: i32,
|
|
fixtureindex: i32,
|
|
stage: stage,
|
|
};
|
|
|
|
type cellresult = struct {
|
|
ordinal: i32,
|
|
id: str,
|
|
stage: stage,
|
|
phase: phase,
|
|
verdict: verdict,
|
|
termination: termination,
|
|
code: i32,
|
|
durationns: i64,
|
|
capture: str,
|
|
};
|
|
|
|
fn stageword(s: stage) str = {
|
|
if (s == stage.C) { return "c"; };
|
|
return "ww";
|
|
};
|
|
|
|
fn phaseword(p: phase) str = {
|
|
if (p == phase.COMPILE) { return "compile"; };
|
|
if (p == phase.BUILD) { return "build"; };
|
|
return "run";
|
|
};
|
|
|
|
fn verdictword(v: verdict) str = {
|
|
if (v == verdict.PASS) { return "pass"; };
|
|
if (v == verdict.FAIL) { return "fail"; };
|
|
return "error";
|
|
};
|
|
|
|
fn terminationword(t: termination) str = {
|
|
if (t == termination.EXIT) { return "exit"; };
|
|
if (t == termination.SIGNAL) { return "signal"; };
|
|
if (t == termination.TIMEOUT) { return "timeout"; };
|
|
return "setup";
|
|
};
|