mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 08:18:12 +02:00
70817baf98
+ added tests * tgeneric87.pp and tgeneric88.pp are no longer considered as tests that should fail git-svn-id: trunk@35078 -
17 lines
202 B
ObjectPascal
17 lines
202 B
ObjectPascal
program tgeneric87;
|
|
|
|
{$mode objfpc}
|
|
|
|
type
|
|
generic TTest<T> = record
|
|
|
|
end;
|
|
|
|
const
|
|
TestLongIntNil: ^specialize TTest<LongInt> = Nil;
|
|
TestBooleanNil: ^specialize TTest<Boolean> = Nil;
|
|
|
|
begin
|
|
|
|
end.
|