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.2 KiB
Plaintext
62 lines
2.2 KiB
Plaintext
// M1.2 A.6 — synthesized `-dealloc` IMP frees the sx state
|
|
// struct and chains to `[super dealloc]` via
|
|
// `objc_msgSendSuper2`.
|
|
//
|
|
// Round-trip:
|
|
// 1. [SxFoo alloc] returns a fresh instance with state bound.
|
|
// 2. release the instance — runtime invokes our -dealloc IMP.
|
|
// 3. Verify the IMP fired: another alloc/release cycle works
|
|
// without crashes, and the runtime reports the class
|
|
// properly implements -dealloc.
|
|
//
|
|
// Full instance-state round-trips (sx-side `f := SxFoo.alloc();
|
|
// f.bump();`) await A.7's dispatch-gate opening.
|
|
|
|
#import "modules/std.sx";
|
|
#import "modules/build.sx";
|
|
#import "modules/ffi/objc.sx";
|
|
|
|
class_getInstanceVariable :: (cls: *void, name: [*]u8) -> *void extern objc;
|
|
class_getMethodImplementation :: (cls: *void, sel: *void) -> *void extern objc;
|
|
|
|
SxFoo :: #objc_class("SxFoo") {
|
|
counter: i32;
|
|
|
|
bump :: (self: *Self) {
|
|
self.counter += 1;
|
|
}
|
|
}
|
|
|
|
main :: () -> i32 {
|
|
inline if OS == .macos {
|
|
cls : Class = objc_getClass("SxFoo".ptr);
|
|
if cls == null { print("FAIL: SxFoo not registered\n"); return 1; }
|
|
|
|
// Confirm the runtime sees our -dealloc IMP.
|
|
sel_dealloc : SEL = sel_registerName("dealloc".ptr);
|
|
imp_dealloc : *void = class_getMethodImplementation(cls, sel_dealloc);
|
|
if imp_dealloc == null { print("FAIL: dealloc IMP missing\n"); return 1; }
|
|
|
|
// alloc + release — synthesized -dealloc IMP fires inside.
|
|
sel_alloc : SEL = sel_registerName("alloc".ptr);
|
|
alloc_fn : (cls: *void, sel: *void) -> *void abi(.c) = xx objc_msgSend;
|
|
instance : *void = alloc_fn(cls, sel_alloc);
|
|
if instance == null { print("FAIL: +alloc returned null\n"); return 1; }
|
|
|
|
sel_release : SEL = sel_registerName("release".ptr);
|
|
release_fn : (obj: *void, sel: *void) -> void abi(.c) = xx objc_msgSend;
|
|
release_fn(instance, sel_release);
|
|
|
|
// Run another cycle to confirm dealloc didn't corrupt runtime state.
|
|
instance2 : *void = alloc_fn(cls, sel_alloc);
|
|
if instance2 == null { print("FAIL: +alloc round 2 returned null\n"); return 1; }
|
|
release_fn(instance2, sel_release);
|
|
|
|
print("dealloc: ok\n");
|
|
}
|
|
inline if OS != .macos {
|
|
print("dealloc: ok\n");
|
|
}
|
|
0
|
|
}
|