diff --git a/src/Soil-Core/SoilGarbageCollectVisitor.class.st b/src/Soil-Core/SoilGarbageCollectVisitor.class.st index 73d24ec7..06455f2d 100644 --- a/src/Soil-Core/SoilGarbageCollectVisitor.class.st +++ b/src/Soil-Core/SoilGarbageCollectVisitor.class.st @@ -85,7 +85,7 @@ SoilGarbageCollectVisitor >> visitSkipList: aSoilSkipList [ class: aSoilSkipList class. newSkipList initializeParametersFrom: aSoilSkipList. - aSoilSkipList newIterator basicAssociationsDo: [ :item | + aSoilSkipList newIterator associationsDo: [ :item | item value isRemoved ifFalse: [ newSkipList at: item key put: item value. self processObjectId: item value asSoilObjectId ] ].