X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Fmatitadep.ml;h=0676aa93ec290e15c50bf581b1e27c6379192ace;hb=e6b28085c97ae7b9bd3f3262b105f6b84f42b047;hp=e355ab59c9efeaff8ca90a642114104e0e25d64d;hpb=ad767500db4f2f7ef24e56fd86b2004d715e4a9d;p=helm.git

diff --git a/helm/matita/matitadep.ml b/helm/matita/matitadep.ml
index e355ab59c..0676aa93e 100644
--- a/helm/matita/matitadep.ml
+++ b/helm/matita/matitadep.ml
@@ -95,13 +95,14 @@ let main () =
               (_, TA.Alias (_, TA.Ident_alias(_, uri)))) -> 
                 Hashtbl.add aliases file uri
           | TA.Executable (_, TA.Command (_, TA.Include (_, path))) ->
-             (try
-               Hashtbl.add deps file (MatitaMisc.obj_file_of_script (find path))
-              with
-               Sys_error _ ->
-                MatitaLog.error
-                 ("In file " ^ file ^ " unable to include " ^ 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 ->