diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2016-09-30 09:46:54 +0200 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2016-09-30 09:46:54 +0200 |
| commit | 916d5fcc32f5110f23b60b21489d89598e6b8674 (patch) | |
| tree | 2b1d840fa7623d386a0321a380d9f76f03f93841 /tactics/eauto.ml | |
| parent | edb55a94fc5c0473e57f5a61c0c723194c2ff414 (diff) | |
| parent | 7952c15ca3d26ae5c2807196bb7aca97bce325c6 (diff) | |
Merge branch 'v8.5' into v8.6
Diffstat (limited to 'tactics/eauto.ml')
| -rw-r--r-- | tactics/eauto.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tactics/eauto.ml b/tactics/eauto.ml index ba9a2d95c..90f80a737 100644 --- a/tactics/eauto.ml +++ b/tactics/eauto.ml @@ -282,7 +282,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) -> |