aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/type_errors.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/type_errors.ml')
-rw-r--r--kernel/type_errors.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/kernel/type_errors.ml b/kernel/type_errors.ml
index 387b7a930..320a30369 100644
--- a/kernel/type_errors.ml
+++ b/kernel/type_errors.ml
@@ -49,8 +49,8 @@ type type_error =
| 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
+ | IllFormedRecBody of guard_error * name array * int * constr array
+ | IllTypedRecBody of int * name array * unsafe_judgment array
* types array
exception TypeError of path_kind * env * type_error