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

IDE: Remove "Note: passing compiler option -M twice with different values" message, many -M options are allowed.

Browse Source
This commit is contained in:
Juha 2023-06-22 01:47:59 +03:00
parent c691b5efb3
commit 6da992966d
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
packager/packagesystem.pas
View File

@ -713,8 +713,10 @@ begin
Param:=TFPCParamValue(ParsedParams[i]);
if fpfValueChanged in Param.Flags then begin
Msg:='';
if Param.Kind in [fpkBoolean,fpkValue] then
Msg:=Format(lisPassingCompilerOptionTwiceWithDifferentValues, [Param.Name])
if Param.Kind in [fpkBoolean,fpkValue] then begin
if Param.Name<>'M' then // Many -M options are allowed.
Msg:=Format(lisPassingCompilerOptionTwiceWithDifferentValues, [Param.Name]);
end
else if Param.Kind=fpkDefine then
Msg:=Format(lisPassingCompilerDefineTwiceWithDifferentValues, [Param.Name]);
if Msg='' then continue;