]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/matitacLib.ml
first matitadep snapshot
[helm.git] / helm / matita / matitacLib.ml
index d57d211e21edde02b8c20beae7c5468f068e9bbb..4d04d371c8ea07f4de3d08122d13474d8f05c0fb 100644 (file)
@@ -141,6 +141,7 @@ let main ~mode =
      begin
        MatitaLog.message 
          (sprintf "execution of %s completed in %s." fname (hou^min^sec));
+         close_out (open_out (MatitaMisc.obj_file_of_script fname));
        exit 0
      end
   with