--- a/BaseNCoder.st	Mon Aug 26 10:10:18 2019 +0200
+++ b/BaseNCoder.st	Mon Aug 26 10:24:29 2019 +0200
@@ -482,7 +482,7 @@
 nextPut:aByte
     "encode aByte on the output stream"
 
-    ^ self nextPutByte:aByte asInteger.
+    self nextPutByte:aByte asInteger.
 !
 
 nextPutAll:aCollection startingAt:first to:last
@@ -492,7 +492,7 @@
     aCollection from:first to:last do:[:element |
         self nextPutByte:element
     ].
-    ^ aCollection
+
 !
 
 nextPutBytes:aCollectionOfBytes