* small extension of the test for completeness sake

git-svn-id: trunk@38369 -

tests/test/tarray12.pp

@@ -107,6 +107,12 @@ begin
   PrintArray(t);
   CheckArray(t, [1, 3, 5]);
 
+  t := Nil;
+  t2 := Nil;
+  Insert(t2, t, 0);
+  PrintArray(t);
+  CheckArray(t, []);
+
   t := Nil;
   Insert([], t, 0);
   PrintArray(t);