mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-18 13:31:28 +02:00
17 lines
264 B
ObjectPascal
17 lines
264 B
ObjectPascal
program thintdir1;
|
|
|
|
// test the possibility to use the hint modifiers as regular identifiers
|
|
|
|
{$mode delphi}
|
|
|
|
type
|
|
deprecated = integer;
|
|
const
|
|
unimplemented = 1;
|
|
platform = 2;
|
|
var
|
|
experimental: deprecated = unimplemented;
|
|
|
|
begin
|
|
end.
|