diff options
| author | Matthieu Sozeau | 2018-11-16 22:26:23 +0100 |
|---|---|---|
| committer | Matthieu Sozeau | 2018-11-16 22:26:23 +0100 |
| commit | f8a76b3d383abf468fb21df509f5da8f8aafa913 (patch) | |
| tree | 7b6da59938466bc632b4f2e8d0625814e813af06 /vernac | |
| parent | 3ff6723f4032bdf8c155b30c496188e58787cd49 (diff) | |
| parent | ad6d5a658806d1c0cf46a39f58113bfbd2ac808d (diff) | |
Merge PR #8779: Remove the implicit tactic feature following #7229.
Diffstat (limited to 'vernac')
| -rw-r--r-- | vernac/lemmas.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/vernac/lemmas.ml b/vernac/lemmas.ml index 3b041b7065..d537436c6b 100644 --- a/vernac/lemmas.ml +++ b/vernac/lemmas.ml @@ -418,8 +418,8 @@ let start_proof_com ?inference_hook kind thms hook = let evd, (impls, ((env, ctx), imps)) = interp_context_evars env0 evd bl in let evd, (t', imps') = interp_type_evars_impls ~impls env evd t in let flags = all_and_fail_flags in - let flags = { flags with use_hook = inference_hook } in - let evd = solve_remaining_evars flags env evd Evd.empty in + let hook = inference_hook in + let evd = solve_remaining_evars ?hook flags env evd Evd.empty in let ids = List.map RelDecl.get_name ctx in check_name_freshness (pi1 kind) id; (* XXX: The nf_evar is critical !! *) |
