X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Ftracer.ml;h=17e05401cb6de86d548ce374013266e64e7d7069;hb=ecec752325cb3d207894a4f8d772936bd7ad9f4a;hp=aaa38d387fe7eccfe1d7f280f78070af0fe849ea;hpb=db0ad408721f202e33785958211fe6e4228fce8f;p=SXSI%2Fxpathcomp.git diff --git a/src/tracer.ml b/src/tracer.ml index aaa38d3..17e0540 100644 --- a/src/tracer.ml +++ b/src/tracer.ml @@ -3,7 +3,7 @@ open Format type tracer = string type level = int -let tracers = [ "top-down-run"; "top-down-approx"; "result-set"; "level2-jit"; "res-jit"; "grammar" ] +let tracers = [ "top-down-run"; "top-down-approx"; "result-set"; "level2-jit"; "res-jit"; "grammar"; "twopass" ] let active_tracers : (tracer, int) Hashtbl.t = Hashtbl.create 17 let available () = tracers