diff options
| author | Pierre-Marie Pédrot | 2020-05-05 09:00:49 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2020-05-05 10:49:50 +0200 |
| commit | d87f8d10d089c3a33ddb36a71ab6fc082d0d1140 (patch) | |
| tree | f572f939360d1ac090e0163d1cf31aa019885165 | |
| parent | 64ce136a5fb2eb1d3b620889b2047fda82694849 (diff) | |
Fix GeoCoq slowdown.
There is no point in normalizing the goal in the legacy refiner because the
function is actually insensitive to evars.
| -rw-r--r-- | proofs/refiner.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/refiner.ml b/proofs/refiner.ml index ad84afd47e..29a47c5acd 100644 --- a/proofs/refiner.ml +++ b/proofs/refiner.ml @@ -37,7 +37,7 @@ let refiner ~check = CProfile.profile2 refiner_key (refiner ~check) else refiner ~check -let refiner ~check c = Proofview.V82.tactic (refiner ~check c) +let refiner ~check c = Proofview.V82.tactic ~nf_evars:false (refiner ~check c) (*********************) (* Tacticals *) |