Added further tests regarding the topic from revision 21687

git-svn-id: trunk@21688 -

.gitattributes

@@ -10723,6 +10723,10 @@ tests/test/tgeneric8.pp svneol=native#text/plain
 tests/test/tgeneric80.pp svneol=native#text/pascal
 tests/test/tgeneric81.pp svneol=native#text/pascal
 tests/test/tgeneric82.pp svneol=native#text/pascal
+tests/test/tgeneric83.pp svneol=native#text/pascal
+tests/test/tgeneric84.pp svneol=native#text/pascal
+tests/test/tgeneric85.pp svneol=native#text/pascal
+tests/test/tgeneric86.pp svneol=native#text/pascal
 tests/test/tgeneric9.pp svneol=native#text/plain
 tests/test/tgoto.pp svneol=native#text/plain
 tests/test/theap.pp svneol=native#text/plain

tests/test/tgeneric83.pp

@@ -0,0 +1,16 @@
+{ %FAIL }
+
+program tgeneric83;
+
+{$mode delphi}
+
+type
+  TTest<T> = record
+  end;
+
+const
+  Test: ^TTest = Nil;
+
+begin
+
+end.

tests/test/tgeneric84.pp

@@ -0,0 +1,14 @@
+{ %FAIL }
+
+program tgeneric84;
+
+{$mode objfpc}
+
+type
+  generic TTest<T> = record
+  end;
+
+  PTest = ^TTest;
+
+begin
+end.

tests/test/tgeneric85.pp

@@ -0,0 +1,16 @@
+{ %FAIL }
+
+program tgeneric85;
+
+{$mode objfpc}
+
+type
+  generic TTest<T> = record
+  end;
+
+const
+  Test: ^TTest = Nil;
+
+begin
+
+end.

tests/test/tgeneric86.pp

@@ -0,0 +1,17 @@
+{ %NORUN }
+
+program tgeneric86;
+
+{$mode objfpc}{$H+}
+{$modeswitch advancedrecords}
+
+type
+  generic TTest<T> = record
+  type
+    PTest = ^TTest;
+  end;
+
+begin
+
+end.
+