Files
sx/examples/protocols/0403-protocols-protocol-dispatch-via-fn-arg.sx
agra 66bdc70bf1 test: group examples into per-category folders
Move examples/*.sx and their expected/ snapshots into per-category
subfolders (examples/<category>/...). Folder = leading filename token,
with ffi-objc/ffi-jni kept whole; filenames are unchanged. The corpus
runner and LSP sweep now discover each category's expected/ dir, while
issues/ stays flat. Example 1058's repo-root-relative companion import
is made file-relative. Path strings embedded in 164 snapshots were
regenerated (path-only changes). Test-layout docs in CLAUDE.md updated.
2026-06-21 14:41:34 +03:00

45 lines
1.0 KiB
Plaintext

// Protocol dispatch on `List(Protocol)` items where the list pointer is
// passed into another function — verifies the boxed payload survives an
// extra call frame between erasure and dispatch.
#import "modules/std.sx";
Sizable :: protocol {
size :: (self: *Self) -> i64;
}
Leaf :: struct { value: i64; }
impl Sizable for Leaf {
size :: (self: *Leaf) -> i64 { self.value }
}
add :: (items: *List(Sizable), w: Leaf) {
p := w;
items.append(p);
}
dispatch_fn :: (items: *List(Sizable)) {
out("dispatch_fn: about to dispatch\n");
s := items.items[0].size();
print("dispatch_fn: result = {}\n", s);
}
main :: () -> void {
items : List(Sizable) = .{};
add(@items, Leaf.{ value = 42 });
// Direct dispatch twice
out("=== Direct 1 ===\n");
r1 := items.items[0].size();
print("r1 = {}\n", r1);
out("=== Direct 2 ===\n");
r2 := items.items[0].size();
print("r2 = {}\n", r2);
// Then from function
out("=== From function ===\n");
dispatch_fn(@items);
out("=== OK ===\n");
}