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

+ generate proper reference to the TLS_BASE_SYM global in the WebAssembly debug info for threadvars

Browse Source
This commit is contained in:
Nikolay Nikolov 2024-09-11 00:12:53 +03:00
parent 9799c6a5ec
commit 60965cdb69
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/dbgdwarf.pas
View File

@ -2389,8 +2389,7 @@ implementation
begin
templist.concat(tai_const.create_8bit(ord(DW_OP_WASM_location)));
templist.concat(tai_const.create_8bit(3)); { wasm global }
templist.concat(tai_const.create_32bit(0));
//templist.concat(tai_const.Create_type_name(aitconst_ptr_unaligned,TLS_BASE_SYM,AT_WASM_GLOBAL,0));
templist.concat(tai_const.Create_type_name(aitconst_ptr_unaligned,TLS_BASE_SYM,AT_WASM_GLOBAL,0));
templist.concat(tai_const.create_8bit(ord(DW_OP_addr)));
templist.concat(tai_const.Create_type_name(aitconst_ptr_unaligned,sym.mangledname,0));
templist.concat(tai_const.create_8bit(ord(DW_OP_plus)));