- runtime: mailbox slots grow caller metadata (wo_msg), call parks on WO_PARK_INBOX (the DB-RPC protocol) and the resume consumes a SCALAR reply; FIBER_DONE ships the receive's return value home (same-shard unpark or kind-6 envelope); kind-5 carries cross-shard calls - actor death is real now: a receive trapping uncaught marks the actor dead, error-unparks the in-flight caller AND every queued caller, drops queued payloads + state, releases cap slots; send-to-dead drops silently, call-to-dead traps — a call never hangs. Fixes the pre-existing leak/dangle in TRAPF's fiber-death path (cur_msg leaked, a->active dangled, the mailbox rotted) - compiler: reply typing through actor-M erasure — every receive(M) program-wide must agree on one return type and it must be a copyable scalar (v1); WO-E226 names disagreeing classes / void receives / non-scalar replies; call's message moves exactly like send's (owner) - corpus: run/call-echo (park + ordered replies), run/call-dead-trap (mid-call + to-dead, both catchable), compile-fail/call-void-receive, compile-fail/call-reply-disagree; cross-shard call proof rides the chat gate next - battery 12/12 fresh-built (ASan+TSan lanes in fibers/db-actor green) Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
29 lines
826 B
Text
29 lines
826 B
Text
-- iteration 24: no hangs, ever. A receive that traps kills the ACTOR:
|
|
-- the parked caller is error-unparked into a catchable WO_T_ACTOR
|
|
-- (callee died mid-call), and a later call to the same address traps
|
|
-- immediately (call-to-dead). The runtime prints the fiber-trap report
|
|
-- to stderr; stdout carries only the caller's side.
|
|
class Q {
|
|
n: Int
|
|
}
|
|
|
|
class Bomb {
|
|
pad: Int
|
|
fn receive(msg: Q) -> Int {
|
|
return msg.n / (msg.n - msg.n); -- DIV0: the actor dies mid-call
|
|
}
|
|
}
|
|
|
|
fn call_one(b: actor Q, n: Int) -> Text {
|
|
let r = call(b, Q { n: n });
|
|
return "replied ${r}";
|
|
}
|
|
|
|
fn main() -> Int {
|
|
let b: actor Q = spawn Bomb { pad: 0 };
|
|
let first = try call_one(b, 7) catch (e) e.msg;
|
|
print("mid-call: ${first}");
|
|
let second = try call_one(b, 8) catch (e) e.msg;
|
|
print("to-dead: ${second}");
|
|
return 0;
|
|
}
|