--- a/ClassPrimitiveFunctionsChange.st	Thu Jul 15 21:43:46 1999 +0200
+++ b/ClassPrimitiveFunctionsChange.st	Thu Jul 15 21:47:01 1999 +0200
@@ -59,6 +59,9 @@
 !ClassPrimitiveFunctionsChange methodsFor:'printing'!
 
 printOn:aStream
+    "append a user printed representation of the receiver to aStream.
+     The format is suitable for a human - not meant to be read back."
+
     aStream nextPutAll:className; nextPutAll:' primitiveFunctions:'
 ! !
 
@@ -73,5 +76,5 @@
 !ClassPrimitiveFunctionsChange class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ClassPrimitiveFunctionsChange.st,v 1.6 1999-07-12 12:06:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ClassPrimitiveFunctionsChange.st,v 1.7 1999-07-15 19:46:34 cg Exp $'
 ! !