diff options
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/univ.ml | 1 | ||||
| -rw-r--r-- | kernel/univ.mli | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/kernel/univ.ml b/kernel/univ.ml index fe872db8b9..fa0c431e30 100644 --- a/kernel/univ.ml +++ b/kernel/univ.ml @@ -653,6 +653,7 @@ type constraints = Constraint.t let empty_constraint = Constraint.empty let is_empty_constraint = Constraint.is_empty +let eq_constraint = Constraint.equal let union_constraints = Constraint.union diff --git a/kernel/univ.mli b/kernel/univ.mli index 64555fbb05..04267de70d 100644 --- a/kernel/univ.mli +++ b/kernel/univ.mli @@ -97,6 +97,7 @@ val empty_constraint : constraints val union_constraints : constraints -> constraints -> constraints val is_empty_constraint : constraints -> bool +val eq_constraint : constraints -> constraints -> bool type constraint_function = universe -> universe -> constraints -> constraints |