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

.rodata* sections must end up in .data section on go32v2, since the go32v2 stub

Browse Source 
only handles .text, .data and .bss sections.
Solves bug #11509.

git-svn-id: trunk@11257 -
This commit is contained in:
giulio 2008-06-21 14:06:12 +00:00
parent f8790b4e14
commit 272673bfe1
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/aggas.pas
View File

@ -317,6 +317,10 @@ implementation
(target_info.system=system_i386_win32) then
secname:='.tls';
if (atype in [sec_rodata,sec_rodata_norel]) and
(target_info.system=system_i386_go32v2) then
secname:='.data';
{ For bss we need to set some flags that are target dependent,
it is easier to disable it for smartlinking. It doesn't take up
filespace }