--- a/ClassDescription.st Sun Feb 05 01:32:32 2017 +0100
+++ b/ClassDescription.st Sun Feb 05 01:37:06 2017 +0100
@@ -677,6 +677,7 @@
^ Dolphin::SourceManager default
! !
+
!ClassDescription methodsFor:'Compatibility-ST80'!
addInstVarName:anotherInstVar
@@ -821,6 +822,7 @@
"Created: / 28.3.1998 / 21:21:52 / cg"
! !
+
!ClassDescription methodsFor:'Compatibility-V''Age'!
categoriesFor:aSelector are:listOfCategories
@@ -1900,7 +1902,7 @@
mustCompile isNil ifTrue:[
p := self parserClass parseMethod:source in:self.
(p isNil
- or:[(aMethod sendsAny:#( instVarIndexFor: instVarOffsetOf: ))
+ or:[(aMethod sendsAnySelector:#( instVarIndexFor: instVarOffsetOf: ))
or:[(p usedVars includesAny:setOfNames)
or:[superBoolean and:[p usesSuper]]]]) ifTrue:[
mustCompile := true
@@ -1913,8 +1915,8 @@
]
"Created: / 01-04-1997 / 23:44:46 / stefan"
- "Modified: / 29-08-1997 / 07:58:32 / cg"
"Modified: / 21-08-2009 / 12:19:09 / Jan Vrany <vranyj1@fel.cvut.cz>"
+ "Modified: / 05-02-2017 / 01:27:36 / cg"
!
recompileMethodsAccessingAnyClassvarOrGlobal:aCollection