Hojun-Cho
503d1ab01e
cstage rejects `add(1,2,3)` and `add(4)` (too many / not enough arguments); wwstage ran no count check at this seam, so both built -- a stray arg pushed silently, a missing one read garbage (cs-reject/ww-accept build-verdict divergence). Surplus errs when params exhaust with args left; missing errs on a leftover regular param (a leftover TK_ELLIPSIS or FFI "..." is a legal zero-arg variadic tail). fn-VALUE callees still bail at decl==nil -- their whole typecheck, arity included, stays task #51.
99 lines
1.7 KiB
Plaintext
99 lines
1.7 KiB
Plaintext
package wwfixture;
|
|
|
|
def protocolversion: i32 = 1;
|
|
def corpuscount: i32 = 1754;
|
|
def errorcount: i32 = 351;
|
|
def compilecount: i32 = 21;
|
|
def runcount: i32 = 209;
|
|
def runexitcount: i32 = 1173;
|
|
def nativecount: i32 = 3508;
|
|
def corpushash: str = "67a119b41fd78b1f2900c096e5b5670e98935d2965573f67bb21ab817931dffa";
|
|
|
|
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";
|
|
};
|