Files
sx/examples/0528-packs-protocol-pack-methods.sx
agra 4e942b5373 test: migrate examples to XXXX-category-name layout + split expected streams
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.
2026-06-01 19:05:15 +03:00

32 lines
1.1 KiB
Plaintext

// Feature 1 — protocol-interface method calls on heterogeneous pack elements.
//
// `..xs: Greeter` binds per call shape; each `xs[i]` is the concrete element,
// and calling the protocol's own method `greet()` on it dispatches to that
// element's impl. Elements may be DIFFERENT concrete types (Dog, Cat) as long
// as each conforms to Greeter — this is the protocol-interface access the
// pack is for. (Protocol method decls omit the implicit `self`; impls list it.)
#import "modules/std.sx";
Greeter :: protocol {
greet :: () -> s64;
}
Dog :: struct { age: s64; }
Cat :: struct { lives: s64; }
impl Greeter for Dog { greet :: (self: *Dog) -> s64 => self.age; }
impl Greeter for Cat { greet :: (self: *Cat) -> s64 => self.lives * 100; }
pair_sum :: (..xs: Greeter) -> s64 {
return xs[0].greet() + xs[1].greet();
}
main :: () -> s32 {
d := Dog.{ age = 3 };
c := Cat.{ lives = 9 };
print("dog+cat={}\n", pair_sum(d, c)); // 3 + 900 = 903 (heterogeneous)
print("cat+dog={}\n", pair_sum(c, d)); // 900 + 3 = 903 (order swapped)
print("dog+dog={}\n", pair_sum(d, Dog.{ age = 4 })); // 3 + 4 = 7
0;
}