--- a/ObjectCoder.st	Fri Apr 15 15:28:36 2016 +0200
+++ b/ObjectCoder.st	Sat Apr 16 18:24:31 2016 +0200
@@ -273,7 +273,15 @@
 
 !ObjectCoder methodsFor:'private-accessing'!
 
+stream
+    "return my input or output stream"
+    
+    ^ stream
+!
+
 stream:aStream
+    "set my input or output stream"
+
     stream := aStream.
 ! !