safety commit

[SXSI/xpathcomp.git] / main.ml

diff --git a/main.ml b/main.ml
index 19bdcf6..dc2cb3e 100644 (file)
--- a/main.ml
+++ b/main.ml
@@ -69,9 +69,9 @@ let main v query_string output =
       let _ = Printf.eprintf "Count is %i\n%!" r in 
       let _ = Printf.eprintf "Timing //keyword 2:" in
       let r = time (test_loop2 v) (Tag.tag "keyword") in
-      let _ = Printf.eprintf "Count is %i\n%!" r in  *)
+      let _ = Printf.eprintf "Count is %i\n%!" r in  
       let _ = Printf.eprintf "Timing //node() :" in
-      let _ = time (test_full)  v in      
+      let _ = time (test_full)  v in      *)
       XPath.Ast.print Format.err_formatter query;
       Format.fprintf Format.err_formatter "\n%!";
       Printf.eprintf "Compiling query : ";