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

* use the name of the symbol instead of the name of the section as the later is always lowercased

Browse Source 
git-svn-id: trunk@47109 -
This commit is contained in:
svenbarth 2020-10-14 09:11:37 +00:00
parent 5e6ec33a59
commit 7dff106d14
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/aarch64/agcpugas.pas
View File

@ -370,7 +370,7 @@ unit agcpugas;
{ note: we can pass Nil here, because in case of a LLVM { note: we can pass Nil here, because in case of a LLVM
backend this whole code shouldn't be required backend this whole code shouldn't be required
anyway } anyway }
xdatasym:=current_asmdata.DefineAsmSymbol('xdata_'+lastsec.name^,AB_LOCAL,AT_DATA,nil); xdatasym:=current_asmdata.DefineAsmSymbol('xdata_'+lastsym.sym.name,AB_LOCAL,AT_DATA,nil);
tmplist:=tasmlist.create; tmplist:=tasmlist.create;
new_section(tmplist,sec_pdata,lastsec.name^,0); new_section(tmplist,sec_pdata,lastsec.name^,0);