aboutsummaryrefslogtreecommitdiff
path: root/proofs
diff options
context:
space:
mode:
Diffstat (limited to 'proofs')
-rw-r--r--proofs/proofview.ml4
1 files changed, 1 insertions, 3 deletions
diff --git a/proofs/proofview.ml b/proofs/proofview.ml
index aa00cee829..dd65a90495 100644
--- a/proofs/proofview.ml
+++ b/proofs/proofview.ml
@@ -467,9 +467,7 @@ module V82 = struct
}
let has_unresolved_evar pv =
- let evd = pv.solution in
- (* arnaud: essayer une procédure moins coûteuse *)
- not ((Evarutil.non_instantiated evd) = [])
+ Evd.has_undefined pv.solution
(* Returns the open goals of the proofview together with the evar_map to
interprete them. *)