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

* also change labels starting with L to _L on darwin/x86

Browse Source 
git-svn-id: trunk@2725 -
This commit is contained in:
Jonas Maebe 2006-03-03 19:31:46 +00:00
parent 2c01a6f77a
commit ec486f0238
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/symdef.pas
View File

@ -880,7 +880,7 @@ implementation
if suffix<>'' then
result:=result+'_'+suffix;
{ the Darwin assembler assumes that all symbols starting with 'L' are local }
if (target_info.system = system_powerpc_darwin) and
if (target_info.system in [system_powerpc_darwin,system_i386_darwin]) and
(result[1] = 'L') then
result := '_' + result;
end;