summaryrefslogtreecommitdiff
path: root/fpcsrc/tests/webtbs/tw9233.pp
blob: 02ddd2d8174640d9a718a125bb62d2ff4ad309dc (plain)
1
2
3
4
5
6
7
8
9
{ %norun }
program ChainBugTest;

var
  v: Variant;

begin
  v.GetOtherVariant.SomeProc;
end.