diff options
| author | herbelin | 2011-12-17 22:59:36 +0000 |
|---|---|---|
| committer | herbelin | 2011-12-17 22:59:36 +0000 |
| commit | 218545f49ea41ff12fd8c8f2c094e333be9d0f7e (patch) | |
| tree | 3e7d3d3a0cb602a8578d8db7d0248c1d6227ca3b /tactics/equality.ml | |
| parent | 503dad5f384f9e03ce9b9f3a956dcc3b2a40e37e (diff) | |
Added a flag to control the use of typing when instantiating applied
meta in the tactic unification algorithm ("auto" becomes much slower
if it takes into account the type of metas).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14813 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/equality.ml')
| -rw-r--r-- | tactics/equality.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/tactics/equality.ml b/tactics/equality.ml index 76bceb738f..10fd0fef9e 100644 --- a/tactics/equality.ml +++ b/tactics/equality.ml @@ -87,6 +87,7 @@ let rewrite_unif_flags = { Unification.use_metas_eagerly_in_conv_on_closed_terms = true; Unification.modulo_delta = empty_transparent_state; Unification.modulo_delta_types = empty_transparent_state; + Unification.check_applied_meta_types = true; Unification.resolve_evars = true; Unification.use_pattern_unification = true; Unification.use_meta_bound_pattern_unification = true; @@ -154,6 +155,7 @@ let rewrite_conv_closed_unif_flags = { Unification.modulo_delta = empty_transparent_state; Unification.modulo_delta_types = full_transparent_state; + Unification.check_applied_meta_types = true; Unification.resolve_evars = false; Unification.use_pattern_unification = true; (* To rewrite "?n x y" in "y+x=0" when ?n is *) |