1 files changed, 9 insertions, 0 deletions
diff --git a/tests/junit/plugins/uml/alf/org.eclipse.papyrus.uml.alf.tests/tests/AssertList.alf b/tests/junit/plugins/uml/alf/org.eclipse.papyrus.uml.alf.tests/tests/AssertList.alf
new file mode 100644
index 00000000000..5a67aef9cff
--- /dev/null
+++ b/tests/junit/plugins/uml/alf/org.eclipse.papyrus.uml.alf.tests/tests/AssertList.alf
@@ -0,0 +1,9 @@
+package AssertList {
+  public activity AssertEqual(in label: String, in value1: any, in value2: any);
+  public activity AssertList(in label: String, in list: any[*] sequence, in expected: any[*] sequence) {
+      AssertEqual(label + "->size()", list->size(), expected->size());
+      for (i in 1..IntegerFunctions::Min(list->size(),expected->size())) {
+          AssertEqual(label + "[" + IntegerFunctions::ToString(i) + "]", list[i], expected[i]);
+      }
+  }
+}
+\ No newline at end of file