RakuAST: make sorting of localizations stable

rakudo · Oct 14, 2023 · 10bf44d · 10bf44d
1 parent 401c11b
commit 10bf44d
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/lib/RakuAST/L10N.rakumod b/lib/RakuAST/L10N.rakumod
@@ -221,7 +221,9 @@ my sub slangify($language, %hash) is export {
     my @adverb-pc;
     my @adverb-rx;
     my @named;
-    for %hash.sort(*.key.fc) -> (:key($name), :value($string)) {
+    for %hash.sort(-> $a, $b {
+        $a.key.fc cmp $b.key.fc || $b.key cmp $a.key
+    }) -> (:key($name), :value($string)) {
 
         # It's a sub / method name
         if $name.starts-with('core-') {