X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=helm%2Fmatita%2Fmatitadep.ml;h=0676aa93ec290e15c50bf581b1e27c6379192ace;hb=91a095f0686ee569ba035e4e30c7d071588cb8e7;hp=88cac82807ff10953bb6549372b70c5a49b94de2;hpb=efdb0db81ef2594a2aced0310997ef0d74462254;p=helm.git

diff --git a/helm/matita/matitadep.ml b/helm/matita/matitadep.ml
index 88cac8280..0676aa93e 100644
--- a/helm/matita/matitadep.ml
+++ b/helm/matita/matitadep.ml
@@ -95,7 +95,14 @@ let main () =
               (_, TA.Alias (_, TA.Ident_alias(_, uri)))) -> 
                 Hashtbl.add aliases file uri
           | TA.Executable (_, TA.Command (_, TA.Include (_, path))) ->
-              Hashtbl.add deps file (MatitaMisc.obj_file_of_script (find path))
+             if path <> "coq.ma" then
+              (try
+                Hashtbl.add deps file (MatitaMisc.obj_file_of_script (find path))
+               with
+                Sys_error _ ->
+                 MatitaLog.error
+                  ("In file " ^ file ^ " unable to include " ^ path)
+              )
           | _ -> ()
         with 
           CicNotationParser.Parse_error _ as exn ->