Files
sx/examples/ffi-03-large-struct.sx
agra 3855f2351e ffi: move test-companion .c/.h next to their .sx (drop vendors/ namespace)
vendors/ is a third-party namespace (stb_image, kb_text_shape, etc.);
test fixtures don't belong there. The .c/.h companion files for the
Phase-0 FFI baselines now sit alongside the .sx that drives them in
examples/, with matching basenames:

  examples/ffi-01-primitives.{sx,c,h}    <- was vendors/ffi_primitives/
  examples/ffi-02-small-struct.{sx,c,h}  <- was vendors/ffi_structs/
  examples/ffi-03-large-struct.{sx,c,h}  <- was vendors/ffi_large_struct/
  examples/ffi-04-fp-struct.{sx,c,h}     <- was vendors/ffi_fp_struct/
  examples/ffi-05-string-args.{sx,c,h}   <- was vendors/ffi_strings/
  examples/ffi-06-callback.{sx,c,h}      <- was vendors/ffi_callback/
  examples/101-ffi-medium-struct.{sx,c}  <- was vendors/ffi_medium_struct/

`#source` / `#include` paths in the .sx files become bare filenames
(no prefix) since imports.zig's base_dir resolution finds them
relative to the importing .sx file's directory.

`library/vendors/sx_ffi_resolve_test/` stays put — that one's the
whole point: regression coverage for the stdlib-search branch of
the resolution chain, so it must live where ONLY that branch can
find it.

94/94 regression tests pass.
2026-05-19 11:54:36 +03:00

54 lines
2.1 KiB
Plaintext

// Phase 0 baseline (PLAN-FFI.md step 0.3): structs >16 bytes passed
// by value into a C `#foreign` fn and returned by value. Exercises
// the byval-pointer ABI path — the caller copies the struct onto its
// stack and hands a pointer to the callee; on AAPCS64 the return
// uses the indirect `x8` register; on SysV AMD64 the return is a
// hidden first arg pointer that the caller allocates.
//
// Distinct from the register-pair / [2 x i64] / HFA paths the
// small-struct baseline (ffi-02) covers. The two relevant emit_llvm
// helpers are `needsByval` (returns true when size > 16) and
// `materializeByvalArg` (alloca + store + pass pointer).
//
// Big24 — 24 B, three s64
// Big48 — 48 B, six s64
#import "modules/std.sx";
#import c {
#source "ffi-03-large-struct.c";
};
Big24 :: struct { a: s64; b: s64; c: s64; }
Big48 :: struct {
a: s64; b: s64; c: s64;
d: s64; e: s64; f: s64;
}
ffi_big24_make :: (a: s64, b: s64, c: s64) -> Big24 #foreign;
ffi_big24_rotate :: (v: Big24) -> Big24 #foreign;
ffi_big24_sum :: (v: Big24) -> s64 #foreign;
ffi_big48_make :: (a: s64, b: s64, c: s64,
d: s64, e: s64, f: s64) -> Big48 #foreign;
ffi_big48_reverse :: (v: Big48) -> Big48 #foreign;
ffi_big48_sum :: (v: Big48) -> s64 #foreign;
main :: () -> s32 {
// ── Big24 (24 bytes, byval pointer) ────────────────────────────
v := ffi_big24_make(1, 2, 3);
print("big24 make = ({}, {}, {})\n", v.a, v.b, v.c);
w := ffi_big24_rotate(v);
print("big24 rotate = ({}, {}, {})\n", w.a, w.b, w.c);
print("big24 sum = {}\n", ffi_big24_sum(v));
// ── Big48 (48 bytes, byval pointer) ────────────────────────────
x := ffi_big48_make(10, 20, 30, 40, 50, 60);
print("big48 make = ({}, {}, {}, {}, {}, {})\n", x.a, x.b, x.c, x.d, x.e, x.f);
y := ffi_big48_reverse(x);
print("big48 reverse = ({}, {}, {}, {}, {}, {})\n", y.a, y.b, y.c, y.d, y.e, y.f);
print("big48 sum = {}\n", ffi_big48_sum(x));
0;
}