paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-14 21:49:06 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Some small improvements from Andrey Sobol: better specialization declaration in markdown, write more detailed end log

Browse Source 
git-svn-id: trunk@48489 -
(cherry picked from commit f128e64ccb)
This commit is contained in:
michael 2021-02-01 13:15:05 +00:00 committed by Florian Klämpfl
parent 9d8955d25c
commit 91e62e553a
2 changed files with 13 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
utils/fpdoc/dw_markdown.pp
View File

@ -1473,6 +1473,13 @@ begin
if aEL.ExternalName<>'' then if aEL.ExternalName<>'' then
aLine:=aLine+' external name '''+ael.ExternalName+''''; aLine:=aLine+' external name '''+ael.ExternalName+'''';
if Assigned(aEL.AncestorType) then if Assigned(aEL.AncestorType) then
if (aEL.AncestorType is TPasSpecializeType) then
begin
aLine:=aLine+'(specialize ';
aLine:=aLine+ TPasSpecializeType(aEL.AncestorType).DestType.Name;
aLine:=aLine+ '<,>)';
end
else
begin begin
aLine:=aLine+' ('+ael.AncestorType.Name; aLine:=aLine+' ('+ael.AncestorType.Name;
if Assigned(ael.Interfaces) and (aEl.Interfaces.Count>0) then if Assigned(ael.Interfaces) and (aEl.Interfaces.Count>0) then

2
utils/fpdoc/dwriter.pp
View File

@ -1621,7 +1621,7 @@ end;
procedure TFPDocWriter.OutputResults(); procedure TFPDocWriter.OutputResults();
begin begin
DoLog('Documentation process finished.'); DoLog('Package: %s - Documentation process finished.', [FPackage.Name]);
end; end;
function TFPDocWriter.ConvertExtShort(AContext: TPasElement; function TFPDocWriter.ConvertExtShort(AContext: TPasElement;