mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-09 04:28:30 +02:00

ptype.pas: * read_named_type: after reading the type we're pointing to we need to make sure that we didn't get a generic dummy symbol; this can happen when parsing a pointer declaration as the type in a constant or variable declaration * resolve_forward_types: when resolving forward types we need to make sure that we weren't given a generic dummy to which no non-generic definition was given (possible in Delphi mode); for non-Delphi modes we can not rely on the generic dummy flag as the typedef of the symbol will the generic def + added test from the bug reports as well as three additional ones to make sure that nothing breaks regarding to forward pointer declarations git-svn-id: trunk@21687 -
19 lines
166 B
ObjectPascal
19 lines
166 B
ObjectPascal
{ %NORUN }
|
|
|
|
program tgeneric82;
|
|
|
|
{$mode delphi}
|
|
|
|
type
|
|
TTest = record
|
|
end;
|
|
TTest<T, S> = record
|
|
end;
|
|
TTest<T> = record
|
|
end;
|
|
PTest = ^TTest;
|
|
|
|
begin
|
|
|
|
end.
|