paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-04 03:58:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed r2970 (% instead of #)

Browse Source 
git-svn-id: trunk@2977 -
This commit is contained in:
Jonas Maebe 2006-03-19 20:41:36 +00:00
parent 6ad5dff9e8
commit d56857e998
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/aggas.pas
View File

@ -589,7 +589,7 @@ implementation
if (target_info.system <> system_arm_linux) then
sepChar := '@'
else
sepChar := '#';
sepChar := '%';
if (tf_needs_symbol_type in target_info.flags) then
asmwriteln(#9'.type '+Tai_datablock(hp).sym.name+','+sepChar+'object');
if (tf_needs_symbol_size in target_info.flags) and (tai_datablock(hp).size > 0) then