diff options
| author | msozeau | 2012-01-28 05:08:18 +0000 |
|---|---|---|
| committer | msozeau | 2012-01-28 05:08:18 +0000 |
| commit | 47e9afaaa4c08aca97d4f4b5a89cb40da76bd850 (patch) | |
| tree | a2424086c8b7e1635f7a481109a7fae8fcaad386 /tactics | |
| parent | 3f6196a6bdc7e5b0e6d8279a7b7b0de74faa3492 (diff) | |
Tentative to fix bug #2628 by not letting intuition break records. Might be too much of a backwards-incompatible change
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14949 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/tauto.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/tauto.ml4 b/tactics/tauto.ml4 index b7a58be455..fe5103cea8 100644 --- a/tactics/tauto.ml4 +++ b/tactics/tauto.ml4 @@ -100,7 +100,7 @@ let iter_tac tacl = let is_conj ist = let ind = assoc_var "X1" ist in - if (not binary_mode || is_binary ind) (* && not (is_record ind) *) + if (not binary_mode || is_binary ind) && not (is_record ind) && is_conjunction ~strict:strict_in_hyp_and_ccl ind then <:tactic<idtac>> |