#OTHER by exept
authorClaus Gittinger <cg@exept.de>
Mon, 26 Aug 2019 23:13:47 +0200
changeset 24649 a9ce1db0cf15
parent 24648 a19f893311d9
child 24650 6f177e963f98
#OTHER by exept changed: #nextPut: returns its argument
ObjectCoder.st
--- a/ObjectCoder.st	Mon Aug 26 23:13:18 2019 +0200
+++ b/ObjectCoder.st	Mon Aug 26 23:13:47 2019 +0200
@@ -231,7 +231,8 @@
 nextPut:anObject
     "encode anObject onto my stream"
 
-    self nextPut:anObject with:nil
+    self nextPut:anObject with:nil.
+    ^ anObject
 !
 
 nextPut:anObject with:aParameter