try foo() catch (e) { } // legal
try foo() catch e { } // parse error with a migration hint
Same capture style as the for-loop. All four catch shapes keep working
with the parenthesized binding — block, bare-expression body, and the
== match sugar — and the no-binding forms are unchanged. onfail follows
the same rule (onfail (e) { }); its expression-cleanup form is
disambiguated by the paren-group-before-brace lookahead, so
onfail (f()); stays an expression cleanup.
AST unchanged; the printer renders the parens; the #run escape help
text updated. Corpus migrated (57 catch + 3 onfail bindings, in-source
parser test strings, specs incl. grammar rules, readme untouched —
no catch examples there).
Regression: examples/1157-diagnostics-catch-binding-needs-parens.sx;
re-captured stderr for 1010/1013/1037/1123 (migrated source echoed in
carets + help text).
26 lines
1.1 KiB
Plaintext
26 lines
1.1 KiB
Plaintext
// Program-wide closure-shape union — widening REJECTION (ERR E5.1 sub-feature 2).
|
|
// Two closure literals of shape `Closure(s32)->(s32,!)` raise `Negative` /
|
|
// `Other`; the shared inferred-`!` node for that shape is { Negative, Other }.
|
|
// A caller that `try`s a slot of this shape but declares only `!Small` (which
|
|
// omits both tags) is rejected — the union is checked against the caller's set
|
|
// even though the call goes through a slot with no static function name.
|
|
|
|
#import "modules/std.sx";
|
|
|
|
Small :: error { Unrelated }
|
|
|
|
reject :: (h: Closure(s32) -> (s32, !), x: s32) -> (s32, !Small) {
|
|
return try h(x); // Negative, Other ∉ Small → two diagnostics
|
|
}
|
|
|
|
main :: () -> s32 {
|
|
gpa := GPA.init();
|
|
push Context.{ allocator = xx gpa } {
|
|
handlers : List(Closure(s32) -> (s32, !)) = .{};
|
|
handlers.append(closure((x: s32) -> (s32, !) { if x < 0 { raise error.Negative; } return x; }));
|
|
handlers.append(closure((x: s32) -> (s32, !) { if x == 0 { raise error.Other; } return x; }));
|
|
print("r={}\n", reject(handlers.items[0], 5) catch (e) 0);
|
|
}
|
|
return 0;
|
|
}
|