--- a/compiler/PPCLL1Visitor.st	Sun May 10 06:28:36 2015 +0100
+++ b/compiler/PPCLL1Visitor.st	Tue May 12 01:24:03 2015 +0100
@@ -20,11 +20,15 @@
     ].
     (firsts asIdentitySet size = firsts size) ifFalse: [ ^ false ].
 
-    firsts allPairsDo: [ :e1 :e2 | 
-        e1 == e2 ifFalse: [
-            (e1 overlapsWith: e2) ifTrue: [ ^ false ] ].
+    firsts do:[:e1 |
+        firsts do:[:e2 |     
+            e1 == e2 ifFalse: [
+                (e1 overlapsWith: e2) ifTrue: [ ^ false ] ].
+        ].
     ].
     ^ true
+
+    "Modified: / 10-05-2015 / 07:27:05 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 startsWithToken: node