Split the Options module in two to remove a circular dependency in
[SXSI/xpathcomp.git] / src / runtime.ml
index 0ba08a2..7d1e79f 100644 (file)
@@ -76,7 +76,7 @@ module Make (U : ResJIT.S) : S with type result_set = U.NS.t =
           Logger.print err_formatter "@?L3JIT: %i used entries@\n@?" !count
         let create () =
           let v = Cache.Lvl3.create 1024 dummy in
-          if !Options.verbose then at_exit (fun () -> show_stats v);
+          if !Config.verbose then at_exit (fun () -> show_stats v);
           v
 
         let find t tlist s1 s2 =
@@ -151,7 +151,7 @@ module Make (U : ResJIT.S) : S with type result_set = U.NS.t =
           let f = gen_code auto tlist s1 s2 in
           LOG(__ "top-down-run" 2 "Inserting: %i, %a, %a\n%!"
             (Uid.to_int tlist.Translist.Node.id) StateSet.print s1 StateSet.print s2);
-          if not !Options.no_cache then add cache tlist s1 s2 f;
+          if not !Config.no_cache then add cache tlist s1 s2 f;
          f
       end