mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: Capability to override the lazbuild path

Browse source
This commit is contained in:
Alexander Koblov 2019-06-29 10:51:41 +00:00
commit 0e61e8e8ed
1 changed files with 8 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

21
fpmake.pp
View file

@ -58,10 +58,6 @@ const
'tools\extractdwrflnfo'
);
var
FLazBuild: String = 'lazbuild';
type
{ TDCDefaults }
@ -120,6 +116,7 @@ begin
AValue:= GetEnvironmentVariable('LCL_PLATFORM');
if Length(AValue) > 0 then (Defaults as TDCDefaults).FWS:= AValue;
inherited CompilerDefaults;
Compiler:= 'lazbuild';
end;
procedure TDCInstaller.BuildComponents;
@ -130,7 +127,7 @@ begin
for I:= Low(CommonComponents) to High(CommonComponents) do
begin
Args:= SetDirSeparators(CommonComponents[I]) + FLazBuildParams;
BuildEngine.ExecuteCommand(FLazBuild, Args);
BuildEngine.ExecuteCommand(Defaults.Compiler, Args);
end;
end;
@ -197,18 +194,18 @@ var
I: Integer;
begin
for I:= Low(CommonPlugins) to High(CommonPlugins) do
BuildEngine.ExecuteCommand(FLazBuild, SetDirSeparators(CommonPlugins[I]) + FLazBuildParams);
BuildEngine.ExecuteCommand(Defaults.Compiler, SetDirSeparators(CommonPlugins[I]) + FLazBuildParams);
if Defaults.OS in AllMyUnixOSes then
begin
for I:= Low(UnixPlugins) to High(UnixPlugins) do
BuildEngine.ExecuteCommand(FLazBuild, SetDirSeparators(UnixPlugins[I]) + FLazBuildParams);
BuildEngine.ExecuteCommand(Defaults.Compiler, SetDirSeparators(UnixPlugins[I]) + FLazBuildParams);
end;
if Defaults.OS in AllWindowsOSes then
begin
for I:= Low(WindowsPlugins) to High(WindowsPlugins) do
BuildEngine.ExecuteCommand(FLazBuild, SetDirSeparators(WindowsPlugins[I]) + FLazBuildParams);
BuildEngine.ExecuteCommand(Defaults.Compiler, SetDirSeparators(WindowsPlugins[I]) + FLazBuildParams);
end;
end;
@ -249,11 +246,11 @@ begin
if Pos('--bm=', FLazBuildParams) = 0 then
FLazBuildParams+= ' --bm=beta';
// Build Double Commander
BuildEngine.ExecuteCommand(FLazBuild, SetDirSeparators('src/doublecmd.lpi') + FLazBuildParams);
BuildEngine.ExecuteCommand(Defaults.Compiler, SetDirSeparators('src/doublecmd.lpi') + FLazBuildParams);
if Pos('--bm=beta', FLazBuildParams) > 0 then
begin
// Build Dwarf LineInfo Extractor
BuildEngine.ExecuteCommand(FLazBuild, SetDirSeparators('tools/extractdwrflnfo.lpi'));
BuildEngine.ExecuteCommand(Defaults.Compiler, SetDirSeparators('tools/extractdwrflnfo.lpi'));
// Extract debug line info
if Defaults.OS = Darwin then
begin
@ -288,8 +285,6 @@ end;
var
I: Integer;
var
OptArg: String;
BuildTarget: String;
begin
@ -333,7 +328,7 @@ begin
if (Pos('--ws', FLazBuildParams) = 0) and (Length((Defaults as TDCDefaults).WS) > 0) then
FLazBuildParams+= ' --ws=' + (Defaults as TDCDefaults).WS;
WriteLn(FLazBuildParams);
WriteLn(Defaults.Compiler + ' ' + FLazBuildParams);
if BuildTarget = 'components' then
BuildComponents