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.
39 lines
1.3 KiB
Plaintext
39 lines
1.3 KiB
Plaintext
// Feature 1 — TYPE-position pack projection `xs.T`. The per-element protocol
|
|
// type-arg `T` projects into a Pack of types, usable in type/signature
|
|
// positions: a tuple type `(..xs.T)` and a closure signature
|
|
// `Closure(..xs.T) -> R`. (`T` of each element comes from its
|
|
// `impl Box(T) for <elem>`.)
|
|
|
|
#import "modules/std.sx";
|
|
|
|
Box :: protocol(T: Type) {
|
|
get :: () -> T;
|
|
}
|
|
|
|
IntCell :: struct { v: s64; }
|
|
StrCell :: struct { s: string; }
|
|
Dbl :: struct { n: s64; }
|
|
impl Box(s64) for IntCell { get :: (self: *IntCell) -> s64 => self.v; }
|
|
impl Box(string) for StrCell { get :: (self: *StrCell) -> string => self.s; }
|
|
impl Box(s64) for Dbl { get :: (self: *Dbl) -> s64 => self.n * 2; }
|
|
|
|
// Tuple type `(..xs.T)` — heterogeneous (s64, string), matched by the
|
|
// value-projection `(..xs.get)`.
|
|
snap :: (..xs: Box) -> void {
|
|
t : (..xs.T) = (..xs.get);
|
|
print("0={} 1={}\n", t.0, t.1);
|
|
}
|
|
|
|
// Closure signature `Closure(..xs.T) -> s64` — here `Closure(s64, s64) -> s64`.
|
|
// The closure literal's params are contextually typed from the projection.
|
|
fold :: (..xs: Box) -> s64 {
|
|
cb : Closure(..xs.T) -> s64 = (a, b) => a + b;
|
|
return cb(xs[0].get(), xs[1].get());
|
|
}
|
|
|
|
main :: () -> s32 {
|
|
snap(IntCell.{ v = 42 }, StrCell.{ s = "hi" }); // (s64, string)
|
|
print("fold={}\n", fold(IntCell.{ v = 10 }, Dbl.{ n = 5 })); // 10 + 10 = 20
|
|
0;
|
|
}
|