--- a/DoWhatIMeanSupport.st	Fri Dec 02 10:35:37 2016 +0100
+++ b/DoWhatIMeanSupport.st	Mon Dec 05 16:05:37 2016 +0100
@@ -3702,7 +3702,7 @@
                         (val isLiteral and:[ (printString := val printString) size < 15 ]) ifTrue:[
                             eachName,' (= ',printString allItalic,' )'
                         ] ifFalse:[
-                            eachName,' (= ',val classNameWithArticle allItalic,' )'
+                            eachName,' (= ',val class nameWithArticle allItalic,' )'
                         ].
                     ].
                 ].
@@ -6143,9 +6143,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 }
             ].