tasks a-s

Task/Reverse-a-string/Nemerle/reverse-a-string-1.nemerle

@@ -0,0 +1,23 @@
+using System;
+using System.Globalization;
+using System.Windows.Forms;
+using System.Console;
+using Nemerle.Utility.NString;
+
+module StrReverse
+{
+    UReverse(text : string) : string
+    {
+        mutable output = [];
+        def elements = StringInfo.GetTextElementEnumerator(text);
+        while (elements.MoveNext())
+            output ::= elements.GetTextElement().ToString();
+        Concat("", output.Reverse());
+    }
+
+    Main() : void
+    {
+        def test = "as⃝df̅";
+        MessageBox.Show($"$test --> $(UReverse(test))");  //for whatever reason my console didn't display Unicode properly, but a MessageBox worked
+    }
+}

Task/Reverse-a-string/Nemerle/reverse-a-string-2.nemerle

@@ -0,0 +1,7 @@
+Reverse(text : string) : string
+{
+    mutable output = [];
+    foreach (c in text.ToCharArray())
+        output ::= c.ToString();
+    Concat("", output)
+}