#OTHER by mawalch
authormawalch
Wed, 22 Jun 2016 12:00:31 +0200
changeset 1439 a51a503a55b8
parent 1438 d46e7b952634
child 1446 c3b09cef9f87
#OTHER by mawalch class: RegressionTests::WeakCollectionTest changed: #testWeakValueDictionary2 #testWeakValueDictionary3
RegressionTests__WeakCollectionTest.st
--- a/RegressionTests__WeakCollectionTest.st	Thu Jun 09 12:35:01 2016 +0200
+++ b/RegressionTests__WeakCollectionTest.st	Wed Jun 22 12:00:31 2016 +0200
@@ -155,7 +155,8 @@
     self assert: ( (ww at:k) ~~ v1 ).
     self assert: ( (ww at:k) = v1 ).
 
-    ObjectMemory scavenge.
+    "/ give background finalizer a chance to run.
+    2 timesRepeat:[ ObjectMemory scavenge. Delay waitForSeconds:0.5 ].
 
 "/    self assert: ( ww size = 0 ).
     self assert: ( (ww at:k ifAbsent:nil) isNil ).
@@ -182,7 +183,7 @@
     v2 := nil.
 
     v := v copy.
-    ObjectMemory scavenge.
+    2 timesRepeat:[ ObjectMemory scavenge. Delay waitForSeconds:0.5 ].
     v2 := self fetchValueAtKey:k from:ww ifAbsent:nil.
     self assert: ( v2 isNil ).
     v2 := nil.