diff options
| author | msozeau | 2013-04-05 19:03:30 +0000 |
|---|---|---|
| committer | msozeau | 2013-04-05 19:03:30 +0000 |
| commit | f98de3a79cdf03198705ab5db6c7a1dd8657cb50 (patch) | |
| tree | f157ab376ddec2b2c274a0c9fdb612446beea0b7 | |
| parent | 8b37414ee09d6a38428c7963263f891cfd1c4626 (diff) | |
Allow catching of WrongAbstractionType, fixing a regression from 8.4
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16389 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | proofs/logic.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/proofs/logic.ml b/proofs/logic.ml index 90014835b9..354935aa8c 100644 --- a/proofs/logic.ml +++ b/proofs/logic.ml @@ -52,6 +52,7 @@ let rec catchable_exception = function |NoOccurrenceFound _|CannotUnifyBindingType _ |ActualTypeNotCoercible _|UnifOccurCheck _ |CannotFindWellTypedAbstraction _ + |WrongAbstractionType _ |UnsolvableImplicit _|AbstractionOverMeta _)) -> true | Typeclasses_errors.TypeClassError (_, Typeclasses_errors.UnsatisfiableConstraints _) -> true |