StorageFile.cleanup

G_Z 13.10.2014 19:37 / 13.10.2014 19:37

Есть подозрение, что StorageFile.cleanup не работает.

Ожидаю, что он должен зачистить все протухшие файлы и их индексы.
Однако, при вызове cleanup ничего не удаляется.

bug.html:

@main[]
^use[StorageFile.p]
$cache[^StorageFile::create[cache][
	$.sDataDir[/_tmp/test]
]]
^for[k](1;1000){
	^cache.set[$k][
		$.value[1]
		$.expires(1/24/3600)
	]
}

Получаем 2000 файлов.
Через несколько минут вызываем

^cache.cleanup[]

и ничего не удаляется.

Глубоко пока не разбирался, вижу, что файлы перебираются, но не удаляются.

---