f5974e5846
Completes E1.1. All in ir/lower.zig (the IR layer, per slice 1's finding).
- lowerFieldAccess intercepts `error.X` (parsed as field_access(identifier
"error", X)) → lowerErrorTagLiteral: interns the tag; when target_type is a
named error set, types the value as that set and validates X ∈ set (out-of-set
→ diagnostic); otherwise emits the raw u32 global tag id (the spec's
context-free default — not a silent guess).
- tryLowerErrorSetEquality (early branch in lowerBinaryOp) + errorSetTypeOf /
isErrorTagLiteralNode: an error-set value or `error.X` literal forces the other
operand to be one too, else a diagnostic ("compares only with an error.X tag or
another error-set value; coerce with `xx`"). Both sides lower under the set type
as context (error.X resolves + membership-checks); two bare tag literals with no
context compare as global u32 ids. Handles both operand orders.
First ERR examples (end-to-end): 217-error-sets.sx (declared set + error.X +
== true/false + u32 coercion → "error-set result: 25", exit 25) and
218-error-set-typing.sx (out-of-set literal + tag-vs-raw-int → 2 diagnostics).
Failable `!`/`!Named` signatures and raise/try/catch/onfail semantics remain
(E1.2+). zig build, zig build test, and 256/256 examples green.
25 lines
1.1 KiB
Plaintext
25 lines
1.1 KiB
Plaintext
// Error-set declarations + `error.X` tag values + enum-like `==` typing
|
|
// (ERR step E1.1). A declared `error { ... }` set is a real type with a u32
|
|
// runtime layout; `error.X` is its tag value — the named set when context
|
|
// provides one (membership-checked), else the raw global u32 id. Tags compare
|
|
// with an `error.X` literal or another error-set value. The rejections live in
|
|
// `examples/218-error-set-typing.sx`.
|
|
|
|
#import "modules/std.sx";
|
|
|
|
ParseErr :: error { BadDigit, Overflow, Empty }
|
|
|
|
main :: () -> s32 {
|
|
c : ParseErr = error.BadDigit;
|
|
d : ParseErr = error.Overflow;
|
|
r : s32 = 0;
|
|
if c == error.BadDigit { r = r + 1; } // true -> +1
|
|
if c == error.Overflow { r = r + 2; } // false
|
|
if c == d { r = r + 4; } // false (BadDigit != Overflow)
|
|
if d == error.Overflow { r = r + 8; } // true -> +8
|
|
tag : u32 = error.Empty; // u32 context -> raw global tag id
|
|
if tag != 0 { r = r + 16; } // tag ids are >= 1 -> +16
|
|
print("error-set result: {}\n", r); // -> 25
|
|
return r;
|
|
}
|