]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/matitaGui.ml
More profiling code added.
[helm.git] / helm / matita / matitaGui.ml
index e0ca8c6816fb88b97bc00e59d7f0122adf408f15..e2e4909428dc56f39c5bbde2edba05caaf9e7a27 100644 (file)
@@ -394,7 +394,7 @@ class gui () =
       let get_devel_selected () = 
         match model#easy_mselection () with
         | [[name;_]] -> MatitamakeLib.development_for_name name
-        | _ -> assert false 
+        | _ -> None
       in
       let refresh () = 
         while Glib.Main.pending () do