]> matita.cs.unibo.it Git - helm.git/commitdiff
thread-based interface activated again
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Sat, 25 Aug 2007 13:31:11 +0000 (13:31 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Sat, 25 Aug 2007 13:31:11 +0000 (13:31 +0000)
helm/software/matita/matitaGui.ml

index 2d5d8fa0a70d802baffa0f131dbb6ecc9c7fce7c..fde6ba1ae2d9abde9b6a2b13bd6cfab1217d8065 100644 (file)
@@ -783,8 +783,8 @@ class gui () =
               notify_exn exc;
               unlock_world ()
        in
-       thread_main ();
-        (* worker_thread := Some (Thread.create thread_main ()) *)
+       (*thread_main ();*)
+       worker_thread := Some (Thread.create thread_main ())
       in
       let kill_worker =
        (* the following lines are from Xavier Leroy: http://alan.petitepomme.net/cwn/2005.11.08.html *)