paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 23:49:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

m68k-amiga: hack to avoid a linker (vlink) warning about merging sections with different flags together. Amiga doesn't support true read only sections anyway

Browse Source 
git-svn-id: trunk@44757 -
This commit is contained in:
Károly Balogh 2020-04-17 23:09:16 +00:00
parent 001057b52e
commit 56ad37133e
2 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/aggas.pas
View File

@ -492,6 +492,10 @@ implementation
writer.AsmWrite('.section '); writer.AsmWrite('.section ');
sectionflags:=true; sectionflags:=true;
sectionprogbits:=true; sectionprogbits:=true;
{ hack, to avoid linker warnings on Amiga/Atari, when vlink merges
rodata sections into data sections, better solution welcomed... }
if atype in [sec_rodata,sec_rodata_norel] then
include(secflags,SF_W);
end; end;
end; end;
system_i386_win32, system_i386_win32,

1
compiler/m68k/ag68kvasm.pas
View File

@ -76,6 +76,7 @@ unit ag68kvasm;
case target_info.system of case target_info.system of
{ stop vlink from complaining when it merges ro sections into rw ones (KB) } { stop vlink from complaining when it merges ro sections into rw ones (KB) }
system_m68k_atari: result:='adrw'; system_m68k_atari: result:='adrw';
system_m68k_amiga: result:='adrw';
else else
result:='adr'; result:='adr';
end; end;