paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-02-19 19:36:26 +01:00
Code Issues Packages Projects Releases Wiki Activity

Skip note "variable has align directive larger than system maximum alignment" for systems with maxalignvar=1

Browse Source
This commit is contained in:
ccrause 2026-01-05 11:44:25 +02:00
parent 5a2a7deffb
commit d131af1572
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/ngenutil.pas
View File

@ -985,7 +985,7 @@ implementation
Message1(scanner_w_alignment_larger_than_max,sym.name);
varalign:=explicitalign;
end
else if (wantedalign>varalign) then
else if (wantedalign>varalign) and (target_info.alignment.varalignmax>1) then
begin
{ varalign:=wantedalign; this can lead to
troubles on systems like for instance

2
compiler/tgobj.pas
View File

@ -766,7 +766,7 @@ implementation
else
CGMessage1(scanner_w_local_alignment_larger_than_max,def.typename);
end
else if (alignment>lalign) then
else if (alignment>lalign) and (current_settings.alignment.localalignmax>1) then
begin
if assigned(sym) then
CGMessage1(scanner_n_local_alignment_larger_than_max,sym.name)