diff options
| author | Matthieu Sozeau | 2018-07-26 17:07:08 +0200 |
|---|---|---|
| committer | Matthieu Sozeau | 2019-02-08 11:10:24 +0100 |
| commit | 746e74ed6e70cf01f0a0e73f772c3565e28fe3f8 (patch) | |
| tree | eee74b602613ff68f40337a31a4a7af86c7fd7f8 /tactics | |
| parent | c039d78bd098a499a34038e64bd1e5fbe280d7f3 (diff) | |
[evarconv] New flag handling for unifier
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/class_tactics.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/class_tactics.ml b/tactics/class_tactics.ml index ba7645446d..429bada7e3 100644 --- a/tactics/class_tactics.ml +++ b/tactics/class_tactics.ml @@ -1103,7 +1103,7 @@ let initial_select_evars filter = let resolve_typeclass_evars debug depth unique env evd filter split fail = let evd = try Evarconv.solve_unif_constraints_with_heuristics - ~ts:(Typeclasses.classes_transparent_state ()) env evd + ~flags:(Evarconv.default_flags_of (Typeclasses.classes_transparent_state ())) env evd with e when CErrors.noncritical e -> evd in resolve_all_evars debug depth unique env |