+ add some tests for hint directives in context of arrays (both with the element and the index) that check that the hint is indeed generated

tests/test/thintdir3a.pp

@@ -0,0 +1,17 @@
+{ %FAIL }
+
+program thintdir3a;
+
+{$mode objfpc}
+{$warn 5043 error}
+
+type
+  TTest = 1..9 deprecated;
+
+  TRec = record
+    f: array of TTest;
+  end;
+
+begin
+
+end.

tests/test/thintdir3b.pp

@@ -0,0 +1,17 @@
+{ %FAIL }
+
+program thintdir3b;
+
+{$mode objfpc}
+{$warn 5043 error}
+
+type
+  TTest = 1..9 deprecated;
+
+  TRec = record
+    f: array of array of TTest;
+  end;
+
+begin
+
+end.

tests/test/thintdir4a.pp

@@ -0,0 +1,15 @@
+{ %FAIL }
+
+program thintdir4a;
+
+{$mode objfpc}
+{$warn 5043 error}
+
+type
+  TTest = 1..9 deprecated;
+
+  TTestArray = array of TTest;
+
+begin
+
+end.

tests/test/thintdir4b.pp

@@ -0,0 +1,15 @@
+{ %FAIL }
+
+program thintdir4b;
+
+{$mode objfpc}
+{$warn 5043 error}
+
+type
+  TTest = 1..9 deprecated;
+
+  TTestArray = array of array of TTest;
+
+begin
+
+end.

tests/test/thintdir5.pp

@@ -0,0 +1,15 @@
+{ %FAIL }
+
+program thintdir4a;
+
+{$mode objfpc}
+{$warn 5043 error}
+
+type
+  TTest = 1..9 deprecated;
+
+  TTestArray = array[TTest] of LongInt;
+
+begin
+
+end.