X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Ftptp_grafite%2Ftptp2grafite.ml;h=63dfe0285bb00cb87374c0a5b20096b95c58dbbc;hb=6f676b9124d4630e986f490fda0ae584a3a287ba;hp=54a523cccb81ef237b19846172e08a49f6aea5fa;hpb=397b5f9d848e63a9703a1f90faf9869092ec8893;p=helm.git

diff --git a/helm/software/components/tptp_grafite/tptp2grafite.ml b/helm/software/components/tptp_grafite/tptp2grafite.ml
index 54a523ccc..63dfe0285 100644
--- a/helm/software/components/tptp_grafite/tptp2grafite.ml
+++ b/helm/software/components/tptp_grafite/tptp2grafite.ml
@@ -260,12 +260,12 @@ let convert_ast statements context = function
            else [])@
             [GA.Executable(floc,GA.Tactic(floc, Some (
               if ueq_case then
-                GA.AutoBatch (floc,["paramodulation","";
-                  "timeout",string_of_int !paramod_timeout])
+                  GA.AutoBatch (floc,([],["paramodulation","";
+                  "timeout",string_of_int !paramod_timeout]))
               else
-                GA.AutoBatch (floc,["depth",string_of_int !depth])
+                  GA.AutoBatch (floc,([],["depth",string_of_int !depth]))
             ),
-              GA.Dot(floc)));
+              GA.Semicolon(floc)));
             GA.Executable(floc,GA.Tactic(floc, Some (GA.Try(floc,
               GA.Assumption floc)), GA.Dot(floc)))
             ]@