--- a/SharedQueue.st	Mon Aug 26 09:15:57 2019 +0200
+++ b/SharedQueue.st	Mon Aug 26 09:30:57 2019 +0200
@@ -419,7 +419,7 @@
 reverseDo:anObject
     "evaluate the argument, aBlock for each element in the queue"
 
-    ^ accessLock critical:[super reverseDo:anObject].
+    accessLock critical:[super reverseDo:anObject].
 
     "Created: / 22-02-2017 / 14:54:22 / stefan"
 ! !