--- a/ClassDescription.st Sat Jun 06 02:00:21 1998 +0200
+++ b/ClassDescription.st Sat Jun 06 15:10:37 1998 +0200
@@ -1131,6 +1131,18 @@
!ClassDescription methodsFor:'fileIn interface'!
+commentStamp:aStamp prior:whatever
+ "return a ClassCategoryReader to read in and compile methods for me.
+ This was added to allow squeak code to be filedIn."
+
+ ^ Squeak::ClassCommentReader new
+ class:self
+ category:#Comment
+ changeStamp:aStamp
+
+ "Modified: / 6.6.1998 / 01:47:06 / cg"
+!
+
ignoredMethodsFor:aCategory
"this is a speciality of ST/X - it allows quick commenting of methods
from a source-file by replacing the 'methodsFor:' by 'ignoredMethodsFor:'.
@@ -2784,6 +2796,6 @@
!ClassDescription class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.67 1998-04-25 12:29:57 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.68 1998-06-06 13:10:37 cg Exp $'
! !
ClassDescription initialize!