summaryrefslogtreecommitdiff
path: root/fpcsrc/tests/webtbf/tw18620.pp
blob: 4ac26ccaa48a413bc307da8caa65d29c53b6450b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
{ %fail }
program tw18620;
{$mode delphi}

type
  { in mode delphi compiler should not create a forward definistion for ^_TFoo for later resolve
    instead it must search _TFoo amoung already defined symbols }
  TFoo = record
    Foo: ^_TFoo;
  end;
  _TFoo = TFoo;

begin
end.