Rename 'Tracer' module to 'Logger'.

[SXSI/xpathcomp.git] / src / main.ml

diff --git a/src/main.ml b/src/main.ml
index 2349ad1..605c0e6 100644 (file)
--- a/src/main.ml
+++ b/src/main.ml
@@ -78,7 +78,10 @@ let main v query_string output =
        let module R = ResJIT.Count in
        let module M = Runtime.Make(R) in
        (* mk_runtime run auto doc arg count print outfile  *)
-       mk_runtime M.twopass_top_down_run auto v Tree.root R.NS.length R.NS.serialize None
+       if !Options.twopass then 
+         mk_runtime M.twopass_top_down_run auto v Tree.root R.NS.length R.NS.serialize None
+       else
+         mk_runtime M.top_down_run auto v Tree.root R.NS.length R.NS.serialize None
       else
        let module R = ResJIT.Mat in
        let module M = Runtime.Make(R) in