--- 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!