|
@@ -45,7 +45,8 @@ interface
|
|
|
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,
|
|
@@ -80,7 +81,7 @@ interface
|
|
|
asmlabeltypeprefix : array[TAsmLabeltype] of char = ('j','a','d','l','f','t','c');
|
|
asmlabeltypeprefix : array[TAsmLabeltype] of char = ('j','a','d','l','f','t','c');
|
|
|
asmsymbindname : array[TAsmsymbind] of string[23] = ('none', 'external','common',
|
|
asmsymbindname : array[TAsmsymbind] of string[23] = ('none', 'external','common',
|
|
|
'local','global','weak external','private external','lazy','import','internal temp',
|
|
'local','global','weak external','private external','lazy','import','internal temp',
|
|
|
- 'indirect','external indirect');
|
|
|
|
|
|
|
+ 'indirect','external indirect','weak');
|
|
|
asmsymbindindirect = [AB_INDIRECT,AB_EXTERNAL_INDIRECT];
|
|
asmsymbindindirect = [AB_INDIRECT,AB_EXTERNAL_INDIRECT];
|
|
|
|
|
|
|
|
type
|
|
type
|
florian