aboutsummaryrefslogtreecommitdiffhomepage
path: root/tactics/auto.ml
diff options
context:
space:
mode:
Diffstat (limited to 'tactics/auto.ml')
-rw-r--r--tactics/auto.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/tactics/auto.ml b/tactics/auto.ml
index e5fdf6a7c..72c28ce32 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