aboutsummaryrefslogtreecommitdiff
path: root/proofs/logic.ml
diff options
context:
space:
mode:
Diffstat (limited to 'proofs/logic.ml')
-rw-r--r--proofs/logic.ml7
1 files changed, 3 insertions, 4 deletions
diff --git a/proofs/logic.ml b/proofs/logic.ml
index b06f16682c..e26733a15d 100644
--- a/proofs/logic.ml
+++ b/proofs/logic.ml
@@ -60,10 +60,9 @@ exception RefinerError of refiner_error
let catchable_exception = function
| Util.UserError _ | TypeError _ | RefinerError _
- | Stdpp.Exc_located(_,(Util.UserError _ | TypeError _ | RefinerError _)) ->
- true
- | _ ->
- false
+ | Stdpp.Exc_located(_,(Util.UserError _ | TypeError _ | RefinerError _ |
+ Nametab.GlobalizationError _)) -> true
+ | _ -> false
let error_cannot_unify k (m,n) =
raise (RefinerError (CannotUnify (m,n)))