]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/matita.ml
bugfixes:
[helm.git] / helm / matita / matita.ml
index 6e5af0645c7dc7a37cef6d7df9cfc3b9899267ec..2a87554d8f76bb2bf405e3b46e6ec8a539cd6263 100644 (file)
@@ -91,12 +91,9 @@ let _ =
     | Incomplete_proof ((proof, goal) as status) ->
         sequents_viewer#load_sequents status;
         sequents_viewer#goto_sequent goal
-    | Proof proof -> 
-        sequents_viewer#load_logo_with_qed
-    | No_proof -> 
-        sequents_viewer#load_logo
-    | Intermediate _ -> 
-        assert false (* only the engine may be in this state *)
+    | Proof proof -> sequents_viewer#load_logo_with_qed
+    | No_proof -> sequents_viewer#load_logo
+    | Intermediate _ -> assert false (* only the engine may be in this state *)
   in
   script#addObserver sequents_observer;
   script#addObserver browser_observer