Files
sx/examples/1317-ffi-objc-class-level-constant.sx
agra cd5b958d19 comptime compiler-API: Phase 1 foundation + Phase 2.1 weld plan
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).
2026-06-17 13:31:11 +03:00

58 lines
2.1 KiB
Plaintext

// M2.1(a) — class-level constants on a sx-defined `#objc_class`.
//
// `name :: Type = expr;` inside the class block is sugar for
// `name :: () -> Type => expr;` — a niladic class method with an
// expression body. The compiler emits a C-ABI IMP that returns the
// captured expression and registers it on the metaclass.
//
// Apple's runtime sees no distinction — '[Cls foo]' dispatches to
// our IMP whether the user wrote it as a constant or as a method.
// The constant form just reads better for static metadata returns
// (canonical example: '+layerClass' on UIView subclasses).
#import "modules/std.sx";
#import "modules/build.sx";
#import "modules/ffi/objc.sx";
NSObject :: #objc_class("NSObject") extern {
alloc :: () -> *NSObject;
init :: (self: *NSObject) -> *NSObject;
}
// Reframed as a class method internally; user writes the constant form.
SxThing :: #objc_class("SxThing") {
counter: i32;
// Class-level constant.
answer :: i32 = 42;
// Canonical pattern: returning a *NSObject (stand-in for Apple's
// '+layerClass' returning *CALayer).
seedClass :: *NSObject = NSObject.alloc().init();
}
main :: () -> i32 {
inline if OS == .macos {
cls : Class = objc_getClass("SxThing".ptr);
if cls == null { print("FAIL: SxThing not registered\n"); return 1; }
// [SxThing answer] → 42
sel_answer : SEL = sel_registerName("answer".ptr);
msg_int : (cls: *void, sel: *void) -> i32 abi(.c) = xx objc_msgSend;
r := msg_int(cls, sel_answer);
if r != 42 { print("FAIL: answer expected 42, got {}\n", r); return 1; }
// [SxThing seedClass] returns a non-null NSObject.
sel_seed : SEL = sel_registerName("seedClass".ptr);
msg_ptr : (cls: *void, sel: *void) -> *void abi(.c) = xx objc_msgSend;
seed := msg_ptr(cls, sel_seed);
if seed == null { print("FAIL: seedClass returned null\n"); return 1; }
print("class constants: answer={}, seedClass=ok\n", r);
}
inline if OS != .macos {
print("class constants: answer=42, seedClass=ok\n");
}
0
}