--- a/ArrayedCollection.st Sun Oct 19 13:13:10 2008 +0200
+++ b/ArrayedCollection.st Sun Oct 19 13:13:14 2008 +0200
@@ -302,6 +302,10 @@
!
isAbstract
+ "Return if this class is an abstract class.
+ True is returned for ArrayedCollection here; false for subclasses.
+ Abstract subclasses must redefine again."
+
^ self == ArrayedCollection
! !
@@ -479,5 +483,5 @@
!ArrayedCollection class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ArrayedCollection.st,v 1.56 2007-11-21 17:23:38 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ArrayedCollection.st,v 1.57 2008-10-19 11:13:14 cg Exp $'
! !