From baa3e16836c3f0daf24ba47aadbdee525762d6ec Mon Sep 17 00:00:00 2001
From: herbelin
Date: Thu, 9 Dec 1999 23:20:18 +0000
Subject: Ajout des messages d'erreurs de Cases

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

(limited to 'pretyping/pretype_errors.mli')

diff --git a/pretyping/pretype_errors.mli b/pretyping/pretype_errors.mli
index 33238ecd9e..6d39fdd31b 100644
--- a/pretyping/pretype_errors.mli
+++ b/pretyping/pretype_errors.mli
@@ -24,6 +24,25 @@ val error_ill_formed_branch_loc :
 val error_number_branches_loc : 
   loc -> path_kind -> env -> constr -> constr -> int -> 'b
 
+val error_case_not_inductive_loc :
+  loc -> path_kind -> env -> constr -> constr -> 'b
+
+(* Pattern-matching errors *)
+
+val error_bad_constructor_loc : 
+  loc -> path_kind -> constructor_path -> inductive_path -> 'b
+
+val error_wrong_numarg_constructor_loc : 
+  loc -> path_kind -> constructor_path -> int -> 'b
+
+val error_wrong_predicate_arity_loc :
+  loc -> path_kind -> env -> constr -> int -> int -> 'b
+
+val error_needs_inversion : path_kind -> env -> constr -> constr -> 'a
+
+
+(* Implicit arguments synthesis errors *)
+
 val error_occur_check : path_kind -> env -> int -> constr -> 'a
 
 val error_not_clean : path_kind -> env -> int -> constr -> 'a
-- 
cgit v1.2.3