Give top-level ENUM and UNION decls per-decl nominal identity so two same-name flat enums/unions intern DISTINCT nominal TypeIds instead of collapsing to one global last-wins entry. Establishes the reusable non-struct register path the later E6 kind-steps (E6b error-set, E6c protocol, E6d foreign-class) extend. Registration side (was: stateless `type_bridge.resolveInlineEnum/Union` `findByName` last-wins short-circuit, no Lowering access): - Split the type_bridge inline builders into a body-BUILDER (`buildEnumInfo` / `buildUnionInfo`) + the existing thin interner wrappers (field-type positions keep the legacy single-slot path). - Add `Lowering.registerEnumDecl` / `registerUnionDecl` mirroring `registerStructDecl`: build the TypeInfo, intern via `internNamedTypeDecl(decl_key, name_id, info, nominal_id)` under the per-decl nominal identity (reserved slot id, else `shadowNominalId`). - Reroute all six enum/union registration dispatch sites (scanDecls const-wrapped + top-level, lowerDecls/comptime, block-local, local const) to the new path. Shared infra generalized ONCE: - Pass-0b genuine-shadow pre-pass now reserves struct/enum/union shadow slots of the MATCHING kind, grouped by (kind, name), via a kind-generic `topLevelTypeDecl` / `reserveShadowSlot`. A forward/self/mutual ref to a shadow name binds to the reserved nominal TypeId. - `namedRefTid` consults `type_decl_tids` for `.enum_decl`/`.union_decl` before the global `findByName`. No new per-kind resolution path: selectNominalLeaf / headTypeGate / flatTypeAuthorCount already gate every kind. Single-author / phantom-double-spelling names keep nominal_id 0 (byte-identical corpus). Regressions 0795-0798 (enum + union: ambiguity over every bare-type form, and own-wins with distinct nominal TypeIds), fail-before/pass-after: 0795/0797 exit 0 -> exit 1 with the loud "type is ambiguous" diagnostic; 0796 silently printed `own=.east` -> correct `own=.north`; 0798 hard `field 'm' not found` error -> correct `own=5 dep=9`. Gate: zig build && zig build test (423/423) && run_examples.sh (537/537) all exit 0; m3te ios-sim build via the main binary exit 0.
23 lines
1007 B
Plaintext
23 lines
1007 B
Plaintext
// E6a — own-wins-over-flat for ENUM per-decl nominal identity. `main` flat-imports
|
|
// `dep.sx` (which authors `Dir { east; west }`) AND authors its OWN `Dir { north;
|
|
// south }`. A bare `Dir` reference in `main` resolves to `main`'s OWN author, not
|
|
// the flat-imported one (the querying source's author wins outright — no
|
|
// ambiguity), so `d : Dir = .north` binds `main`'s enum (whose `.north` variant
|
|
// dep's `Dir` lacks) while `dep_dir()` returns dep's DISTINCT `Dir`.
|
|
//
|
|
// Fail-before (pre-E6a): the stateless `type_bridge.resolveInlineEnum` `findByName`
|
|
// short-circuit interned ONE global last-wins `Dir`, so `main`'s `Dir` and dep's
|
|
// `Dir` collapsed to a single nominal — `.north` would resolve against whichever
|
|
// author won the global slot, silently wrong with no diagnostic.
|
|
|
|
#import "modules/std.sx";
|
|
#import "0796-modules-same-name-enum-own-wins/dep.sx";
|
|
|
|
Dir :: enum { north; south; }
|
|
|
|
main :: () -> s32 {
|
|
d : Dir = .north;
|
|
print("own={} dep={}\n", d, dep_dir());
|
|
0
|
|
}
|