Skip to content

Commit d461b99

Browse files
committed
Shorten Type_clash definition comment
Keep the one-liner at the definition; the full rationale lives at the update_type raise site it points to.
1 parent df849f2 commit d461b99

1 file changed

Lines changed: 1 addition & 8 deletions

File tree

compiler/ml/typedecl.ml

Lines changed: 1 addition & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -34,14 +34,7 @@ type error =
3434
| Definition_mismatch of type_expr * Includecore.type_mismatch list
3535
| Constraint_failed of type_expr * type_expr
3636
| Inconsistent_constraint of Env.t * (type_expr * type_expr) list
37-
(* Appears to be dead. Its only raise site (update_type) unifies
38-
[t<fresh params>] against [t]'s own manifest — i.e. a type against an
39-
alpha-renamed copy of itself — which cannot produce a head clash; and
40-
every genuine inconsistency is caught by a dedicated check instead
41-
(Cycle_in_def, Recursive_abbrev, Parameters_differ, Constraint_failed,
42-
Type_arity_mismatch). ~37 recursive/mutual/constraint/row/object/alias
43-
shapes were tried without reaching it. Retained as a named variant
44-
pending an airtight proof rather than replaced with [assert false]. *)
37+
(* Appears dead; retained pending proof. See update_type for details. *)
4538
| Type_clash of Env.t * (type_expr * type_expr) list
4639
| Parameters_differ of Path.t * type_expr * type_expr
4740
| Null_arity_external

0 commit comments

Comments
 (0)