4e942b5373
Rename all example tests/companions to the XXXX-category-test-name scheme (per-category 100-blocks: basic 0010, types 0100, ... errors 1000, diagnostics 1100, ffi 1200, ffi-objc 1300, ffi-jni 1400, vectors 1500, platform 1600). Companions and dir/C fixtures move in lockstep with their parent test; #import/#source/#include paths rewritten to match. Expected output now lives in examples/expected/ (a sibling dir of the tests) split into three streams per the new convention: <name>.exit / <name>.stdout / <name>.stderr (+ optional <name>.ir) run_examples.sh rewritten: scans examples/ and issues/ for an expected/<name>.exit marker, captures stdout and stderr separately (no more 2>&1), compares each stream + exit + optional IR snapshot. Behavior validated unchanged: every renamed test reproduces its prior merged output + exit (diffs limited to file paths/basenames embedded in diagnostics + traces, which correctly reflect the new names). Suite: 292 passed, 0 failed. 50-smoke.sx split + issue relocation + docs follow in subsequent commits.
26 lines
939 B
Plaintext
26 lines
939 B
Plaintext
// Feature 1 — materialize a tuple from a pack via `(..xs.method)` (Decision 2:
|
|
// a pack is stored by materializing a tuple). `(..xs.get)` projects `get` over
|
|
// the pack and collects the results into a real tuple value, which can then be
|
|
// stored, indexed, and (for `Box(T)`) is heterogeneous per position.
|
|
|
|
#import "modules/std.sx";
|
|
|
|
Box :: protocol(T: Type) {
|
|
get :: () -> T;
|
|
}
|
|
IntCell :: struct { v: s64; }
|
|
StrCell :: struct { s: string; }
|
|
impl Box(s64) for IntCell { get :: (self: *IntCell) -> s64 => self.v; }
|
|
impl Box(string) for StrCell { get :: (self: *StrCell) -> string => self.s; }
|
|
|
|
snapshot :: (..xs: Box) -> void {
|
|
t := (..xs.get); // tuple (s64, string) materialized from the pack
|
|
print("0={} 1={}\n", t.0, t.1);
|
|
}
|
|
|
|
main :: () -> s32 {
|
|
snapshot(IntCell.{ v = 42 }, StrCell.{ s = "hi" });
|
|
snapshot(StrCell.{ s = "x" }, IntCell.{ v = 7 }); // order swapped → (string, s64)
|
|
0;
|
|
}
|