added a test for THashSet::Defrag()