attempt-6: address Adi's two in-scope findings (#3 deferred to E6). #1 E4-own-author-type-arg (silent-wrong): the bare-TYPE gate returned `.proceed` for the querying source's OWN author, so the non-leaf sites (reflection / type-arg / array-literal / type-value / match arm) dropped it and re-resolved a same-name flat import via global `findByName`. headTypeGate now resolves the own author to ITS per-source TypeId (mirroring selectNominalLeaf's own-wins, 0754); the type-as-value and type-match sites, which only consumed the poison bit and re-resolved globally, now route through the gate and use the `.resolved` author. size_of(Widget) with an own + imported Widget now yields main's own size, not the import's. #2 E4-type-fn-head-ambiguity (silent-wrong): headFnLeak only checked isNameVisible, so two flat same-name type-returning functions both reported "visible" and one was silently instantiated. It now diagnoses >=2 distinct direct flat type-fn authors (no own author) as ambiguous before the isNameVisible short-circuit, consistent with the parameterized struct / protocol heads and the leaf (0755/0767). Own / single / diamond-collapse type-fn heads still resolve. Regressions: 0768 (own-wins at every non-leaf bare-type site, fail-before reflection=16 -> pass-after 8) and 0769 (two flat Make type-fns -> ambiguity diagnostic exit 1). README: own-wins + type-fn-head ambiguity at every bare-type site.
45 lines
1.8 KiB
Plaintext
45 lines
1.8 KiB
Plaintext
// Own-wins (0754 / issue 0105 case 3) holds at EVERY non-leaf bare-type site,
|
|
// not just the nominal leaf annotation. `main` flat-imports `dep.sx` (which
|
|
// authors a same-name `Widget { a, b }` = 16 bytes and `Nums :: [2]s32` = 8
|
|
// bytes) AND authors its OWN `Widget { a }` = 8 bytes and `Nums :: [2]s64` = 16
|
|
// bytes. Each bare reference below must resolve to MAIN's own author — the gate's
|
|
// source-keyed `.resolved` author — NOT whichever same-name flat import a global
|
|
// `findByName` / `struct_template_map` pick would return:
|
|
//
|
|
// - reflection / type-arg slot `size_of(Widget)` → 8 (own)
|
|
// - typed array-literal head `Nums.[…]` / size_of → 16 (own [2]s64)
|
|
// - type-as-value `t : Type = Widget`
|
|
// - type-category match arm `case Widget:` → own identity
|
|
//
|
|
// Regression (Phase E4 attempt-6, finding #1): before the bare-type gate carried
|
|
// the OWN author's source-keyed TypeId into the non-leaf sites, an own author
|
|
// produced `.proceed` and these sites fell through to a global `findByName` — so
|
|
// `size_of(Widget)` printed the IMPORTED type's 16 and `case Widget:` matched the
|
|
// imported nominal identity (describe → 222). `dep_sizes` proves dep's distinct
|
|
// types still resolve to THEIR own 16 + 8 = 24 inside dep.
|
|
|
|
#import "modules/std.sx";
|
|
#import "0768-modules-own-wins-nonleaf-bare-type/dep.sx";
|
|
|
|
Widget :: struct { a: s64; }
|
|
Nums :: [2]s64;
|
|
|
|
describe :: ($T: Type) -> s32 {
|
|
r := if T == {
|
|
case Widget: 111;
|
|
else: 222;
|
|
}
|
|
r
|
|
}
|
|
|
|
main :: () -> s32 {
|
|
print("reflection={}\n", size_of(Widget));
|
|
xs := Nums.[1, 2];
|
|
print("array={}\n", size_of(Nums));
|
|
t : Type = Widget;
|
|
print("typeval_eq={}\n", t == Widget);
|
|
print("match={}\n", describe(Widget));
|
|
print("dep={}\n", dep_sizes());
|
|
0
|
|
}
|