+ test for previous commit

git-svn-id: trunk@40646 -

.gitattributes

@@ -12844,6 +12844,7 @@ tests/test/tasmpublic3.pp svneol=native#text/pascal
 tests/test/tasmread.pp svneol=native#text/plain
 tests/test/tasout.pp svneol=native#text/plain
 tests/test/tassignmentoperator1.pp svneol=native#text/pascal
+tests/test/tb0266.pp svneol=native#text/plain
 tests/test/tblock1.pp svneol=native#text/plain
 tests/test/tblock1a.pp svneol=native#text/plain
 tests/test/tblock1c.pp svneol=native#text/plain

tests/test/tb0266.pp

@@ -0,0 +1,24 @@
+{ %fail }
+
+{$mode objfpc}
+{$interfaces corba}
+
+type
+  tc = class
+   strict private
+    procedure test;
+  end;
+
+  tintf = interface
+    procedure test;
+  end;
+
+  tc2 = class(tc, tintf)
+  end;
+
+procedure tc.test;
+begin
+end;
+
+begin
+end.