Przeglądaj źródła

* Fix use of defines

git-svn-id: trunk@45453 -
michael 5 lat temu
rodzic
commit
a409f63a55
1 zmienionych plików z 2 dodań i 1 usunięć
  1. 2 1
      utils/fpdoc/mkfpdoc.pp

+ 2 - 1
utils/fpdoc/mkfpdoc.pp

@@ -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