aboutsummaryrefslogtreecommitdiff
path: root/tactics
diff options
context:
space:
mode:
authorMaxime Dénès2017-05-31 11:03:54 +0200
committerMaxime Dénès2017-05-31 11:03:54 +0200
commitab19d271f91007cc76ed95d973bd9b95701c6b2e (patch)
tree85ef6783b7d27dd06e43a5ece0028f602ca85917 /tactics
parent0129c6d5481205dd7de82f52acde57bd4cbd4a26 (diff)
parente6c41b96a5ea9f8559acf176cdf997b05ccfb317 (diff)
Merge PR#699: Fix bug 5550: "typeclasses eauto with" does not work with section variables.
Diffstat (limited to 'tactics')
-rw-r--r--tactics/class_tactics.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/tactics/class_tactics.ml b/tactics/class_tactics.ml
index d1ae85e7be..2c911addf5 100644
--- a/tactics/class_tactics.ml
+++ b/tactics/class_tactics.ml
@@ -593,6 +593,7 @@ let make_hints g st only_classes sign =
List.fold_left
(fun hints hyp ->
let consider =
+ not only_classes ||
let open Context.Named.Declaration in
try let t = Global.lookup_named (get_id hyp) |> get_type in
(* Section variable, reindex only if the type changed *)