--- a/Parser.st	Wed Mar 25 11:53:10 2015 +0100
+++ b/Parser.st	Wed Mar 25 15:13:16 2015 +0100
@@ -3986,8 +3986,8 @@
 
     (dists size ~~ 0) ifTrue:[
         dists sortWith:names.
-        dists := dists reverse.
-        names := names reverse.
+        dists := dists reversed.
+        names := names reversed.
         n := names size min:10.
         names := names copyTo:n.
 
@@ -12247,11 +12247,11 @@
 !Parser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.881 2015-03-25 10:53:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.882 2015-03-25 14:13:16 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.881 2015-03-25 10:53:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.882 2015-03-25 14:13:16 cg Exp $'
 !
 
 version_SVN