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