X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=main.ml;h=b30eff286dd6cd14f69de1f29ae8937fe01ab4c1;hb=ede0fe9faff0bffe5f9f010d8942a057186d1ce1;hp=ee14b34184fc0bcc59d425858283cd58962d93b2;hpb=83b4813de7204842bb59d5cb0aec71aff633ca85;p=SXSI%2Fxpathcomp.git

diff --git a/main.ml b/main.ml
index ee14b34..b30eff2 100644
--- a/main.ml
+++ b/main.ml
@@ -49,12 +49,12 @@ let main v query_string output =
       with
 	  Ulexer.Loc.Exc_located ((x,y),e) -> Printf.eprintf "character %i-%i %s\n" x y (Printexc.to_string e);exit 1
       in
-      let _ = Printf.eprintf "Timing //keyword :" in
+(*      let _ = Printf.eprintf "Timing //keyword :" in
       let r = time (test_loop v) (Tag.tag "keyword") in
       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 *)
       XPath.Ast.print Format.err_formatter query;
       Format.fprintf Format.err_formatter "\n%!";
       Printf.eprintf "Compiling query : ";