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

* fixed darwin compilation

Browse Source 
git-svn-id: trunk@5310 -
This commit is contained in:
Jonas Maebe 2006-11-10 17:12:30 +00:00
parent b922783481
commit a9980bf951
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/aggas.pas
View File

@ -1098,6 +1098,11 @@ implementation
result := '.const'; result := '.const';
exit; exit;
end; end;
sec_fpc:
begin
result := '.section __TEXT, .fpc, regular, no_dead_strip';
exit;
end;
end; end;
result := inherited sectionname(atype,aname,aorder); result := inherited sectionname(atype,aname,aorder);
end; end;