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

IDE: pass compiler options -T and -P if set, even if they are the same as the IDE default

Browse Source 
git-svn-id: trunk@34561 -
This commit is contained in:
mattias 2012-01-03 16:27:40 +00:00
parent c90655c252
commit 4838f5a1bc
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/compileroptions.pp
View File

@ -2647,11 +2647,13 @@ begin
begin
{ Target OS }
CurTargetOS:=GetFPCTargetOS(Vars.Values['TargetOS']);
if (CurTargetOS<>'') and (CurTargetOS<>GetDefaultTargetOS) then
if (CurTargetOS<>'')
and ((TargetOS<>'') or (CurTargetOS<>GetDefaultTargetOS)) then
switches := switches + ' -T' + CurTargetOS;
{ Target CPU }
CurTargetCPU:=GetFPCTargetCPU(Vars.Values['TargetCPU']);
if (CurTargetCPU<>'') and (CurTargetCPU<>GetDefaultTargetCPU) then
if (CurTargetCPU<>'')
and ((TargetCPU<>'') or (CurTargetCPU<>GetDefaultTargetCPU)) then
switches := switches + ' -P' + CurTargetCPU;
end;
end;