2
0
Эх сурвалжийг харах

* Merging revisions r45453 from trunk:
------------------------------------------------------------------------
r45453 | michael | 2020-05-21 10:59:56 +0200 (Thu, 21 May 2020) | 1 line

* Fix use of defines
------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@46600 -

michael 5 жил өмнө
parent
commit
abacb28408

+ 2 - 1
utils/fpdoc/mkfpdoc.pp

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