From ac7169182a970c33be2e33abd43be5bf19542e2c Mon Sep 17 00:00:00 2001 From: Gaƫtan Gilbert Date: Fri, 8 Feb 2019 16:10:46 +0100 Subject: Fix #9527: unknown evar in nonterminating [fix] error. --- kernel/type_errors.mli | 3 +++ 1 file changed, 3 insertions(+) (limited to 'kernel/type_errors.mli') diff --git a/kernel/type_errors.mli b/kernel/type_errors.mli index 3e954d6a8e..4b832930e1 100644 --- a/kernel/type_errors.mli +++ b/kernel/type_errors.mli @@ -130,3 +130,6 @@ val error_elim_explain : Sorts.family -> Sorts.family -> arity_error val error_unsatisfied_constraints : env -> Univ.Constraint.t -> 'a val error_undeclared_universe : env -> Univ.Level.t -> 'a + +val map_pguard_error : ('c -> 'd) -> 'c pguard_error -> 'd pguard_error +val map_ptype_error : ('c -> 'd) -> ('c, 'c) ptype_error -> ('d, 'd) ptype_error -- cgit v1.2.3