diff options
| author | Maxime Dénès | 2016-09-30 09:14:41 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2016-09-30 09:14:41 +0200 |
| commit | 7952c15ca3d26ae5c2807196bb7aca97bce325c6 (patch) | |
| tree | f80c78d9851f9e43263cd9ee64c4669d2a599ee1 /tactics | |
| parent | 4e3d4646788c96f16193df14a81aa79938812194 (diff) | |
| parent | 844b076bf5150a107d31cd4648955c3a6538a34b (diff) | |
Merge branch '4762' into v8.5
Was PR#293: Fix #4762 (eauto weaker than auto).
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/eauto.ml4 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tactics/eauto.ml4 b/tactics/eauto.ml4 index cb206a7dd1..7e37722e93 100644 --- a/tactics/eauto.ml4 +++ b/tactics/eauto.ml4 @@ -291,7 +291,8 @@ module SearchProblem = struct in let rec_tacs = let l = - filter_tactics s.tacres (e_possible_resolve s.dblist (List.hd s.localdb) (pf_concl g)) + let concl = Reductionops.nf_evar (project g)(pf_concl g) in + filter_tactics s.tacres (e_possible_resolve s.dblist (List.hd s.localdb) concl) in List.map (fun (lgls, cost, pp) -> |