12bf61a9fc
- objc.sx, objc_block.sx (from std/) + sdl3/opengl/raylib/stb/stb_truetype/ wasm vendor bindings (from modules/ root) -> modules/ffi/ - std/uikit.sx deleted: platform/uikit.sx already declares UIApplicationMain and imports objc; '#framework "UIKit"' cannot live in a file imported on macOS targets (unconditional link directive, UIKit is iOS-only), so the three iOS-only examples carry the 3-line glue inline. 1607/1608/1616 also un-rotted (dead ns_string -> 'xx "..."' Into conversions, callconv(.c) msgSend fn-ptrs) — all three build for ios-sim/ios again. - math/math.sx -> math/scalar.sx; one spelling '#import "modules/math"' everywhere (4 pinned IR snapshots regenerated: dir import adds Vec2/Mat4 to the type tables). - compiler.sx -> build.sx (imports, CLAUDE.md bundling table, specs.md). - testpkg/ + test_c.sx -> tests/fixtures/ (resolve CWD-relative from repo root, same as vendors/). - library-internal imports use full modules/... paths (std.sx tail, platform/bundle.sx, fixtures).
38 lines
1.4 KiB
Plaintext
38 lines
1.4 KiB
Plaintext
// FFI plan step 5.2 — generic `Into(Block) for Closure(..$args) ->
|
|
// $R` impl. One impl in stdlib covers every closure shape; the
|
|
// compiler monomorphises the impl body per call shape and emits a
|
|
// dedicated `__invoke` `callconv(.c)` trampoline + Block literal
|
|
// (via `#insert build_block_convert($args, $R);`).
|
|
//
|
|
// This test exercises a closure shape (`Closure(s64, s64) -> void`)
|
|
// that has NO hand-rolled `Into(Block)` impl in
|
|
// `library/modules/ffi/objc_block.sx`. Before step 5.2 lands,
|
|
// `xx cl : Block` errors out with the "no Into(Block) for
|
|
// cl_s64_s64__void" focused diagnostic. After the generic impl
|
|
// lands, the same call resolves through the pack-shaped impl and
|
|
// the per-shape trampoline ferries control back to the sx closure.
|
|
//
|
|
// The block is invoked directly through `b.invoke` (a typed
|
|
// `callconv(.c)` fn-pointer) — the same shape the Apple Block
|
|
// runtime calls when a UIKit/Foundation API hands the block back
|
|
// to its registered invoke.
|
|
|
|
#import "modules/std.sx";
|
|
#import "modules/ffi/objc_block.sx";
|
|
|
|
g_a: s64 = 0;
|
|
g_b: s64 = 0;
|
|
|
|
main :: () -> s32 {
|
|
cl := (a: s64, b: s64) => { g_a = a; g_b = b; };
|
|
blk : Block = xx cl;
|
|
|
|
invoke_fn : (*Block, s64, s64) -> void callconv(.c) = xx blk.invoke;
|
|
invoke_fn(@blk, 10, 20);
|
|
|
|
if g_a != 10 { print("FAIL: g_a={}\n", g_a); return 1; }
|
|
if g_b != 20 { print("FAIL: g_b={}\n", g_b); return 1; }
|
|
print("generic-into-block ok: a={} b={}\n", g_a, g_b);
|
|
0
|
|
}
|