--- a/Queue.st	Mon Aug 26 23:15:10 2019 +0200
+++ b/Queue.st	Mon Aug 26 23:16:39 2019 +0200
@@ -531,7 +531,7 @@
 
     (tally == sz) ifTrue:[
         self error:'queue is full' mayProceed:true.
-        ^ self
+        ^ anObject
     ].
 
     contentsArray at:pos put:anObject.
@@ -539,6 +539,7 @@
     pos > sz ifTrue:[pos := 1].
     writePosition := pos.
     tally := tally + 1.
+    ^ anObject
 
     "Modified: / 22-02-2017 / 16:33:22 / stefan"
 !