X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=main.ml;h=b98932972e3c1382cb6c8709871ef58a0a486e55;hb=36154bd9b953b84d539d2505d94c414b2e3c72e6;hp=c53edf29a97a32dd5460c015f83fbe8abe5df382;hpb=9abf8a6f78264fbf4eec1676b4a26018967c97e6;p=SXSI%2Fxpathcomp.git diff --git a/main.ml b/main.ml index c53edf2..b989329 100644 --- a/main.ml +++ b/main.ml @@ -42,8 +42,8 @@ let main v query output = let auto = time XPath.Compile.compile query in XPath.Ast.print Format.err_formatter query; Format.eprintf "\n%!"; - (* Format.eprintf "Internal rep of the tree is :\n%!"; - Tree.Binary.dump v; *) +(* Format.eprintf "Internal rep of the tree is :\n%!"; + Tree.Binary.dump v; *) Printf.eprintf "Execution time : "; time (fun v -> ignore (TopDown.accept auto v)) v; Printf.eprintf "Number of nodes in the result set : %i\n" (BST.cardinal auto.result);