Browse Source

* new tests

git-svn-id: trunk@765 -
peter 20 years ago
parent
commit
b9b61c5a00
2 changed files with 22 additions and 0 deletions
  1. 1 0
      .gitattributes
  2. 21 0
      tests/webtbs/tw4233.pp

+ 1 - 0
.gitattributes

@@ -6154,6 +6154,7 @@ tests/webtbs/tw4188.pp svneol=native#text/plain
 tests/webtbs/tw4199.pp svneol=native#text/plain
 tests/webtbs/tw4202.pp svneol=native#text/plain
 tests/webtbs/tw4215.pp svneol=native#text/plain
+tests/webtbs/tw4233.pp svneol=native#text/plain
 tests/webtbs/ub1873.pp svneol=native#text/plain
 tests/webtbs/ub1883.pp svneol=native#text/plain
 tests/webtbs/uw0555.pp svneol=native#text/plain

+ 21 - 0
tests/webtbs/tw4233.pp

@@ -0,0 +1,21 @@
+{ Source provided for Free Pascal Bug Report 4233 }
+{ Submitted by "christian franz" on  2005-07-28 }
+{ e-mail: [email protected] }
+
+{$mode macpas}
+
+type
+  Tslave = object;
+
+  TMaster = object
+     mySlave : Tslave;
+     next : TMaster;
+  end;
+
+  TSlave = object
+     myMaster : TMaster;
+     next : TSlave;
+  end;
+
+begin
+end.