mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-31 02:11:30 +01:00
8c95ea039f
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 tgeneric81;
|
|
|
|
{$mode delphi}
|
|
|
|
type
|
|
PTest = ^TTest;
|
|
TTest<T, S> = record
|
|
end;
|
|
TTest<T> = record
|
|
end;
|
|
TTest = record
|
|
end;
|
|
|
|
begin
|
|
|
|
end.
|