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:
21
test/wcc/data/r695_match_bind_mixed_struct/case.ww
Normal file
21
test/wcc/data/r695_match_bind_mixed_struct/case.ww
Normal file
@@ -0,0 +1,21 @@
|
||||
//ww:run
|
||||
package main;
|
||||
type mix = struct { x: i32, y: i32, z: i64, w: i64 };
|
||||
type tag = (mix | i32);
|
||||
type holder = struct { t: tag, mark: i32 };
|
||||
fn main() i32 = {
|
||||
let h: holder;
|
||||
h.mark = 99;
|
||||
let m: mix = mix { x = 3, y = 5, z = 11i64, w = 12i64 };
|
||||
h.t = (m: tag);
|
||||
match (h.t) {
|
||||
case let v: mix => {
|
||||
if (v.x != 3) { return 10; };
|
||||
if (v.y != 5) { return 11; };
|
||||
if (v.z != 11i64) { return 12; };
|
||||
if (v.w != 12i64) { return 13; };
|
||||
return 0;
|
||||
};
|
||||
case let z: i32 => return 2;
|
||||
};
|
||||
};
|
||||
Reference in New Issue
Block a user