diff --git a/TestSuite/caseinsensitive.pas b/TestSuite/caseinsensitive.pas
new file mode 100644
index 000000000..eca44ace7
--- /dev/null
+++ b/TestSuite/caseinsensitive.pas
@@ -0,0 +1,17 @@
+uses system, system.Collections.generic;
+type TCLASS = class
+public function tostring: STRING; OVERRIDE;
+begin
+  RESULT := 'ok';
+end;
+END;
+
+BEGIN
+  var lst := new list<integer>;
+  lst.add(2);
+  assert(lst[0]=2);
+  assert(lst.toarray.first=2);
+  lst := new system.collections.generic.list<integer>;
+  var obj := new tclass;
+  assert(obj.Tostring = 'ok');
+END.
\ No newline at end of file