--- a/compiler/tests/PPCPrototype1Test.st	Sun May 10 06:28:36 2015 +0100
+++ b/compiler/tests/PPCPrototype1Test.st	Tue May 12 01:24:03 2015 +0100
@@ -552,14 +552,16 @@
     parser := identifier / kw.
     parser := parser compileWithConfiguration: configuration.
     self assert: parser class methodDictionary size = 8.
-    self assert: (parser class methods anySatisfy: [ :m | m selector = #kw ]).
-    self assert: (parser class methods anySatisfy: [ :m | m selector = #kw_fast ]).
+    self assert: (parser class methodDictionary values anySatisfy: [ :m | m selector = #kw ]).
+    self assert: (parser class methodDictionary values anySatisfy: [ :m | m selector = #kw_fast ]).
 
     self assert: parser parse: 'foo'.
     self assert: result inputValue = 'foo'.
 
     self assert: parser parse: 'false'.
     self assert: result inputValue = 'false'.
+
+    "Modified: / 10-05-2015 / 07:33:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !PPCPrototype1Test methodsFor:'tests - ids'!