paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-05 04:39:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix use of defines

Browse Source 
git-svn-id: trunk@45453 -
This commit is contained in:
michael 2020-05-21 08:59:56 +00:00
parent 56632b720c
commit a409f63a55
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
utils/fpdoc/mkfpdoc.pp
View File

@ -229,6 +229,7 @@ begin
Finally
Free;
end;
Writeln('Content file : ',APackage.ContentFile);
if Length(APackage.ContentFile) > 0 then
Engine.WriteContentFile(APackage.ContentFile);
end;
@ -274,7 +275,7 @@ begin
if FProcessedUnits.IndexOf(Cmd)=-1 then
begin
FProcessedUnits.Add(Cmd);
ParseSource(Engine,Cmd+' '+Arg, Options.OSTarget, Options.CPUTarget,[poUseStreams,poSkipDefaultDefs]);
ParseSource(Engine,Cmd+' '+Arg, Options.OSTarget, Options.CPUTarget,[poUseStreams]);
end;
except
on E: EParserError do