summaryrefslogtreecommitdiff
path: root/fpcsrc/tests/tbs/tb0552.pp
blob: 426decd86e0cd99a57474066f8f2263e45ee6103 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
{$ifdef FPC}
  {$mode objfpc}
{$endif FPC}
type
  pb1 = ^boolean;far;
  pb2 = ^boolean deprecated;far;
  pt = boolean deprecated;
  o = class
  end deprecated;
  r = record
  end deprecated;
  p1 = procedure;stdcall;deprecated;
  p2 = procedure deprecated;
  p3 = p1 deprecated;


var
  v : p3;
begin
end.