From 57c6b3483a8f5f062bb18e4682182c2957a8cf04 Mon Sep 17 00:00:00 2001
From: belliash <belliash@codingworkshop.eu.org>
Date: Wed, 10 Apr 2019 19:18:39 +0200
Subject: [PATCH] Test strtr() builtin function.

---
 tests/text_normalize.aer | 21 +++++++++++++++++++++
 tests/text_normalize.exp |  1 +
 2 files changed, 22 insertions(+)
 create mode 100644 tests/text_normalize.aer
 create mode 100644 tests/text_normalize.exp

diff --git a/tests/text_normalize.aer b/tests/text_normalize.aer
new file mode 100644
index 0000000..d5918bf
--- /dev/null
+++ b/tests/text_normalize.aer
@@ -0,0 +1,21 @@
+class Program {
+
+	string normalize(string $str) {
+		string[] $table = {
+			'Š'=>'S', 'š'=>'s', 'Đ'=>'Dj', 'đ'=>'dj', 'Ž'=>'Z', 'ž'=>'z', 'Č'=>'C', 'č'=>'c', 'Ć'=>'C', 'ć'=>'c',
+			'À'=>'A', 'Á'=>'A', 'Â'=>'A', 'Ã'=>'A', 'Ä'=>'A', 'Å'=>'A', 'Æ'=>'A', 'Ç'=>'C', 'È'=>'E', 'É'=>'E',
+			'Ê'=>'E', 'Ë'=>'E', 'Ì'=>'I', 'Í'=>'I', 'Î'=>'I', 'Ï'=>'I', 'Ñ'=>'N', 'Ò'=>'O', 'Ó'=>'O', 'Ô'=>'O',
+			'Õ'=>'O', 'Ö'=>'O', 'Ø'=>'O', 'Ù'=>'U', 'Ú'=>'U', 'Û'=>'U', 'Ü'=>'U', 'Ý'=>'Y', 'Þ'=>'B', 'ß'=>'Ss',
+			'à'=>'a', 'á'=>'a', 'â'=>'a', 'ã'=>'a', 'ä'=>'a', 'å'=>'a', 'æ'=>'a', 'ç'=>'c', 'è'=>'e', 'é'=>'e',
+			'ê'=>'e', 'ë'=>'e', 'ì'=>'i', 'í'=>'i', 'î'=>'i', 'ï'=>'i', 'ð'=>'o', 'ñ'=>'n', 'ò'=>'o', 'ó'=>'o',
+			'ô'=>'o', 'õ'=>'o', 'ö'=>'o', 'ø'=>'o', 'ù'=>'u', 'ú'=>'u', 'û'=>'u', 'ý'=>'y', 'ý'=>'y', 'þ'=>'b',
+			'ÿ'=>'y', 'Ŕ'=>'R', 'ŕ'=>'r'
+		};
+		return strtr($str, $table);
+	}
+
+	void main() {
+		var_dump($this->normalize("ÿĆ Welcome ÂëÑ Žöø Ŕ"));
+	}
+
+}
diff --git a/tests/text_normalize.exp b/tests/text_normalize.exp
new file mode 100644
index 0000000..d84bca6
--- /dev/null
+++ b/tests/text_normalize.exp
@@ -0,0 +1 @@
+string(20 'yC Welcome AeN Zoo R')