paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-29 16:49:56 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: pass the -WG parameter only for windows, OS2 and darwin

Browse Source 
git-svn-id: trunk@31125 -
This commit is contained in:
mattias 2011-06-07 18:24:11 +00:00
parent bca9900c3f
commit e08c976b88
1 changed files with 15 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
ide/compileroptions.pp
View File

@ -2217,6 +2217,9 @@ var
OptimizeSwitches: String;
Vars: TCTCfgScriptVariables;
v: string;
CurTargetOS: String;
CurTargetCPU: String;
CurSrcOS: String;
begin
CurMainSrcFile:=MainSourceFileName;
if CurMainSrcFile='' then
@ -2508,21 +2511,24 @@ begin
if TargetProcessor<>'' then
Switches:=Switches+' -Op'+UpperCase(TargetProcessor);
CurTargetOS:='';
CurTargetCPU:='';
if not (ccloNoMacroParams in Flags) then
begin
Vars:=GetBuildMacroValues(Self,true);
if Vars<>nil then
begin
{ Target OS }
v:=GetFPCTargetOS(Vars.Values['TargetOS']);
if (v<>'') and (v<>GetDefaultTargetOS) then
switches := switches + ' -T' + v;
CurTargetOS:=GetFPCTargetOS(Vars.Values['TargetOS']);
if (CurTargetOS<>'') and (CurTargetOS<>GetDefaultTargetOS) then
switches := switches + ' -T' + CurTargetOS;
{ Target CPU }
v:=GetFPCTargetCPU(Vars.Values['TargetCPU']);
if (v<>'') and (v<>GetDefaultTargetCPU) then
switches := switches + ' -P' + v;
CurTargetCPU:=GetFPCTargetCPU(Vars.Values['TargetCPU']);
if (CurTargetCPU<>'') and (CurTargetCPU<>GetDefaultTargetCPU) then
switches := switches + ' -P' + CurTargetCPU;
end;
end;
CurSrcOS:=GetDefaultSrcOSForTargetOS(CurTargetOS);
{ --------------- Linking Tab ------------------- }
@ -2586,8 +2592,9 @@ begin
if InhLinkerOpts<>'' then
switches := switches + ' ' + ConvertOptionsToCmdLine(' ','-k', InhLinkerOpts);
end;
if Win32GraphicApp then
if Win32GraphicApp
and ((CurSrcOS='win') or (CurTargetOS='darwin') or (CurTargetOS='os2')) then
switches := switches + ' -WG';
{ ---------------- Other Tab -------------------- }