--- a/Parser.st	Wed Jan 27 15:23:26 2016 +0100
+++ b/Parser.st	Wed Jan 27 16:59:49 2016 +0100
@@ -4485,14 +4485,14 @@
 
     nameBold := variableName allBold.
     classToCompileFor notNil ifTrue:[
-        "/ is it an instance-variable marked inaccessable ?
+        "/ is it an instance-variable marked inaccessible?
 
         idx := (self classesInstVarNames) indexOf:(variableName , '*') startingAt:1.
         idx ~~ 0 ifTrue:[
-            ^ '''%1'' is a hidden instvar (not accessable from ST-code)' bindWith:nameBold.
-        ].
-
-        "/ is it an instance variable, while evaluateing for the class ?
+            ^ '''%1'' is a hidden instvar (not accessible from ST-code)' bindWith:nameBold.
+        ].
+
+        "/ is it an instance variable, while evaluating for the class ?
         classToCompileFor isMeta ifTrue:[
             (classToCompileFor soleInstance allInstVarNames includes:variableName) ifTrue:[
                 ^ '''%1'' is an instvar\(hint: you are evaluating/compiling in the classes context)' bindWith:nameBold.