blob: d958713471547a221070cf01ee847f44de84c134 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
{ Source provided for Free Pascal Bug Report 4233 }
{ Submitted by "christian franz" on 2005-07-28 }
{ e-mail: cfranz@access.ch }
{$mode macpas}
type
Tslave = object;
TMaster = object
mySlave : Tslave;
next : TMaster;
end;
TSlave = object
myMaster : TMaster;
next : TSlave;
end;
begin
end.
|
