mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-12 14:49:33 +02:00
43 lines
477 B
ObjectPascal
43 lines
477 B
ObjectPascal
{ %version=1.1 }
|
|
|
|
{$mode delphi}
|
|
|
|
type
|
|
t1 = record
|
|
end platform;
|
|
|
|
t2 = class
|
|
end platform;
|
|
|
|
t3 = object
|
|
end platform;
|
|
|
|
t4 = record
|
|
w1 : word deprecated;
|
|
w2 : word deprecated
|
|
end;
|
|
|
|
t5 = record
|
|
w1 : word deprecated;
|
|
end;
|
|
|
|
const
|
|
c1 : word = 2;
|
|
c2 = 21312 platform;
|
|
|
|
var
|
|
v1 : word deprecated library;
|
|
l1,
|
|
l2 : word deprecated;
|
|
|
|
procedure p1;platform deprecated;library;
|
|
begin
|
|
end;
|
|
|
|
procedure p2;platform;deprecated;
|
|
begin
|
|
end;
|
|
|
|
begin
|
|
end.
|