test: migrate examples to XXXX-category-name layout + split expected streams
Rename all example tests/companions to the XXXX-category-test-name scheme (per-category 100-blocks: basic 0010, types 0100, ... errors 1000, diagnostics 1100, ffi 1200, ffi-objc 1300, ffi-jni 1400, vectors 1500, platform 1600). Companions and dir/C fixtures move in lockstep with their parent test; #import/#source/#include paths rewritten to match. Expected output now lives in examples/expected/ (a sibling dir of the tests) split into three streams per the new convention: <name>.exit / <name>.stdout / <name>.stderr (+ optional <name>.ir) run_examples.sh rewritten: scans examples/ and issues/ for an expected/<name>.exit marker, captures stdout and stderr separately (no more 2>&1), compares each stream + exit + optional IR snapshot. Behavior validated unchanged: every renamed test reproduces its prior merged output + exit (diffs limited to file paths/basenames embedded in diagnostics + traces, which correctly reflect the new names). Suite: 292 passed, 0 failed. 50-smoke.sx split + issue relocation + docs follow in subsequent commits.
This commit is contained in:
64
examples/1009-errors-catch.sx
Normal file
64
examples/1009-errors-catch.sx
Normal file
@@ -0,0 +1,64 @@
|
||||
// `catch` on a pure-failable LHS (ERR step E1.5). `expr catch [e] BODY`
|
||||
// consumes the error inline: on failure it binds the tag to `e` (optional)
|
||||
// and runs BODY; on success the result is void (a `-> !` LHS has no success
|
||||
// value). BODY may diverge (`return` / `raise` — typed `noreturn`, E1.4c) or
|
||||
// fall through. `catch` needs no failable *enclosing* function — it handles
|
||||
// the error locally. All four body forms appear below: block, no-binding
|
||||
// block, match-body (`== { case ... }`), and the selective handle + re-raise
|
||||
// pattern. Value-carrying `-> (T, !)` catch (binding the success value) lands
|
||||
// with the tuple ABI in E2.
|
||||
|
||||
#import "modules/std.sx";
|
||||
|
||||
E :: error { Bad, Empty }
|
||||
|
||||
must :: (n: s32) -> !E {
|
||||
if n < 0 { raise error.Bad; }
|
||||
if n == 0 { raise error.Empty; }
|
||||
return;
|
||||
}
|
||||
|
||||
// Diverging body — returns from `classify` on error.
|
||||
classify :: (n: s32) -> s32 {
|
||||
must(n) catch e {
|
||||
if e == error.Bad { return 1; }
|
||||
if e == error.Empty { return 2; }
|
||||
return 9;
|
||||
};
|
||||
return 0; // must(n) succeeded
|
||||
}
|
||||
|
||||
// Match-body form — sugar for `catch e { if e == { case ... } }`.
|
||||
mclassify :: (n: s32) -> s32 {
|
||||
must(n) catch e == {
|
||||
case .Bad: return 11;
|
||||
case .Empty: return 22;
|
||||
else: return 99;
|
||||
};
|
||||
return 0;
|
||||
}
|
||||
|
||||
// Selective handle + re-raise (failable enclosing fn; `raise e` is the
|
||||
// variable form). Swallows Bad → success; re-raises everything else.
|
||||
handle_some :: (n: s32) -> !E {
|
||||
must(n) catch e {
|
||||
if e == error.Bad { return; } // swallow → success
|
||||
raise e; // re-raise the rest
|
||||
};
|
||||
return;
|
||||
}
|
||||
|
||||
main :: () -> s32 {
|
||||
r : s32 = 0;
|
||||
must(-1) catch e { if e == error.Bad { r = r + 1; } }; // Bad → +1
|
||||
must(5) catch { r = r + 100; }; // success → body skipped
|
||||
r = r + classify(0); // Empty → 2
|
||||
r = r + classify(8); // success → 0
|
||||
he := handle_some(0); // Empty re-raised
|
||||
if he == error.Empty { r = r + 4; } // +4
|
||||
hb := handle_some(-1); // Bad swallowed → success
|
||||
if hb == error.Bad { r = r + 50; } // not taken
|
||||
r = r + mclassify(-1); // Bad → 11
|
||||
print("catch result: {}\n", r); // 1+2+4+11 = 18
|
||||
return r;
|
||||
}
|
||||
Reference in New Issue
Block a user