diff options
| author | Pierre-Marie Pédrot | 2015-10-14 12:01:38 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2015-10-14 15:55:06 +0200 |
| commit | 36f669f769fa23eb897adfa0450875a3c0db3476 (patch) | |
| tree | a9ff788fcf6bd5c9cdb3ad8ff4c1b998470fc945 /tactics/auto.ml | |
| parent | 4b8155591be6e20505ee25f7199edcf44a638c7e (diff) | |
Exporting the original unprocessed hint in the hint running function.
Diffstat (limited to 'tactics/auto.ml')
| -rw-r--r-- | tactics/auto.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tactics/auto.ml b/tactics/auto.ml index e5fdf6a7c2..72c28ce323 100644 --- a/tactics/auto.ml +++ b/tactics/auto.ml @@ -93,6 +93,7 @@ let unify_resolve_gen poly = function | Some flags -> unify_resolve poly flags let exact poly (c,clenv) = + let (c, _, _) = c in let ctx, c' = if poly then let evd', subst = Evd.refresh_undefined_universes clenv.evd in |