cd5b958d19
Introduce the welded comptime `compiler` library (`#library "compiler"` +
`abi(.zig) extern compiler`), per design/comptime-compiler-api.md, and unify
`callconv(...)` into the new `abi(...)` annotation.
abi(...) replaces callconv(...):
- New ABI enum { default, c, zig, pure }; `abi(.c|.zig|.pure)` parses in the
postfix slot before extern/export (and standalone). `kw_callconv` -> `kw_abi`.
- Migrated 52 sx files, the call-convention-mismatch diagnostic, and docs
(readme/specs) from `callconv(.c)` to `abi(.c)`.
Phase 1 — welded compiler library (parse -> registry -> validation -> bridge):
- `abi(.zig) extern compiler` parses on fn decls (carries abi/extern_lib) and
struct decls (StructDecl.abi/extern_lib).
- `#library "compiler"` is the comptime-only internal surface — never dlopen'd.
- src/ir/compiler_lib.zig: the binding registry (the safety boundary). `Field`
welded to StructInfo.Field with layout baked from the real Zig type
(@offsetOf/@sizeOf); `findType`/`findFn`. Welded structs are layout-validated
at registration (field set + total size) as a header checked against the impl.
- Host-call bridge: a `fn abi(.zig) extern compiler` dispatches under the
comptime interp to its registered Zig handler (intern/text_of round-trip),
never dlsym. IR Function.compiler_welded; validated in declareFunction.
- Comptime-only enforcement: a runtime call to a welded fn is a clean
build-gating error (emitCall), not an undefined-symbol link failure.
Phase 2.1 — byte-layout weld foundation:
- Decision: full byte-layout weld (sx struct laid out byte-identically to the
bound Zig type). Registered StructInfo (first non-natural / Zig-reordered
layout). `computeWeldPlan` — pure offset-ordered element plan + padding +
sx-field->LLVM-element remap; unit-tested. Emit/interp wiring is the next
sub-step (2.2+, see current/CHECKPOINT-COMPILER-API.md).
Examples: 0625/0626 (welded struct + fn round-trip), 1183/1184/1185
(layout-mismatch, unexported-fn, runtime-call diagnostics).
62 lines
2.3 KiB
Plaintext
62 lines
2.3 KiB
Plaintext
// Backfill for Phase 1D cluster 1.32 (PLAN-FFI.md): `#objc_call(CGRect)`
|
||
// and `#objc_call(u64)` against `class_addMethod`-registered IMPs.
|
||
// Both shapes were already exercised transitively in earlier work —
|
||
// CGRect is structurally a 4×f64 HFA (same as UIEdgeInsets from
|
||
// ffi-objc-call-07), and u64 is i64 at the LLVM level (same as the
|
||
// i64 return from ffi-objc-call-04's `hash`). The cluster-1.32
|
||
// migration of `uikit_keyboard_will_change_frame` was the first
|
||
// place we used both shapes through `#objc_call` directly, but the
|
||
// keyboard-change-frame callback isn't reached by the chess launch
|
||
// path, so this test gives the two shapes their own runtime lockdown.
|
||
|
||
#import "modules/std.sx";
|
||
#import "modules/build.sx";
|
||
#import "modules/ffi/objc.sx";
|
||
|
||
CGRect :: struct {
|
||
x: f64;
|
||
y: f64;
|
||
width: f64;
|
||
height: f64;
|
||
}
|
||
|
||
rect_imp :: (self: *void, _cmd: *void) -> CGRect abi(.c) {
|
||
CGRect.{ x = 10.5, y = 20.5, width = 30.5, height = 40.5 }
|
||
}
|
||
|
||
u64_imp :: (self: *void, _cmd: *void) -> u64 abi(.c) {
|
||
// sx integer-literal parser rejects values ≥ 2^63 even when the
|
||
// receiving type is u64, so the leading bit stays clear.
|
||
0x7FEDCBA987654321
|
||
}
|
||
|
||
main :: () -> i32 {
|
||
inline if OS == .macos {
|
||
ns_object := objc_getClass("NSObject".ptr);
|
||
my_cls := objc_allocateClassPair(ns_object, "SxRectU64Probe".ptr, 0);
|
||
|
||
// CGRect type encoding: {CGRect={CGPoint=dd}{CGSize=dd}}@: for a
|
||
// strict structural encoding, but the runtime accepts the
|
||
// flattened `{CGRect=dddd}@:` form for IMP registration since
|
||
// arm64 BOOL/struct returns route on the ABI shape, not on the
|
||
// type-encoding's nested-struct structure.
|
||
sel_rect := sel_registerName("rect".ptr);
|
||
sel_uval := sel_registerName("uval".ptr);
|
||
class_addMethod(my_cls, sel_rect, xx rect_imp, "{CGRect=dddd}@:".ptr);
|
||
class_addMethod(my_cls, sel_uval, xx u64_imp, "Q@:".ptr);
|
||
objc_registerClassPair(my_cls);
|
||
|
||
instance := class_createInstance(my_cls, 0);
|
||
|
||
r := #objc_call(CGRect)(instance, "rect");
|
||
print("rect = ({}, {}, {}, {})\n", r.x, r.y, r.width, r.height);
|
||
|
||
u := #objc_call(u64)(instance, "uval");
|
||
print("uval = {}\n", u);
|
||
}
|
||
inline if OS != .macos {
|
||
print("skipped (not macos)\n");
|
||
}
|
||
0
|
||
}
|