--- a/ClassDescription.st Wed Jun 10 00:04:20 2015 +0200
+++ b/ClassDescription.st Wed Jun 10 00:05:50 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1993 by Claus Gittinger
All Rights Reserved
@@ -662,26 +660,6 @@
!ClassDescription methodsFor:'Compatibility-Dolphin'!
-categoriesFor:aMethodSelector
- "this method allows fileIn of Dolphin methods -
- return a MethodCategoriesReader to read in a methods categories for me.
- Since Dolphin uses a different way to assign method categories,
- loaded methods are temporarily categorized as 'Dolphin methods'
- and later reassigned, when a categoriesFor: message arrives."
-
- ^ Dolphin::MethodCategoriesReader class:self selector:aMethodSelector
-!
-
-categoriesForClass
- "this method allows fileIn of Dolphin classes -
- return a ClassCategoriesReader to read in a classes categories for me.
- Since Dolphin uses a different way to assign class categories,
- the loaded classes are temporarily categorized as 'ST/V classes'
- and later reassigned, when a categoriesForClass message arrives."
-
- ^ Dolphin::ClassCategoriesReader class:self
-!
-
methodsFor
"this method allows fileIn of Dolphin methods -
return a ClassCategoryReader to read in and compile methods for me.
@@ -2010,22 +1988,6 @@
!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 isNil ifTrue:[
- Smalltalk loadPackage:'stx:libcompat'
- ].
-
- ^ 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:'.
@@ -4335,11 +4297,11 @@
!ClassDescription class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.264 2015-06-08 00:22:59 cg Exp $'
+ ^ '$Header$'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.264 2015-06-08 00:22:59 cg Exp $'
+ ^ '$Header$'
! !