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 : ";