aboutsummaryrefslogtreecommitdiff
path: root/kernel/indtypes.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/indtypes.ml')
-rw-r--r--kernel/indtypes.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/kernel/indtypes.ml b/kernel/indtypes.ml
index f10e59c9c7..2307a405f5 100644
--- a/kernel/indtypes.ml
+++ b/kernel/indtypes.ml
@@ -74,8 +74,7 @@ let mind_check_names mie =
declaration, and checks that they are all present (and all the same)
for all the given types. *)
-let mind_extract_params n c =
- let (l,c') = decompose_prod_n_assum n c in (l,c')
+let mind_extract_params = decompose_prod_n_assum
let mind_check_arities env mie =
let check_arity id c =