aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/type_errors.mli
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2000-10-18 17:51:58 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2000-10-18 17:51:58 +0000
commitedfda2501f08f18e24bd2e3eca763eb1c2dec0ea (patch)
treee4c42c670c2f61b95a7a0f68fd96f635aeef8b2b /kernel/type_errors.mli
parenta586cb418549eb523a3395155cab2560fd178571 (diff)
Simplifications autour de typed_type (renommé types par analogie avec sorts); documentation
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@727 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/type_errors.mli')
-rw-r--r--kernel/type_errors.mli8
1 files changed, 4 insertions, 4 deletions
diff --git a/kernel/type_errors.mli b/kernel/type_errors.mli
index d8031350c..01dbeb535 100644
--- a/kernel/type_errors.mli
+++ b/kernel/type_errors.mli
@@ -41,14 +41,14 @@ type type_error =
| CaseNotInductive of constr * constr
| NumberBranches of constr * constr * int
| IllFormedBranch of constr * int * constr * constr
- | Generalization of (name * typed_type) * unsafe_judgment
+ | Generalization of (name * types) * unsafe_judgment
| ActualType of constr * constr * constr
| CantApplyBadType of (int * constr * constr)
* unsafe_judgment * unsafe_judgment list
| CantApplyNonFunctional of unsafe_judgment * unsafe_judgment list
| IllFormedRecBody of guard_error * name list * int * constr array
| IllTypedRecBody of int * name list * unsafe_judgment array
- * typed_type array
+ * types array
| NotInductive of constr
| MLCase of string * constr * constr * constr * constr
| CantFindCaseType of constr
@@ -88,7 +88,7 @@ val error_ill_formed_branch :
path_kind -> env -> constr -> int -> constr -> constr -> 'b
val error_generalization :
- path_kind -> env -> 'a Evd.evar_map -> name * typed_type -> unsafe_judgment -> 'b
+ path_kind -> env -> 'a Evd.evar_map -> name * types -> unsafe_judgment -> 'b
val error_actual_type :
path_kind -> env -> constr -> constr -> constr -> 'b
@@ -105,7 +105,7 @@ val error_ill_formed_rec_body :
val error_ill_typed_rec_body :
path_kind -> env -> int -> name list -> unsafe_judgment array
- -> typed_type array -> 'b
+ -> types array -> 'b
val error_not_inductive : path_kind -> env -> constr -> 'a