aboutsummaryrefslogtreecommitdiff
path: root/kernel
diff options
context:
space:
mode:
Diffstat (limited to 'kernel')
-rw-r--r--kernel/closure.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/kernel/closure.ml b/kernel/closure.ml
index 00aa0363f4..e7b1a634fa 100644
--- a/kernel/closure.ml
+++ b/kernel/closure.ml
@@ -6,7 +6,6 @@ open Pp
open Term
open Generic
open Names
-open Inductive
open Environ
open Instantiate
open Univ
@@ -310,7 +309,7 @@ let fixp_reducible redfun flgs op stk =
false
let mindsp_nparams env sp =
- let mib = lookup_mind sp env in mib.mind_nparams
+ let mib = lookup_mind sp env in mib.Constant.mind_nparams
(* The main recursive functions
*