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.
This commit is contained in:
agra
2026-06-01 19:05:15 +03:00
parent e86e41b719
commit 4e942b5373
1231 changed files with 480 additions and 822 deletions

View File

@@ -0,0 +1,80 @@
// Phase 1 steps 1.111.13 (PLAN-FFI.md): `#objc_call` call sites
// embedded inside the sx surface constructs. None touch a new ABI
// path — the lowering routes the call identically regardless of
// the enclosing scope, and this test pins that lemma.
//
// 1. Struct method body Probe.fetch
// 2. Protocol impl method body impl Hashable for Probe
// 3. Closure value body closure that calls hash
//
// 1.14 (separate test): `inline if OS == { case }` gating across
// targets — verified by `tests/cross_compile.sh`.
#import "modules/std.sx";
#import "modules/compiler.sx";
#import "modules/std/objc.sx";
// ── 1. Struct method calling #objc_call ─────────────────────────────
Probe :: struct {
receiver: *void = null;
fetch :: (self: *Probe) -> s64 {
#objc_call(s64)(self.receiver, "hash");
}
}
// ── 2. Protocol impl method ────────────────────────────────────────
Hashable :: protocol {
sx_hash :: (self: *Self) -> s64;
}
impl Hashable for Probe {
sx_hash :: (self: *Probe) -> s64 {
#objc_call(s64)(self.receiver, "hash") * 2;
}
}
// ── 3. Closure body invoking #objc_call ─────────────────────────────
// The closure captures `recv` from its enclosing function and
// references it inside the `#objc_call` arg list. Locked in by
// `examples/103-ffi-closure-capture.sx`.
make_hasher :: (recv: *void) -> Closure(s32) -> s64 {
closure((dummy: s32) -> s64 => #objc_call(s64)(recv, "hash"));
}
// ── 4. Generic function body — instantiated per call site ───────────
hash_through :: (recv: $T) -> s64 {
p : *void = xx recv;
#objc_call(s64)(p, "hash");
}
main :: () -> s32 {
inline if OS == .macos {
ns_object := objc_getClass("NSObject".ptr);
p : Probe = .{ receiver = ns_object };
// 1. struct method
h1 := p.fetch();
print("fetch != 0 = {}\n", h1 != 0);
// 2. protocol method (doubles the raw hash; mostly checking
// dispatch / arg threading, not the math)
h2 := p.sx_hash();
print("protocol h2 = {}\n", h2 == h1 * 2);
// 3. closure (receives a dummy arg to keep the `Closure(T) -> R`
// arity matching 35-closures.sx; `recv` is captured from
// `make_hasher`'s arg list and used inside the `#objc_call`).
hasher := make_hasher(ns_object);
h3 := hasher(0);
print("closure h3 = {}\n", h3 == h1);
// 4. generic function — instantiates with T = *void here
h4 := hash_through(ns_object);
print("generic h4 = {}\n", h4 == h1);
}
inline if OS != .macos {
print("skipped (not macos)\n");
}
0;
}