paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-01-04 06:30:38 +01:00
Code Issues Packages Projects Releases Wiki Activity

* manual fixes to get .weak support in fixes

Browse Source
This commit is contained in:
florian 2022-04-18 23:00:40 +02:00
parent 0afa5dc4aa
commit be560dadf8
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/aasmbase.pas
View File

@ -45,7 +45,8 @@ interface
AB_TEMP,
{ a global symbol that points to another global symbol and is only used
to allow indirect loading in case of packages and indirect imports }
AB_INDIRECT,AB_EXTERNAL_INDIRECT);
AB_INDIRECT,AB_EXTERNAL_INDIRECT,
AB_WEAK);
TAsmsymtype=(
AT_NONE,AT_FUNCTION,AT_DATA,AT_SECTION,AT_LABEL,
@ -80,7 +81,7 @@ interface
asmlabeltypeprefix : array[TAsmLabeltype] of char = ('j','a','d','l','f','t','c');
asmsymbindname : array[TAsmsymbind] of string[23] = ('none', 'external','common',
'local','global','weak external','private external','lazy','import','internal temp',
'indirect','external indirect');
'indirect','external indirect','weak');
asmsymbindindirect = [AB_INDIRECT,AB_EXTERNAL_INDIRECT];
type