aboutsummaryrefslogtreecommitdiff
path: root/engine/evarutil.ml
diff options
context:
space:
mode:
Diffstat (limited to 'engine/evarutil.ml')
-rw-r--r--engine/evarutil.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/engine/evarutil.ml b/engine/evarutil.ml
index fcb429aef4..326cd25fc9 100644
--- a/engine/evarutil.ml
+++ b/engine/evarutil.ml
@@ -689,7 +689,7 @@ let undefined_evars_of_term evd t =
let undefined_evars_of_named_context evd nc =
Context.Named.fold_outside
- (NamedDecl.fold (fun c s -> Evar.Set.union s (undefined_evars_of_term evd c)))
+ (NamedDecl.fold_constr (fun c s -> Evar.Set.union s (undefined_evars_of_term evd c)))
nc
~init:Evar.Set.empty