Files
sx/examples/1339-ffi-objc-defined-class-01-instance.sx
agra bdd0e96d78 feat(lang): block value requires no trailing ; (Rust-style)
A block's value is now its last statement ONLY when that statement is a
trailing expression with no `;`. A trailing `;` discards the value,
leaving the block void. This makes value-vs-statement explicit and lets
the compiler reject "this block was supposed to produce a value".

Compiler:
- Parser records `Block.produces_value` (last stmt is a no-`;` trailing
  expression) + `Block.discarded_semi` (the `;` that discarded a value),
  via `expectSemicolonAfter`. A trailing expression before `}` may now
  omit its `;` (previously a parse error). Match-arm and else-arm bodies
  are built value-producing regardless of the arm `;` (arms are exempt —
  the `;` is an arm terminator).
- Lowering: `lowerBlockValue` / the block-expr path / `inferExprType`
  respect `produces_value`. A value-position block that discards its value
  is a hard error (`lowerValueBody` for function bodies; the value-context
  `.block` path for if/else branches, `catch` bodies, value bindings,
  match arms). Pure-failable `-> !` bodies (value rides the error channel)
  and a value-if whose branches are void are handled without false errors.
- `defer`/`onfail` cleanup bodies lower as statements (void), so a
  trailing `;` there is fine.

Migration (behavior-preserving — output unchanged):
- stdlib + ~210 examples: dropped the trailing `;` on value-position last
  expressions. `format` now ends with an explicit `#insert "return
  result;"` (it relied on `#insert`-as-block-value, which `;` discards).
- Two `main :: () -> s32` examples that relied on the old silent
  default-return got an explicit trailing `0`.
- Rejection snapshots 0412 / 1013 regenerated (their quoted source lines
  lost a `;`); the diagnostics themselves are unchanged.

Docs/tests: specs.md "Block values" section; examples 0040 (rules) + 0041
(rejection); 3 parser unit tests. Filed issue 0066 (pre-existing
match-arm negated-literal phi-width quirk, surfaced not caused here).

Gates: zig build, zig build test, run_examples.sh -> 343 passed,
cross_compile.sh -> 7 passed (also refreshed its stale example names).
2026-06-02 09:23:50 +03:00

62 lines
2.0 KiB
Plaintext

// M1.2 A.7 — full instance state round-trip on a sx-defined
// `#objc_class`. The plan's first integration smoke test
// (A.2/A.3/A.4 integration through the now-open dispatch gate).
//
// What this exercises end-to-end:
// 1. `SxFoo.alloc()` — sx-side call lowers to objc_msgSend(SxFoo, sel_alloc).
// The runtime invokes the synthesized +alloc IMP (M1.2 A.5)
// which allocates an instance + state struct and binds them
// via __sx_state.
// 2. `f.bump()` — sx-side method call lowers to
// objc_msgSend(f, sel_bump). Runtime dispatches to the IMP
// trampoline (M1.2 A.4b.ii) which reads __sx_state to find
// the state pointer and forwards to the sx body
// `SxFoo.bump(__sx_default_context, state)`. Body mutates
// self.counter (M1.2 A.3).
// 3. Repeat to confirm the state persists across calls.
// 4. release — synthesized -dealloc (M1.2 A.6) frees the state
// and chains to [super dealloc].
#import "modules/std.sx";
#import "modules/compiler.sx";
#import "modules/std/objc.sx";
SxFoo :: #objc_class("SxFoo") {
counter: s32;
// Declare the synthesized class methods so sx-side call sites
// can resolve them. +alloc / -dealloc IMPs are emitted by the
// compiler at module-init (M1.2 A.5 / A.6); these declarations
// just give the names a typed contract.
alloc :: () -> *SxFoo;
bump :: (self: *Self) {
self.counter += 1;
}
get :: (self: *Self) -> s32 {
return self.counter;
}
}
main :: () -> s32 {
inline if OS == .macos {
f := SxFoo.alloc();
if f == null { print("FAIL: alloc returned null\n"); return 1; }
f.bump();
f.bump();
f.bump();
print("counter: {}\n", f.get()); // expected: 3
// release
sel_release : SEL = sel_registerName("release".ptr);
release_fn : (obj: *void, sel: *void) -> void callconv(.c) = xx objc_msgSend;
release_fn(xx f, sel_release);
}
inline if OS != .macos {
print("counter: 3\n");
}
0
}