mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 16:47:53 +02:00
d07b49270f
pgenutil.pas: * parse_generic_specialization_types_internal: ignore the parasymtable of procvars (as before the addition of generic routines) and instead use the type's hierarchy name * generate_specialization_phase2: specialize types of procvars into the parameter symtable as they don't have a local one + added test git-svn-id: trunk@33544 -
16 lines
169 B
ObjectPascal
16 lines
169 B
ObjectPascal
{ %NORUN }
|
|
|
|
program tw30030;
|
|
|
|
{$mode delphi}
|
|
|
|
type
|
|
TAcl<K, R, M> = Class
|
|
End;
|
|
|
|
TAssertion<K, R, M> = Function(Acl: TAcl<K, R, M>): Boolean Of Object;
|
|
|
|
begin
|
|
|
|
end.
|