I was wrong, ocaml isn't referencing 'Ldata_begin', so remove it.

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@100365 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Chris Lattner 2010-04-04 23:10:38 +00:00
parent a33b2a1ee6
commit 4ad1efec92
2 changed files with 4 additions and 10 deletions

View File

@ -305,12 +305,8 @@ DwarfDebug::DwarfDebug(AsmPrinter *A)
CurrentFnDbgScope(0), DebugTimer(0) { CurrentFnDbgScope(0), DebugTimer(0) {
NextStringPoolNumber = 0; NextStringPoolNumber = 0;
DwarfFrameSectionSym = 0; DwarfFrameSectionSym = DwarfInfoSectionSym = DwarfAbbrevSectionSym = 0;
DwarfInfoSectionSym = 0; DwarfStrSectionSym = TextSectionSym = 0;
DwarfAbbrevSectionSym = 0;
DwarfStrSectionSym = 0;
TextSectionSym = 0;
DataSectionSym = 0;
if (TimePassesIsEnabled) if (TimePassesIsEnabled)
DebugTimer = new Timer("Dwarf Debug Writer"); DebugTimer = new Timer("Dwarf Debug Writer");
@ -2485,9 +2481,7 @@ void DwarfDebug::EmitSectionLabels() {
EmitSectionSym(Asm, TLOF.getDwarfRangesSection()); EmitSectionSym(Asm, TLOF.getDwarfRangesSection());
TextSectionSym = EmitSectionSym(Asm, TLOF.getTextSection(), "text_begin"); TextSectionSym = EmitSectionSym(Asm, TLOF.getTextSection(), "text_begin");
EmitSectionSym(Asm, TLOF.getDataSection());
// This is subtly used by the ocaml GC stuff.
DataSectionSym = EmitSectionSym(Asm, TLOF.getDataSection(), "data_begin");
} }
/// emitDIE - Recusively Emits a debug information entry. /// emitDIE - Recusively Emits a debug information entry.

View File

@ -210,7 +210,7 @@ class DwarfDebug : public DwarfPrinter {
// the beginning of each supported dwarf section. These are used to form // the beginning of each supported dwarf section. These are used to form
// section offsets and are created by EmitSectionLabels. // section offsets and are created by EmitSectionLabels.
MCSymbol *DwarfFrameSectionSym, *DwarfInfoSectionSym, *DwarfAbbrevSectionSym; MCSymbol *DwarfFrameSectionSym, *DwarfInfoSectionSym, *DwarfAbbrevSectionSym;
MCSymbol *DwarfStrSectionSym, *TextSectionSym, *DataSectionSym; MCSymbol *DwarfStrSectionSym, *TextSectionSym;
private: private: