paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 05:29:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

Mark .noinit section with nobits flag.

Browse Source
This commit is contained in:
ccrause 2022-08-14 19:49:26 +02:00 committed by FPK
parent f532cf1698
commit a135940cf5
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/aasmtai.pas
View File

@ -1339,6 +1339,9 @@ implementation
TObjData.sectiontype2progbitsandflags(sectype,secprogbits,secflags); TObjData.sectiontype2progbitsandflags(sectype,secprogbits,secflags);
name:=stringdup(Aname); name:=stringdup(Aname);
sec:=nil; sec:=nil;
// .noinit section should be marked with the nobits flag
if (sectype=sec_user) and (Aname='.noinit') then
secprogbits:=SPB_NOBITS;
end; end;
constructor tai_section.Create_proc(Asectype:TAsmSectiontype; constructor tai_section.Create_proc(Asectype:TAsmSectiontype;