X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2FmatitacLib.ml;h=93d92c5771b93da9225062a3cd850de81cd0eb13;hb=8030b740ba0b84df1ae3a3e5878b447f3e4ec874;hp=844d4f5d854dd723ba1f3390d6b449674596608f;hpb=d90d73349df641ea2d18b4c2ff4fe9d970861778;p=helm.git

diff --git a/matita/matitacLib.ml b/matita/matitacLib.ml
index 844d4f5d8..93d92c577 100644
--- a/matita/matitacLib.ml
+++ b/matita/matitacLib.ml
@@ -173,7 +173,7 @@ let pp_times fname bench_mode rc big_bang =
         else 
           "matitac" 
       in
-      let rc = if rc then "OK" else "FAIL" in
+      let rc = if rc then "OK" else "FAIL" in
       let times = 
         let fmt t = 
           let seconds = int_of_float t in
@@ -275,7 +275,7 @@ let main ~mode =
      end
     else
      begin
-       let baseuri =
+       let baseuri, _fullpathforfname =
         DependenciesParser.baseuri_of_script ~include_paths fname in
        let moo_fname = 
          LibraryMisc.obj_file_of_baseuri