paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-22 07:09:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Corrected r46481. Use both tcalo_new_section and tcalo_make_dead_strippable flags since only the default implementation implies a new section creation when tcalo_make_dead_strippable is specified.

Browse Source 
git-svn-id: trunk@46482 -
This commit is contained in:
yury 2020-08-18 12:27:46 +00:00
parent 17e75004c5
commit 9e11f8122f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/aasmcnst.pas
View File

@ -1046,7 +1046,7 @@ implementation
indsecname:=secname
else
indsecname:=lower(symind.name);
indtcb:=ctai_typedconstbuilder.create([tcalo_make_dead_strippable]);
indtcb:=ctai_typedconstbuilder.create([tcalo_new_section,tcalo_make_dead_strippable]);
indtcb.emit_tai(tai_const.create_sym_offset(sym,0),ptrdef);
current_asmdata.asmlists[al_indirectglobals].concatlist(indtcb.get_final_asmlist(
symind,