瀏覽代碼

+ additional test

git-svn-id: trunk@16478 -
florian 15 年之前
父節點
當前提交
d99081fa47
共有 2 個文件被更改,包括 14 次插入0 次删除
  1. 1 0
      .gitattributes
  2. 13 0
      tests/webtbs/tw17957.pp

+ 1 - 0
.gitattributes

@@ -10765,6 +10765,7 @@ tests/webtbs/tw17945.pp svneol=native#text/pascal
 tests/webtbs/tw17950.pp svneol=native#text/pascal
 tests/webtbs/tw17952a.pp svneol=native#text/pascal
 tests/webtbs/tw17952b.pp svneol=native#text/pascal
+tests/webtbs/tw17957.pp svneol=native#text/pascal
 tests/webtbs/tw1798.pp svneol=native#text/plain
 tests/webtbs/tw17986.pp svneol=native#text/pascal
 tests/webtbs/tw17998.pp svneol=native#text/plain

+ 13 - 0
tests/webtbs/tw17957.pp

@@ -0,0 +1,13 @@
+{$mode objfpc}
+uses fgl;
+
+type
+  TFoo1 = class(TObject);
+
+  TFoo2 = class
+    type
+      TFooList = specialize TFPGList<TFoo1>;
+  end;
+
+begin
+end.