YAPC::EU 2018 Glasgow Update!

Task/Anagrams/Elena/anagrams.elena

@@ -7,13 +7,13 @@ import extensions'text.
 
 extension op
 {
-     normalized
-         = self toArray; ascendant; summarize(StringWriter new); literal.
+     T<literal> normalized
+         = self toArray; ascendant; summarize(StringWriter new).
 }
 
-public program =
+public program
 [
-    var aDictionary := Dictionary new.
+    auto aDictionary := Map<literal,object>().
     File new("unixdict.txt"); forEachLine(:aWord)
     [
         var s := aWord.
@@ -29,8 +29,8 @@ public program =
     ].
 
     aDictionary values;
-        sort(:aFormer:aLater)( aFormer length > aLater length );
-        top:20; forEach(:aPair)[ console printLine(aPair value) ].
+        sort(:aFormer:aLater)( aFormer item2; length > aLater item2; length );
+        top:20; forEach(:aPair)[ console printLine(aPair item2) ].
 
-    console readChar.
-].
+    console readChar
+]

Task/Anagrams/Ring/anagrams.ring

@@ -1,7 +1,4 @@
 # Project : Anagrams
-# Date    : 2017/11/28
-# Author : Gal Zsolt (~ CalmoSoft ~)
-# Email   : <calmosoft@gmail.com>
 
 load "stdlib.ring"
 fn1 = "unixdict.txt"