--- a/UninterpretedBytes.st Sun Oct 19 13:12:08 2008 +0200
+++ b/UninterpretedBytes.st Sun Oct 19 13:12:12 2008 +0200
@@ -254,6 +254,10 @@
!UninterpretedBytes class methodsFor:'queries'!
isAbstract
+ "Return if this class is an abstract class.
+ True is returned for UninterpretedBytes here; false for subclasses.
+ Abstract subclasses must redefine again."
+
^ self == UninterpretedBytes
!
@@ -2437,5 +2441,5 @@
!UninterpretedBytes class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.66 2008-05-09 19:54:04 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/UninterpretedBytes.st,v 1.67 2008-10-19 11:12:12 cg Exp $'
! !