diff -r 3b39832651c9 -r e79f4aeff134 ClassDescription.st --- a/ClassDescription.st Wed Nov 21 09:57:03 2001 +0100 +++ b/ClassDescription.st Wed Nov 21 16:03:43 2001 +0100 @@ -2985,6 +2985,10 @@ |set| + (self instVarNames includes:instVarName) ifFalse:[ + ^ #() + ]. + set := IdentitySet new. self selectorsAndMethodsDo:[:sel :mthd | (mthd accessedInstVars includes:instVarName) ifTrue:[ @@ -3928,6 +3932,6 @@ !ClassDescription class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.127 2001-11-17 11:32:49 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/ClassDescription.st,v 1.128 2001-11-21 15:03:43 cg Exp $' ! ! ClassDescription initialize!