From b36c499a9234a3dc0abd5fb8d418975966f179e7 Mon Sep 17 00:00:00 2001
From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Fri, 9 Feb 2007 15:12:07 +0000
Subject: [PATCH] Exceptions should never escape the final exception handler
 for the worker threads. This patch just reduces the probability.

---
 matita/matitaGui.ml | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/matita/matitaGui.ml b/matita/matitaGui.ml
index b8d20cf3c..cc8a885e8 100644
--- a/matita/matitaGui.ml
+++ b/matita/matitaGui.ml
@@ -778,7 +778,11 @@ class gui () =
            unlock_world ()
           with
            | GrafiteDisambiguator.DisambiguationError (offset,errorll) ->
-              interactive_error_interp source_buffer notify_exn offset errorll ;
+              (try
+                interactive_error_interp source_buffer notify_exn offset
+                 errorll
+               with
+                exc -> notify_exn exc);
               unlock_world ()
            | exc ->
               notify_exn exc;
-- 
2.39.2