From a97decb77b2084a3b84c5135f5bae2dbbb5ace26 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Sat, 12 Jun 2010 17:53:35 +0000
Subject: Fixed bug #2135 (second-order unification was raising cryptic
 message) - made the example work (a call to whd_meta was missing) - replaced
 the internal error messages of w_unify_to_subterm_list into  
 user-understandable messages - incidentally fixed the meaning of whd_meta
 (which now takes an evd)   and meta_name (which now does what it means and do
 not treat differently   the instantiated metas)

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13122 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 pretyping/pretype_errors.mli | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'pretyping/pretype_errors.mli')

diff --git a/pretyping/pretype_errors.mli b/pretyping/pretype_errors.mli
index e6e01fc44e..f55e70befc 100644
--- a/pretyping/pretype_errors.mli
+++ b/pretyping/pretype_errors.mli
@@ -31,6 +31,8 @@ type pretype_error =
   | CannotGeneralize of constr
   | NoOccurrenceFound of constr * identifier option
   | CannotFindWellTypedAbstraction of constr * constr list
+  | AbstractionOverMeta of name * name
+  | NonLinearUnification of name * constr
   (** Pretyping *)
   | VarNotFound of identifier
   | UnexpectedType of constr * constr
@@ -101,6 +103,12 @@ val error_cannot_unify_local : env -> Evd.evar_map -> constr * constr * constr -
 val error_cannot_find_well_typed_abstraction : env -> Evd.evar_map ->
       constr -> constr list -> 'b
 
+val error_abstraction_over_meta : env -> Evd.evar_map ->
+  metavariable -> metavariable -> 'b
+
+val error_non_linear_unification : env -> Evd.evar_map ->
+  metavariable -> constr -> 'b
+
 (** {6 Ml Case errors } *)
 
 val error_cant_find_case_type_loc :
-- 
cgit v1.2.3