diff options
| author | herbelin | 2008-04-04 19:46:04 +0000 |
|---|---|---|
| committer | herbelin | 2008-04-04 19:46:04 +0000 |
| commit | 76cbb3b74c5611fb8c274d4c911d5c83f85351a7 (patch) | |
| tree | c9152b37d6f2b6b68f0a290fda469d5f899d6929 /proofs | |
| parent | a418f664cbb289c4b3bf72aa2111ee02b8d44013 (diff) | |
Mise en place d'une extension de apply pour que celui-ci sache
traverser les conjonctions (par exemple, apply sur un "iff" cherchera
à utiliser la première des 2 composantes qui s'applique).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10758 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs')
| -rw-r--r-- | proofs/logic.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/proofs/logic.ml b/proofs/logic.ml index 154f8481aa..c9ae781038 100644 --- a/proofs/logic.ml +++ b/proofs/logic.ml @@ -52,7 +52,7 @@ let rec catchable_exception = function | RefinerError _ | Indrec.RecursionSchemeError _ | Nametab.GlobalizationError _ | PretypeError (_,VarNotFound _) (* unification errors *) - | PretypeError(_,(CannotUnify _|CannotGeneralize _|NoOccurrenceFound _| + | PretypeError(_,(CannotUnify _|CannotUnifyLocal _|CannotGeneralize _|NoOccurrenceFound _| CannotUnifyBindingType _|NotClean _)) -> true | _ -> false |