struct
  let test_name = "Test_sqlite_with_greedy_cache" 
  module DB = Trakeva_cache.Add(Trakeva_sqlite)
  let debug_mode v =
    Trakeva_sqlite.debug := v;
    Trakeva_cache.debug := v;
end