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

+ add threadvar symbols to the symbol table

Browse Source
This commit is contained in:
Nikolay Nikolov 2021-09-26 09:40:28 +03:00
parent 92fb1d2564
commit 392ca81c20
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/ogwasm.pas
View File

@ -1203,7 +1203,7 @@ implementation
end; end;
WriteName(FWasmSymbolTable,objsym.Name); WriteName(FWasmSymbolTable,objsym.Name);
end end
else if (objsym.typ=AT_DATA) or ((objsym.typ=AT_NONE) and (objsym.bind=AB_EXTERNAL)) then else if (objsym.typ in [AT_DATA,AT_TLS]) or ((objsym.typ=AT_NONE) and (objsym.bind=AB_EXTERNAL)) then
begin begin
objsym.SymbolIndex:=FWasmSymbolTableEntriesCount; objsym.SymbolIndex:=FWasmSymbolTableEntriesCount;
Inc(FWasmSymbolTableEntriesCount); Inc(FWasmSymbolTableEntriesCount);