paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 03:46:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

* replaced old DWARF CFI section notation for Darwin with new one (more

Browse Source 
changes are required before it works for Darwin)

git-svn-id: trunk@12920 -
This commit is contained in:
Jonas Maebe 2009-03-19 14:22:26 +00:00
parent d8aa5a1ff8
commit c548ce30ba
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/aggas.pas
View File

@ -85,8 +85,7 @@ interface
protected protected
function sectionname(atype:TAsmSectiontype;const aname:string;aorder:TAsmSectionOrder):string;override; function sectionname(atype:TAsmSectiontype;const aname:string;aorder:TAsmSectionOrder):string;override;
procedure WriteWeakSymbolDef(s: tasmsymbol); override; procedure WriteWeakSymbolDef(s: tasmsymbol); override;
private
debugframecount: aint;
end; end;
@ -1218,8 +1217,7 @@ implementation
sec_debug_frame, sec_debug_frame,
sec_eh_frame: sec_eh_frame:
begin begin
result := '.section __DWARFA,__debug_frame,coalesced,no_toc+strip_static_syms'#10'EH_frame'+tostr(debugframecount)+':'; result := '.section __DWARF,__debug_info,regular,debug';
inc(debugframecount);
exit; exit;
end; end;
sec_debug_line: sec_debug_line: