mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 06:08:22 +02:00
21 lines
306 B
ObjectPascal
21 lines
306 B
ObjectPascal
{$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.
|