* new bug

git-svn-id: trunk@11993 -

.gitattributes

@@ -8592,6 +8592,7 @@ tests/webtbs/tw12224.pp svneol=native#text/plain
 tests/webtbs/tw1223.pp svneol=native#text/plain
 tests/webtbs/tw12233.pp svneol=native#text/plain
 tests/webtbs/tw12242.pp svneol=native#text/plain
+tests/webtbs/tw12249.pp svneol=native#text/plain
 tests/webtbs/tw1228.pp svneol=native#text/plain
 tests/webtbs/tw1229.pp svneol=native#text/plain
 tests/webtbs/tw1250.pp svneol=native#text/plain

tests/webtbs/tw12249.pp

@@ -0,0 +1,32 @@
+unit tw12249;
+
+{$mode objfpc}{$H+}
+
+interface
+
+type
+
+  { TG2 }
+
+  generic TG2<T> = class
+  public
+    destructor Destroy; override;
+  end;
+
+implementation
+
+{ TG2 }
+
+destructor TG2.Destroy;
+begin
+  inherited Destroy;
+end;
+
+procedure P;
+type 
+  T = specialize TG2<Integer>;
+begin
+end;
+
+end.
+