test/wcc/data: grow the declarative compiler corpus to 1,224 fixtures
The r-prefixed waves absorb the runtime, reject, and byte-compare rows of the migrated native carriers; each fixture is one directory with one case.ww and a //ww:error, //ww:compile, //ww:run, or //ww:run-exit directive covering both frontends.
This commit is contained in:
19
test/wcc/data/r929_memarg_reject_param_overflow/case.ww
Normal file
19
test/wcc/data/r929_memarg_reject_param_overflow/case.ww
Normal file
@@ -0,0 +1,19 @@
|
||||
//ww:error ">48B tagged param mixed with stack-spilled params unwired"
|
||||
package main;
|
||||
type t_lit = rune;
|
||||
type t_any = void;
|
||||
type t_rep = struct { id: size, origin: size, m0: size, m1: size, m2: size, m3: size };
|
||||
type t_u = (t_lit | t_any | t_rep);
|
||||
fn f(a: t_u, s1: str, s2: str, k: i64) i64 = {
|
||||
match (a) {
|
||||
case let r: t_rep => return (r.m3: i64) + (s1.len: i64) + (s2.len: i64) + k;
|
||||
case => return 91;
|
||||
};
|
||||
return 99;
|
||||
};
|
||||
export fn main() i32 = {
|
||||
let r: t_rep = t_rep { id = 7, origin = 9, m0 = 10, m1 = 11, m2 = 12, m3 = 1234 };
|
||||
let a: t_u = r;
|
||||
if (f(a, "abc", "de", 1) != 1240) { return 1; };
|
||||
return 0;
|
||||
};
|
||||
Reference in New Issue
Block a user