mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-15 01:49:20 +02:00
* use tdef.unique_id_str to generate the unique internal name for anonymous record defs as using the count of the deflist is no longer correct
git-svn-id: trunk@43616 -
This commit is contained in:
parent
d8c81744d3
commit
06c1a17d13
@ -4801,7 +4801,7 @@ implementation
|
||||
pname:=@n
|
||||
else
|
||||
begin
|
||||
name:='$InternalRec'+tostr(current_module.deflist.count);
|
||||
name:='$InternalRec'+unique_id_str;
|
||||
pname:=@name;
|
||||
end;
|
||||
oldsymtablestack:=symtablestack;
|
||||
|
Loading…
Reference in New Issue
Block a user