diff options
author | 2016-11-11 17:48:47 +0100 | |
---|---|---|
committer | 2017-02-14 17:28:39 +0100 | |
commit | 7267dfafe9215c35275a39814c8af451961e997c (patch) | |
tree | c9b8f5f882aa92e529c4ce0789a8a9981efc2689 /tactics/hints.ml | |
parent | 536026f3e20f761e8ef366ed732da7d3b626ac5e (diff) |
Goal API using EConstr.
Diffstat (limited to 'tactics/hints.ml')
-rw-r--r-- | tactics/hints.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/hints.ml b/tactics/hints.ml index e8225df2d..57358bb76 100644 --- a/tactics/hints.ml +++ b/tactics/hints.ml @@ -1423,7 +1423,7 @@ let pr_applicable_hint () = match glss.Evd.it with | [] -> CErrors.error "No focused goal." | g::_ -> - pr_hint_term glss.Evd.sigma (Goal.V82.concl glss.Evd.sigma g) + pr_hint_term glss.Evd.sigma (EConstr.Unsafe.to_constr (Goal.V82.concl glss.Evd.sigma g)) let pp_hint_mode = function | ModeInput -> str"+" |