--- a/ObjectCoder.st	Sun Feb 05 18:22:39 2017 +0100
+++ b/ObjectCoder.st	Mon Feb 06 09:25:47 2017 +0100
@@ -96,10 +96,12 @@
     "Modified (comment): / 05-02-2017 / 17:01:03 / cg"
 !
 
-encode:aByteArrayOrString
-    "encode aByteArrayOrString"
+encode:anObject
+    "encode anObject.
+     Some subclasses (eg. XMLCoder)allow arbitrary objects to be encoded/decoded,
+     others don't (eg. Base64Coder)"
 
-    ^ self new encodingOf:aByteArrayOrString with:nil
+    ^ self new encodingOf:anObject with:nil
 
     "
      Base64Coder encode:#[1 2 16rFe 16rFF]
@@ -107,31 +109,37 @@
      OSI::BERCoder encode:'hello'  
     "
 
-    "Modified (comment): / 05-02-2017 / 17:01:22 / cg"
+    "Modified (comment): / 06-02-2017 / 09:24:40 / cg"
 !
 
-encode:aByteArrayOrString on:aStream
-    "encode aByteArrayOrString onto a stream"
+encode:anObject on:aStream
+    "encode anObject onto a stream
+     Some subclasses (eg. XMLCoder)allow arbitrary objects to be encoded/decoded,
+     others don't (eg. Base64Coder)"
 
-    self encode:aByteArrayOrString on:aStream with:nil
+    self encode:anObject on:aStream with:nil
 
-    "Modified (comment): / 05-02-2017 / 17:01:41 / cg"
+    "Modified (format): / 06-02-2017 / 09:25:31 / cg"
 !
 
-encode:aByteArrayOrString on:aStream with:info
-    "encode aByteArrayOrString onto a stream"
+encode:anObject on:aStream with:info
+    "encode anObject onto a stream
+     Some subclasses (eg. XMLCoder)allow arbitrary objects to be encoded/decoded,
+     others don't (eg. Base64Coder)"
 
-    self new encode:aByteArrayOrString on:aStream with:info
+    self new encode:anObject on:aStream with:info
 
-    "Modified (format): / 05-02-2017 / 17:01:58 / cg"
+    "Modified (format): / 06-02-2017 / 09:25:27 / cg"
 !
 
-encode:aByteArrayOrString with:aParameter
-    "return the encoding of aByteArrayOrString"
+encode:anObject with:aParameter
+    "encode anObject onto a stream
+     Some subclasses (eg. XMLCoder)allow arbitrary objects to be encoded/decoded,
+     others don't (eg. Base64Coder)"
 
-    ^ self new encodingOf:aByteArrayOrString with:aParameter
+    ^ self new encodingOf:anObject with:aParameter
 
-    "Modified (comment): / 05-02-2017 / 17:02:04 / cg"
+    "Modified (format): / 06-02-2017 / 09:25:20 / cg"
 !
 
 encodingOf:anObject