make profiler silent

diff --git a/helm/matita/matitaInit.ml b/helm/matita/matitaInit.ml
index 1e9ebe2dd2b2eb539ea7096816fd3a131ba1578b..d0127530870c0e53295f25eb67e0a2c88d736056 100644 (file)
--- a/helm/matita/matitaInit.ml
+++ b/helm/matita/matitaInit.ml
@@ -155,6 +155,7 @@ let registry_defaults =
     "matita.external_editor",   "gvim -f -c 'go %p' %f";
     "matita.preserve",          "false";
     "matita.quiet",             "false";
+    "matita.profile",           "true";
   ]
 
 let set_registry_values =
@@ -178,6 +179,9 @@ let parse_cmdline init_status =
         "-nodb", Arg.Unit (fun () -> Helm_registry.set_bool "db.nodb" true),
               ("Avoid using external database connection "
                ^ "(WARNING: disable many features)");
+        "-noprofile", 
+          Arg.Unit (fun () -> Helm_registry.set_bool "matita.profile" false),
+          "Turns off profiling printings";
       ] in
       let debug_arg_spec =
         if BuildTimeConf.debug then
@@ -197,6 +201,8 @@ let parse_cmdline init_status =
     Arg.parse arg_spec (add_l args) (usage ());
     set_list ~key:"matita.includes" includes;
     set_list ~key:"matita.args" args;
+    HExtlib.set_profiling_printings 
+      (fun () -> Helm_registry.get_bool "matita.profile");
     CmdLine :: init_status
   end else
     init_status

diff --git a/helm/matita/template_makefile.in b/helm/matita/template_makefile.in
index 6079bb4eb333b7664d3330671af661b3446876c6..5ae1165bbbc17666f80a5bfd17232b00e300edee 100644 (file)
--- a/helm/matita/template_makefile.in
+++ b/helm/matita/template_makefile.in
@@ -1,7 +1,7 @@
 SRC=$(shell find @ROOT@ -name "*.ma" -a -type f)
 TODO=$(SRC:%.ma=%.mo)
 
-MATITA_FLAGS=
+MATITA_FLAGS=-noprofile
 NODB=false
 ifeq ($(NODB),true)
        MATITA_FLAGS += -nodb
@@ -14,14 +14,14 @@ MATITADEP=@DEP@
 all: $(TODO)
 
 clean:
-       $(MATITACLEAN) $(MATITA_FLAGS) $(SRC)
+       $(MATITACLEAN) $(MATITA_FLAGS) $(SRC) 
        rm -f $(TODO)
 
 %.moo:
        ($(MATITAC) $(MATITA_FLAGS) -q -I @ROOT@ $< | (grep -v "^make" || true))
 
 @DEPFILE@ : $(SRC)
-       $(MATITADEP) $(MATITA_FLAGS) -I '@ROOT@' $^ > @DEPFILE@
+       $(MATITADEP) $(MATITA_FLAGS) -I '@ROOT@' $^ 1> @DEPFILE@ 2>/dev/null
 
 # this is the depend for full targets like:
 # dir/dir/name.moo: dir/dir/name.ma dir/dep.moo