Brummel
0eb33235eb
Three schema fields move bare → canonical (bare for same-module,
<module>.<Class> for cross-module): InstanceDef.class,
Constraint.class, SuperclassRef.class. Symmetric to ct.1's
Type::Con.name rule. ClassDef.name stays bare.
validate_canonical_type_names gains three field-walks via new
check_class_ref helper + two sibling diagnostics
BareCrossModuleClassRef / BadCrossModuleClassRef.
check_class_name_fields narrowed to ClassDef.name-only.
Workspace-internal class-name keys all qualified:
class_def_module, class_by_name, registry entries.0,
ClassMethodEntry.class_name, class_superclasses, mono's
class_index, Origin::Class.class_name. New qualify_class_ref
helper at workspace.rs scope plus sibling
qualify_class_ref_in_check in ailang-check.
Two new positive on-disk fixtures (mq1_xmod_constraint_class{,_dep})
exercise the qualified Constraint.class shape.
Recon claim that all existing fixtures' class-refs are intra-module
was empirically wrong — 10 fixtures required minimal canonical-form
migration. Duplicate-instance test architecturally restructured:
post-mq.1 orphan-freedom makes two-modules-on-same-(class,type)
structurally impossible; new test_22b1_dup_same_module fixture
lands both instances in the class's module.
Plan defects fixed inline: Origin::Class.class_name single
construction site (plan recon off-by-one); build_class_index in
mono.rs needed qualifying; build_module_globals needed Def::Instance
carve-out; check_fn declared-constraint matching needed inline
canonical-form lifting; NoInstance Float-aware message arm needed
prelude.Eq/prelude.Ord match; coherence type-leg needed qualified-
head split-and-lookup. Tasks 3-6 ran as one coherent fix.
7/7 tasks, 520 tests green. bench/compile_check.py + cross_lang.py
exit 0; bench/check.py exit 1 (4 improvements-beyond-tolerance,
audit-ratifiable, not a regression).
MethodNameCollision + dispatch path unchanged; iters mq.2 + mq.3
land them.
104 lines
3.1 KiB
JSON
104 lines
3.1 KiB
JSON
{
|
|
"schema": "ailang/v0",
|
|
"name": "eq_ord_polymorphic",
|
|
"imports": [],
|
|
"defs": [
|
|
{
|
|
"kind": "fn",
|
|
"name": "at_most",
|
|
"doc": "Composition of prelude `gt` with `not` — semantically equivalent to `le`. Used to exercise polymorphic-helper-over-prelude-fns composition through the unified mono pass.",
|
|
"type": {
|
|
"k": "forall",
|
|
"vars": ["a"],
|
|
"constraints": [{ "class": "prelude.Ord", "type": { "k": "var", "name": "a" } }],
|
|
"body": {
|
|
"k": "fn",
|
|
"params": [
|
|
{ "k": "var", "name": "a" },
|
|
{ "k": "var", "name": "a" }
|
|
],
|
|
"param_modes": ["borrow", "borrow"],
|
|
"ret": { "k": "con", "name": "Bool" },
|
|
"effects": []
|
|
}
|
|
},
|
|
"params": ["x", "y"],
|
|
"body": {
|
|
"t": "app",
|
|
"fn": { "t": "var", "name": "not" },
|
|
"args": [{
|
|
"t": "app",
|
|
"fn": { "t": "var", "name": "gt" },
|
|
"args": [
|
|
{ "t": "var", "name": "x" },
|
|
{ "t": "var", "name": "y" }
|
|
]
|
|
}]
|
|
}
|
|
},
|
|
{
|
|
"kind": "fn",
|
|
"name": "main",
|
|
"type": {
|
|
"k": "fn", "params": [], "ret": { "k": "con", "name": "Unit" },
|
|
"effects": ["IO"]
|
|
},
|
|
"params": [],
|
|
"body": {
|
|
"t": "seq",
|
|
"lhs": {
|
|
"t": "do", "op": "io/print_int",
|
|
"args": [{
|
|
"t": "if",
|
|
"cond": {
|
|
"t": "app",
|
|
"fn": { "t": "var", "name": "at_most" },
|
|
"args": [
|
|
{ "t": "lit", "lit": { "kind": "int", "value": 3 } },
|
|
{ "t": "lit", "lit": { "kind": "int", "value": 5 } }
|
|
]
|
|
},
|
|
"then": { "t": "lit", "lit": { "kind": "int", "value": 1 } },
|
|
"else": { "t": "lit", "lit": { "kind": "int", "value": 0 } }
|
|
}]
|
|
},
|
|
"rhs": {
|
|
"t": "seq",
|
|
"lhs": {
|
|
"t": "do", "op": "io/print_int",
|
|
"args": [{
|
|
"t": "if",
|
|
"cond": {
|
|
"t": "app",
|
|
"fn": { "t": "var", "name": "at_most" },
|
|
"args": [
|
|
{ "t": "lit", "lit": { "kind": "bool", "value": true } },
|
|
{ "t": "lit", "lit": { "kind": "bool", "value": false } }
|
|
]
|
|
},
|
|
"then": { "t": "lit", "lit": { "kind": "int", "value": 1 } },
|
|
"else": { "t": "lit", "lit": { "kind": "int", "value": 0 } }
|
|
}]
|
|
},
|
|
"rhs": {
|
|
"t": "do", "op": "io/print_int",
|
|
"args": [{
|
|
"t": "if",
|
|
"cond": {
|
|
"t": "app",
|
|
"fn": { "t": "var", "name": "at_most" },
|
|
"args": [
|
|
{ "t": "lit", "lit": { "kind": "str", "value": "abc" } },
|
|
{ "t": "lit", "lit": { "kind": "str", "value": "abd" } }
|
|
]
|
|
},
|
|
"then": { "t": "lit", "lit": { "kind": "int", "value": 1 } },
|
|
"else": { "t": "lit", "lit": { "kind": "int", "value": 0 } }
|
|
}]
|
|
}
|
|
}
|
|
}
|
|
}
|
|
]
|
|
}
|