mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-19 00:19:24 +02:00
* def.fullownerhierarchyname() already ends in a '.', so don't append another
one git-svn-id: trunk@32783 -
This commit is contained in:
parent
4643913d58
commit
015a864db1
@ -129,7 +129,7 @@ implementation
|
||||
begin
|
||||
if not assigned(def.typesym) then
|
||||
internalerror(2015041901);
|
||||
result:='%"typ.'+def.fullownerhierarchyname+'.'+def.typesym.realname+'"'
|
||||
result:='%"typ.'+def.fullownerhierarchyname+def.typesym.realname+'"'
|
||||
end;
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user