paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 16:49:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

fpdoc: fixed compile

Browse Source 
git-svn-id: trunk@41084 -
This commit is contained in:
Mattias Gaertner 2019-01-27 10:41:12 +00:00
parent fcb2145255
commit c99972bc43
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
utils/fpdoc/dw_html.pp
View File

@ -3347,10 +3347,10 @@ var
TDEl := CreateTD(TREl); TDEl := CreateTD(TREl);
CodeEl := CreateCode(CreatePara(TDEl)); CodeEl := CreateCode(CreatePara(TDEl));
AppendKw(CodeEl, 'type'); AppendKw(CodeEl, 'type');
if AClass.ObjKind=okGeneric then if AClass.GenericTemplateTypes.Count>0 then
AppendKw(CodeEl, ' generic '); AppendKw(CodeEl, ' generic ');
AppendText(CodeEl, ' ' + UTF8Decode(AClass.Name) + ' '); AppendText(CodeEl, ' ' + UTF8Decode(AClass.Name) + ' ');
if AClass.ObjKind=okGeneric then if AClass.GenericTemplateTypes.Count>0 then
AppendGenericTypes(CodeEl,AClass.GenericTemplateTypes,false); AppendGenericTypes(CodeEl,AClass.GenericTemplateTypes,false);
AppendSym(CodeEl, '='); AppendSym(CodeEl, '=');
AppendText(CodeEl, ' '); AppendText(CodeEl, ' ');