--- a/DoWhatIMeanSupport.st	Sat Dec 03 07:03:54 2016 +0100
+++ b/DoWhatIMeanSupport.st	Tue Dec 06 07:07:15 2016 +0100
@@ -3701,7 +3701,7 @@
                         (val isLiteral and:[ (printString := val printString) size < 15 ]) ifTrue:[
                             eachName,' (= ',printString allItalic,' )'
                         ] ifFalse:[
-                            eachName,' (= ',val classNameWithArticle allItalic,' )'
+                            eachName,' (= ',val class nameWithArticle allItalic,' )'
                         ].
                     ].
                 ].
@@ -6144,9 +6144,11 @@
             ].
             con := con home.
         ].
-        "/ an instvar
+        "/ an instvar?
         (contextOrNil receiver class allInstVarNames includes:aVariableName) ifTrue:[
-            nodeVal := contextOrNil receiver instVarNamed:aVariableName.
+            contextOrNil receiver isProtoObject ifFalse:[
+                nodeVal := contextOrNil receiver instVarNamed:aVariableName.
+            ].
             nodeVal notNil ifTrue:[
                 ^ { nodeVal . #instanceVariable }
             ].