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

* updated ppudump with the new asm symbol types and binding types

Browse Source
This commit is contained in:
Nikolay Nikolov 2021-09-28 03:01:09 +03:00
parent cdf1ceca76
commit 21fd8cd5d3
1 changed files with 14 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
compiler/utils/ppuutils/ppudump.pp
View File

@ -1188,7 +1188,8 @@ type
AB_TEMP, AB_TEMP,
{ a global symbol that points to another global symbol and is only used { a global symbol that points to another global symbol and is only used
to allow indirect loading in case of packages and indirect imports } to allow indirect loading in case of packages and indirect imports }
AB_INDIRECT,AB_EXTERNAL_INDIRECT); AB_INDIRECT,AB_EXTERNAL_INDIRECT,
AB_WEAK);
TAsmsymtype=( TAsmsymtype=(
AT_NONE,AT_FUNCTION,AT_DATA,AT_SECTION,AT_LABEL, AT_NONE,AT_FUNCTION,AT_DATA,AT_SECTION,AT_LABEL,
@ -1211,7 +1212,12 @@ type
{ Thread-local symbol (ELF targets) } { Thread-local symbol (ELF targets) }
AT_TLS, AT_TLS,
{ GNU indirect function (ELF targets) } { GNU indirect function (ELF targets) }
AT_GNU_IFUNC AT_GNU_IFUNC,
{ WebAssembly global variable }
AT_WASM_GLOBAL,
{ WebAssembly exception tag (used as a parameter for the 'throw' and
'catch' instructions) }
AT_WASM_EXCEPTION_TAG
); );
var var
@ -1257,6 +1263,8 @@ begin
bindstr:='Indirect'; bindstr:='Indirect';
AB_EXTERNAL_INDIRECT : AB_EXTERNAL_INDIRECT :
bindstr:='Indirect external'; bindstr:='Indirect external';
AB_WEAK:
bindstr:='Weak';
else else
begin begin
bindstr:='<Error !!>'; bindstr:='<Error !!>';
@ -1286,6 +1294,10 @@ begin
typestr:='TLS'; typestr:='TLS';
AT_GNU_IFUNC : AT_GNU_IFUNC :
typestr:='GNU IFUNC'; typestr:='GNU IFUNC';
AT_WASM_GLOBAL:
typestr:='WebAssembly global variable';
AT_WASM_EXCEPTION_TAG:
typestr:='WebAssembly exception tag';
else else
begin begin
typestr:='<Error !!>'; typestr:='<Error !!>';