paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 21:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: external tools: increased pip buffer, issue #18492

Browse Source 
git-svn-id: trunk@46322 -
This commit is contained in:
mattias 2014-09-25 10:03:30 +00:00
parent 915c183fdc
commit 804ba9b391
3 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/exttools.pas
View File

@ -1582,6 +1582,7 @@ begin
DebuglnThreadLog(['TExternalToolThread.Execute ',Title,' execute ...']); DebuglnThreadLog(['TExternalToolThread.Execute ',Title,' execute ...']);
{$ENDIF} {$ENDIF}
// now execute // now execute
Tool.Process.PipeBufferSize:=Max(Tool.Process.PipeBufferSize,64*1024);
Tool.Process.Execute; Tool.Process.Execute;
{$IFDEF VerboseExtToolThread} {$IFDEF VerboseExtToolThread}
DebuglnThreadLog(['TExternalToolThread.Execute ',Title,' executing ...']); DebuglnThreadLog(['TExternalToolThread.Execute ',Title,' executing ...']);

5
ide/lazbuild.lpi
View File

@ -73,5 +73,10 @@
<OtherUnitFiles Value="../designer;../packager;../debugger"/> <OtherUnitFiles Value="../designer;../packager;../debugger"/>
<UnitOutputDirectory Value="../units/$(TargetCPU)-$(TargetOS)/$(LCLWidgetType)"/> <UnitOutputDirectory Value="../units/$(TargetCPU)-$(TargetOS)/$(LCLWidgetType)"/>
</SearchPaths> </SearchPaths>
<Other>
<Verbosity>
<ShowAll Value="True"/>
</Verbosity>
</Other>
</CompilerOptions> </CompilerOptions>
</CONFIG> </CONFIG>

4
ide/main.pp
View File

@ -6464,6 +6464,7 @@ var
aCompileHint: String; aCompileHint: String;
OldToolStatus: TIDEToolStatus; OldToolStatus: TIDEToolStatus;
IsComplete: Boolean; IsComplete: Boolean;
StartTime: TDateTime;
begin begin
Result:=SourceFileMgr.PrepareForCompileWithMsg; Result:=SourceFileMgr.PrepareForCompileWithMsg;
if Result<>mrOk then begin if Result<>mrOk then begin
@ -6682,11 +6683,14 @@ begin
exit; exit;
end; end;
StartTime:=Now;
Result:=TheCompiler.Compile(Project1, Result:=TheCompiler.Compile(Project1,
WorkingDir,CompilerFilename,CompilerParams, WorkingDir,CompilerFilename,CompilerParams,
(pbfCleanCompile in Flags) or NeedBuildAllFlag, (pbfCleanCompile in Flags) or NeedBuildAllFlag,
pbfSkipLinking in Flags, pbfSkipLinking in Flags,
pbfSkipAssembler in Flags,aCompileHint); pbfSkipAssembler in Flags,aCompileHint);
if ConsoleVerbosity>=0 then
debugln(['TMainIDE.DoBuildProject compiler time in s: ',(Now-StartTime)*86400]);
if Result<>mrOk then begin if Result<>mrOk then begin
// save state, so that next time the project is not compiled clean // save state, so that next time the project is not compiled clean
Project1.LastCompilerFilename:=CompilerFilename; Project1.LastCompilerFilename:=CompilerFilename;