:white_check_mark: Add tests

diff --git a/tests/match/assign.gw b/tests/match/assign.gw
new file mode 100644 (file)
index 0000000..fb9915f
--- /dev/null
+++ b/tests/match/assign.gw
@@ -0,0 +1,4 @@
+#! [contains] ok
+match "ok" {
+  case v: <<< v >>>;
+}

diff --git a/tests/match/litteral.gw b/tests/match/litteral.gw
new file mode 100644 (file)
index 0000000..559b0b8
--- /dev/null
+++ b/tests/match/litteral.gw
@@ -0,0 +1,6 @@
+#! [contains] ok
+
+match 1 {
+  case 1: <<< "ok" >>>;
+  case 2: <<< "not ok" >>>;
+}

diff --git a/tests/match/litteral_when.gw b/tests/match/litteral_when.gw
new file mode 100644 (file)
index 0000000..0c58221
--- /dev/null
+++ b/tests/match/litteral_when.gw
@@ -0,0 +1,6 @@
+#! [contains] ok
+
+match 1 {
+  case 1 when 1 : <<< "ok" >>>;
+  case 1: <<< "ok" >>>;
+}

diff --git a/tests/match/litteral_when_fail.gw b/tests/match/litteral_when_fail.gw
new file mode 100644 (file)
index 0000000..d86c2f0
--- /dev/null
+++ b/tests/match/litteral_when_fail.gw
@@ -0,0 +1,6 @@
+#! [contains] ok
+
+match 1 {
+  case 1 when 0 : <<< "not ok" >>>;
+  case 1: <<< "ok" >>>;
+}

diff --git a/tests/match/too_many.gw b/tests/match/too_many.gw
new file mode 100644 (file)
index 0000000..67e905c
--- /dev/null
+++ b/tests/match/too_many.gw
@@ -0,0 +1,4 @@
+#! [contains] too many expression to match
+match 1 {
+  case a,b: <<< "WHAT?" >>>;
+}

diff --git a/tests/match/tuple.c b/tests/match/tuple.c
new file mode 100644 (file)
index 0000000..90dbff2
--- /dev/null
+++ b/tests/match/tuple.c
@@ -0,0 +1,12 @@
+class C {
+  string name;
+  int age;
+}
+
+C charles;
+"charles" => charles.name;
+21 => charles.age;
+
+match charles {
+  case >(name, age): <<< name , " is ", age, " years old." >>>;
+}