lib/CodeGen/AsmPrinter/DIE.cpp - fp2-dev/platform/external/llvm - Gitiles

 //===--- lib/CodeGen/DIE.cpp - DWARF Info Entries -------------------------===//
 //
 //                     The LLVM Compiler Infrastructure
 //
 // This file is distributed under the University of Illinois Open Source
 // License. See LICENSE.TXT for details.
 //
 //===----------------------------------------------------------------------===//
 //
 // Data structures for DWARF info entries.
 //
 //===----------------------------------------------------------------------===//

 #include "DIE.h"
 #include "DwarfPrinter.h"
 #include "llvm/ADT/Twine.h"
 #include "llvm/CodeGen/AsmPrinter.h"
 #include "llvm/MC/MCAsmInfo.h"
 #include "llvm/MC/MCStreamer.h"
 #include "llvm/MC/MCSymbol.h"
 #include "llvm/Target/TargetData.h"
 #include "llvm/Support/Debug.h"
 #include "llvm/Support/ErrorHandling.h"
 #include "llvm/Support/Format.h"
 #include "llvm/Support/FormattedStream.h"
 using namespace llvm;

 //===----------------------------------------------------------------------===//
 // DIEAbbrevData Implementation
 //===----------------------------------------------------------------------===//

 /// Profile - Used to gather unique data for the abbreviation folding set.
 ///
 void DIEAbbrevData::Profile(FoldingSetNodeID &ID) const {
   ID.AddInteger(Attribute);
   ID.AddInteger(Form);
 }

 //===----------------------------------------------------------------------===//
 // DIEAbbrev Implementation
 //===----------------------------------------------------------------------===//

 /// Profile - Used to gather unique data for the abbreviation folding set.
 ///
 void DIEAbbrev::Profile(FoldingSetNodeID &ID) const {
   ID.AddInteger(Tag);
   ID.AddInteger(ChildrenFlag);

   // For each attribute description.
   for (unsigned i = 0, N = Data.size(); i < N; ++i)
     Data[i].Profile(ID);
 }

 /// Emit - Print the abbreviation using the specified asm printer.
 ///
 void DIEAbbrev::Emit(const AsmPrinter *Asm) const {
   // Emit its Dwarf tag type.
   Asm->EmitULEB128Bytes(Tag);
   Asm->EOL(dwarf::TagString(Tag));

   // Emit whether it has children DIEs.
   Asm->EmitULEB128Bytes(ChildrenFlag);
   Asm->EOL(dwarf::ChildrenString(ChildrenFlag));

   // For each attribute description.
   for (unsigned i = 0, N = Data.size(); i < N; ++i) {
     const DIEAbbrevData &AttrData = Data[i];

     // Emit attribute type.
     Asm->EmitULEB128Bytes(AttrData.getAttribute());
     Asm->EOL(dwarf::AttributeString(AttrData.getAttribute()));

     // Emit form type.
     Asm->EmitULEB128Bytes(AttrData.getForm());
     Asm->EOL(dwarf::FormEncodingString(AttrData.getForm()));
   }

   // Mark end of abbreviation.
   Asm->EmitULEB128Bytes(0); Asm->EOL("EOM(1)");
   Asm->EmitULEB128Bytes(0); Asm->EOL("EOM(2)");
 }

 #ifndef NDEBUG
 void DIEAbbrev::print(raw_ostream &O) {
   O << "Abbreviation @"
     << format("0x%lx", (long)(intptr_t)this)
     << "  "
     << dwarf::TagString(Tag)
     << " "
     << dwarf::ChildrenString(ChildrenFlag)
     << '\n';

   for (unsigned i = 0, N = Data.size(); i < N; ++i) {
     O << "  "
       << dwarf::AttributeString(Data[i].getAttribute())
       << "  "
       << dwarf::FormEncodingString(Data[i].getForm())
       << '\n';
   }
 }
 void DIEAbbrev::dump() { print(dbgs()); }
 #endif

 //===----------------------------------------------------------------------===//
 // DIE Implementation
 //===----------------------------------------------------------------------===//

 DIE::~DIE() {
   for (unsigned i = 0, N = Children.size(); i < N; ++i)
     delete Children[i];
 }

 /// addSiblingOffset - Add a sibling offset field to the front of the DIE.
 ///
 void DIE::addSiblingOffset() {
   DIEInteger *DI = new DIEInteger(0);
   Values.insert(Values.begin(), DI);
   Abbrev.AddFirstAttribute(dwarf::DW_AT_sibling, dwarf::DW_FORM_ref4);
 }

 #ifndef NDEBUG
 void DIE::print(raw_ostream &O, unsigned IncIndent) {
   IndentCount += IncIndent;
   const std::string Indent(IndentCount, ' ');
   bool isBlock = Abbrev.getTag() == 0;

   if (!isBlock) {
     O << Indent
       << "Die: "
       << format("0x%lx", (long)(intptr_t)this)
       << ", Offset: " << Offset
       << ", Size: " << Size
       << "\n";

     O << Indent
       << dwarf::TagString(Abbrev.getTag())
       << " "
       << dwarf::ChildrenString(Abbrev.getChildrenFlag());
   } else {
     O << "Size: " << Size;
   }
   O << "\n";

   const SmallVector<DIEAbbrevData, 8> &Data = Abbrev.getData();

   IndentCount += 2;
   for (unsigned i = 0, N = Data.size(); i < N; ++i) {
     O << Indent;

     if (!isBlock)
       O << dwarf::AttributeString(Data[i].getAttribute());
     else
       O << "Blk[" << i << "]";

     O <<  "  "
       << dwarf::FormEncodingString(Data[i].getForm())
       << " ";
     Values[i]->print(O);
     O << "\n";
   }
   IndentCount -= 2;

   for (unsigned j = 0, M = Children.size(); j < M; ++j) {
     Children[j]->print(O, 4);
   }

   if (!isBlock) O << "\n";
   IndentCount -= IncIndent;
 }

 void DIE::dump() {
   print(dbgs());
 }
 #endif


 #ifndef NDEBUG
 void DIEValue::dump() {
   print(dbgs());
 }
 #endif

 //===----------------------------------------------------------------------===//
 // DIEInteger Implementation
 //===----------------------------------------------------------------------===//

 /// EmitValue - Emit integer of appropriate size.
 ///
 void DIEInteger::EmitValue(Dwarf *D, unsigned Form) const {
   const AsmPrinter *Asm = D->getAsm();
   unsigned Size = ~0U;
   switch (Form) {
   case dwarf::DW_FORM_flag:  // Fall thru
   case dwarf::DW_FORM_ref1:  // Fall thru
   case dwarf::DW_FORM_data1: Size = 1; break;
   case dwarf::DW_FORM_ref2:  // Fall thru
   case dwarf::DW_FORM_data2: Size = 2; break;
   case dwarf::DW_FORM_ref4:  // Fall thru
   case dwarf::DW_FORM_data4: Size = 4; break;
   case dwarf::DW_FORM_ref8:  // Fall thru
   case dwarf::DW_FORM_data8: Size = 8; break;
   case dwarf::DW_FORM_udata: Asm->EmitULEB128Bytes(Integer); return;
   case dwarf::DW_FORM_sdata: Asm->EmitSLEB128Bytes(Integer); return;
   default: llvm_unreachable("DIE Value form not supported yet");
   }
   Asm->OutStreamer.EmitIntValue(Integer, Size, 0/*addrspace*/);
 }

 /// SizeOf - Determine size of integer value in bytes.
 ///
 unsigned DIEInteger::SizeOf(const TargetData *TD, unsigned Form) const {
   switch (Form) {
   case dwarf::DW_FORM_flag:  // Fall thru
   case dwarf::DW_FORM_ref1:  // Fall thru
   case dwarf::DW_FORM_data1: return sizeof(int8_t);
   case dwarf::DW_FORM_ref2:  // Fall thru
   case dwarf::DW_FORM_data2: return sizeof(int16_t);
   case dwarf::DW_FORM_ref4:  // Fall thru
   case dwarf::DW_FORM_data4: return sizeof(int32_t);
   case dwarf::DW_FORM_ref8:  // Fall thru
   case dwarf::DW_FORM_data8: return sizeof(int64_t);
   case dwarf::DW_FORM_udata: return MCAsmInfo::getULEB128Size(Integer);
   case dwarf::DW_FORM_sdata: return MCAsmInfo::getSLEB128Size(Integer);
   default: llvm_unreachable("DIE Value form not supported yet"); break;
   }
   return 0;
 }

 #ifndef NDEBUG
 void DIEInteger::print(raw_ostream &O) {
   O << "Int: " << (int64_t)Integer
     << format("  0x%llx", (unsigned long long)Integer);
 }
 #endif

 //===----------------------------------------------------------------------===//
 // DIEString Implementation
 //===----------------------------------------------------------------------===//

 /// EmitValue - Emit string value.
 ///
 void DIEString::EmitValue(Dwarf *D, unsigned Form) const {
   D->getAsm()->EmitString(Str);
 }

 #ifndef NDEBUG
 void DIEString::print(raw_ostream &O) {
   O << "Str: \"" << Str << "\"";
 }
 #endif

 //===----------------------------------------------------------------------===//
 // DIEDwarfLabel Implementation
 //===----------------------------------------------------------------------===//

 /// EmitValue - Emit label value.
 ///
 void DIEDwarfLabel::EmitValue(Dwarf *D, unsigned Form) const {
   bool IsSmall = Form == dwarf::DW_FORM_data4;
   D->EmitReference(Label, false, IsSmall);
 }

 /// SizeOf - Determine size of label value in bytes.
 ///
 unsigned DIEDwarfLabel::SizeOf(const TargetData *TD, unsigned Form) const {
   if (Form == dwarf::DW_FORM_data4) return 4;
   return TD->getPointerSize();
 }

 #ifndef NDEBUG
 void DIEDwarfLabel::print(raw_ostream &O) {
   O << "Lbl: ";
   Label.print(O);
 }
 #endif

 //===----------------------------------------------------------------------===//
 // DIEObjectLabel Implementation
 //===----------------------------------------------------------------------===//

 /// EmitValue - Emit label value.
 ///
 void DIEObjectLabel::EmitValue(Dwarf *D, unsigned Form) const {
   bool IsSmall = Form == dwarf::DW_FORM_data4;
   D->EmitReference(Sym, false, IsSmall);
 }

 /// SizeOf - Determine size of label value in bytes.
 ///
 unsigned DIEObjectLabel::SizeOf(const TargetData *TD, unsigned Form) const {
   if (Form == dwarf::DW_FORM_data4) return 4;
   return TD->getPointerSize();
 }

 #ifndef NDEBUG
 void DIEObjectLabel::print(raw_ostream &O) {
   O << "Obj: " << Sym->getName();
 }
 #endif

 //===----------------------------------------------------------------------===//
 // DIESectionOffset Implementation
 //===----------------------------------------------------------------------===//

 /// EmitValue - Emit delta value.
 ///
 void DIESectionOffset::EmitValue(Dwarf *D, unsigned Form) const {
   bool IsSmall = Form == dwarf::DW_FORM_data4;
   D->EmitSectionOffset(Label.getTag(), Section.getTag(),
                        Label.getNumber(), Section.getNumber(),
                        IsSmall, IsEH, UseSet);
 }

 /// SizeOf - Determine size of delta value in bytes.
 ///
 unsigned DIESectionOffset::SizeOf(const TargetData *TD, unsigned Form) const {
   if (Form == dwarf::DW_FORM_data4) return 4;
   return TD->getPointerSize();
 }

 #ifndef NDEBUG
 void DIESectionOffset::print(raw_ostream &O) {
   O << "Off: ";
   Label.print(O);
   O << "-";
   Section.print(O);
   O << "-" << IsEH << "-" << UseSet;
 }
 #endif

 //===----------------------------------------------------------------------===//
 // DIEDelta Implementation
 //===----------------------------------------------------------------------===//

 /// EmitValue - Emit delta value.
 ///
 void DIEDelta::EmitValue(Dwarf *D, unsigned Form) const {
   bool IsSmall = Form == dwarf::DW_FORM_data4;
   D->EmitDifference(LabelHi, LabelLo, IsSmall);
 }

 /// SizeOf - Determine size of delta value in bytes.
 ///
 unsigned DIEDelta::SizeOf(const TargetData *TD, unsigned Form) const {
   if (Form == dwarf::DW_FORM_data4) return 4;
   return TD->getPointerSize();
 }

 #ifndef NDEBUG
 void DIEDelta::print(raw_ostream &O) {
   O << "Del: ";
   LabelHi.print(O);
   O << "-";
   LabelLo.print(O);
 }
 #endif

 //===----------------------------------------------------------------------===//
 // DIEEntry Implementation
 //===----------------------------------------------------------------------===//

 /// EmitValue - Emit debug information entry offset.
 ///
 void DIEEntry::EmitValue(Dwarf *D, unsigned Form) const {
   D->getAsm()->EmitInt32(Entry->getOffset());
 }

 #ifndef NDEBUG
 void DIEEntry::print(raw_ostream &O) {
   O << format("Die: 0x%lx", (long)(intptr_t)Entry);
 }
 #endif

 //===----------------------------------------------------------------------===//
 // DIEBlock Implementation
 //===----------------------------------------------------------------------===//

 /// ComputeSize - calculate the size of the block.
 ///
 unsigned DIEBlock::ComputeSize(const TargetData *TD) {
   if (!Size) {
     const SmallVector<DIEAbbrevData, 8> &AbbrevData = Abbrev.getData();
     for (unsigned i = 0, N = Values.size(); i < N; ++i)
       Size += Values[i]->SizeOf(TD, AbbrevData[i].getForm());
   }

   return Size;
 }

 /// EmitValue - Emit block data.
 ///
 void DIEBlock::EmitValue(Dwarf *D, unsigned Form) const {
   const AsmPrinter *Asm = D->getAsm();
   switch (Form) {
   case dwarf::DW_FORM_block1: Asm->EmitInt8(Size);         break;
   case dwarf::DW_FORM_block2: Asm->EmitInt16(Size);        break;
   case dwarf::DW_FORM_block4: Asm->EmitInt32(Size);        break;
   case dwarf::DW_FORM_block:  Asm->EmitULEB128Bytes(Size); break;
   default: llvm_unreachable("Improper form for block");         break;
   }

   const SmallVector<DIEAbbrevData, 8> &AbbrevData = Abbrev.getData();
   for (unsigned i = 0, N = Values.size(); i < N; ++i) {
     Asm->O << '\n';
     Values[i]->EmitValue(D, AbbrevData[i].getForm());
   }
 }

 /// SizeOf - Determine size of block data in bytes.
 ///
 unsigned DIEBlock::SizeOf(const TargetData *TD, unsigned Form) const {
   switch (Form) {
   case dwarf::DW_FORM_block1: return Size + sizeof(int8_t);
   case dwarf::DW_FORM_block2: return Size + sizeof(int16_t);
   case dwarf::DW_FORM_block4: return Size + sizeof(int32_t);
   case dwarf::DW_FORM_block: return Size + MCAsmInfo::getULEB128Size(Size);
   default: llvm_unreachable("Improper form for block"); break;
   }
   return 0;
 }

 #ifndef NDEBUG
 void DIEBlock::print(raw_ostream &O) {
   O << "Blk: ";
   DIE::print(O, 5);
 }
 #endif
	//===--- lib/CodeGen/DIE.cpp - DWARF Info Entries -------------------------===//
	//
	// The LLVM Compiler Infrastructure
	//
	// This file is distributed under the University of Illinois Open Source
	// License. See LICENSE.TXT for details.
	//
	//===----------------------------------------------------------------------===//
	//
	// Data structures for DWARF info entries.
	//
	//===----------------------------------------------------------------------===//

	#include "DIE.h"
	#include "DwarfPrinter.h"
	#include "llvm/ADT/Twine.h"
	#include "llvm/CodeGen/AsmPrinter.h"
	#include "llvm/MC/MCAsmInfo.h"
	#include "llvm/MC/MCStreamer.h"
	#include "llvm/MC/MCSymbol.h"
	#include "llvm/Target/TargetData.h"
	#include "llvm/Support/Debug.h"
	#include "llvm/Support/ErrorHandling.h"
	#include "llvm/Support/Format.h"
	#include "llvm/Support/FormattedStream.h"
	using namespace llvm;

	//===----------------------------------------------------------------------===//
	// DIEAbbrevData Implementation
	//===----------------------------------------------------------------------===//

	/// Profile - Used to gather unique data for the abbreviation folding set.
	///
	void DIEAbbrevData::Profile(FoldingSetNodeID &ID) const {
	ID.AddInteger(Attribute);
	ID.AddInteger(Form);
	}

	//===----------------------------------------------------------------------===//
	// DIEAbbrev Implementation
	//===----------------------------------------------------------------------===//

	/// Profile - Used to gather unique data for the abbreviation folding set.
	///
	void DIEAbbrev::Profile(FoldingSetNodeID &ID) const {
	ID.AddInteger(Tag);
	ID.AddInteger(ChildrenFlag);

	// For each attribute description.
	for (unsigned i = 0, N = Data.size(); i < N; ++i)
	Data[i].Profile(ID);
	}

	/// Emit - Print the abbreviation using the specified asm printer.
	///
	void DIEAbbrev::Emit(const AsmPrinter *Asm) const {
	// Emit its Dwarf tag type.
	Asm->EmitULEB128Bytes(Tag);
	Asm->EOL(dwarf::TagString(Tag));

	// Emit whether it has children DIEs.
	Asm->EmitULEB128Bytes(ChildrenFlag);
	Asm->EOL(dwarf::ChildrenString(ChildrenFlag));

	// For each attribute description.
	for (unsigned i = 0, N = Data.size(); i < N; ++i) {
	const DIEAbbrevData &AttrData = Data[i];

	// Emit attribute type.
	Asm->EmitULEB128Bytes(AttrData.getAttribute());
	Asm->EOL(dwarf::AttributeString(AttrData.getAttribute()));

	// Emit form type.
	Asm->EmitULEB128Bytes(AttrData.getForm());
	Asm->EOL(dwarf::FormEncodingString(AttrData.getForm()));
	}

	// Mark end of abbreviation.
	Asm->EmitULEB128Bytes(0); Asm->EOL("EOM(1)");
	Asm->EmitULEB128Bytes(0); Asm->EOL("EOM(2)");
	}

	#ifndef NDEBUG
	void DIEAbbrev::print(raw_ostream &O) {
	O << "Abbreviation @"
	<< format("0x%lx", (long)(intptr_t)this)
	<< " "
	<< dwarf::TagString(Tag)
	<< " "
	<< dwarf::ChildrenString(ChildrenFlag)
	<< '\n';

	for (unsigned i = 0, N = Data.size(); i < N; ++i) {
	O << " "
	<< dwarf::AttributeString(Data[i].getAttribute())
	<< " "
	<< dwarf::FormEncodingString(Data[i].getForm())
	<< '\n';
	}
	}
	void DIEAbbrev::dump() { print(dbgs()); }
	#endif

	//===----------------------------------------------------------------------===//
	// DIE Implementation
	//===----------------------------------------------------------------------===//

	DIE::~DIE() {
	for (unsigned i = 0, N = Children.size(); i < N; ++i)
	delete Children[i];
	}

	/// addSiblingOffset - Add a sibling offset field to the front of the DIE.
	///
	void DIE::addSiblingOffset() {
	DIEInteger *DI = new DIEInteger(0);
	Values.insert(Values.begin(), DI);
	Abbrev.AddFirstAttribute(dwarf::DW_AT_sibling, dwarf::DW_FORM_ref4);
	}

	#ifndef NDEBUG
	void DIE::print(raw_ostream &O, unsigned IncIndent) {
	IndentCount += IncIndent;
	const std::string Indent(IndentCount, ' ');
	bool isBlock = Abbrev.getTag() == 0;

	if (!isBlock) {
	O << Indent
	<< "Die: "
	<< format("0x%lx", (long)(intptr_t)this)
	<< ", Offset: " << Offset
	<< ", Size: " << Size
	<< "\n";

	O << Indent
	<< dwarf::TagString(Abbrev.getTag())
	<< " "
	<< dwarf::ChildrenString(Abbrev.getChildrenFlag());
	} else {
	O << "Size: " << Size;
	}
	O << "\n";

	const SmallVector<DIEAbbrevData, 8> &Data = Abbrev.getData();

	IndentCount += 2;
	for (unsigned i = 0, N = Data.size(); i < N; ++i) {
	O << Indent;

	if (!isBlock)
	O << dwarf::AttributeString(Data[i].getAttribute());
	else
	O << "Blk[" << i << "]";

	O << " "
	<< dwarf::FormEncodingString(Data[i].getForm())
	<< " ";
	Values[i]->print(O);
	O << "\n";
	}
	IndentCount -= 2;

	for (unsigned j = 0, M = Children.size(); j < M; ++j) {
	Children[j]->print(O, 4);
	}

	if (!isBlock) O << "\n";
	IndentCount -= IncIndent;
	}

	void DIE::dump() {
	print(dbgs());
	}
	#endif


	#ifndef NDEBUG
	void DIEValue::dump() {
	print(dbgs());
	}
	#endif

	//===----------------------------------------------------------------------===//
	// DIEInteger Implementation
	//===----------------------------------------------------------------------===//

	/// EmitValue - Emit integer of appropriate size.
	///
	void DIEInteger::EmitValue(Dwarf *D, unsigned Form) const {
	const AsmPrinter *Asm = D->getAsm();
	unsigned Size = ~0U;
	switch (Form) {
	case dwarf::DW_FORM_flag: // Fall thru
	case dwarf::DW_FORM_ref1: // Fall thru
	case dwarf::DW_FORM_data1: Size = 1; break;
	case dwarf::DW_FORM_ref2: // Fall thru
	case dwarf::DW_FORM_data2: Size = 2; break;
	case dwarf::DW_FORM_ref4: // Fall thru
	case dwarf::DW_FORM_data4: Size = 4; break;
	case dwarf::DW_FORM_ref8: // Fall thru
	case dwarf::DW_FORM_data8: Size = 8; break;
	case dwarf::DW_FORM_udata: Asm->EmitULEB128Bytes(Integer); return;
	case dwarf::DW_FORM_sdata: Asm->EmitSLEB128Bytes(Integer); return;
	default: llvm_unreachable("DIE Value form not supported yet");
	}
	Asm->OutStreamer.EmitIntValue(Integer, Size, 0/addrspace/);
	}

	/// SizeOf - Determine size of integer value in bytes.
	///
	unsigned DIEInteger::SizeOf(const TargetData *TD, unsigned Form) const {
	switch (Form) {
	case dwarf::DW_FORM_flag: // Fall thru
	case dwarf::DW_FORM_ref1: // Fall thru
	case dwarf::DW_FORM_data1: return sizeof(int8_t);
	case dwarf::DW_FORM_ref2: // Fall thru
	case dwarf::DW_FORM_data2: return sizeof(int16_t);
	case dwarf::DW_FORM_ref4: // Fall thru
	case dwarf::DW_FORM_data4: return sizeof(int32_t);
	case dwarf::DW_FORM_ref8: // Fall thru
	case dwarf::DW_FORM_data8: return sizeof(int64_t);
	case dwarf::DW_FORM_udata: return MCAsmInfo::getULEB128Size(Integer);
	case dwarf::DW_FORM_sdata: return MCAsmInfo::getSLEB128Size(Integer);
	default: llvm_unreachable("DIE Value form not supported yet"); break;
	}
	return 0;
	}

	#ifndef NDEBUG
	void DIEInteger::print(raw_ostream &O) {
	O << "Int: " << (int64_t)Integer
	<< format(" 0x%llx", (unsigned long long)Integer);
	}
	#endif

	//===----------------------------------------------------------------------===//
	// DIEString Implementation
	//===----------------------------------------------------------------------===//

	/// EmitValue - Emit string value.
	///
	void DIEString::EmitValue(Dwarf *D, unsigned Form) const {
	D->getAsm()->EmitString(Str);
	}

	#ifndef NDEBUG
	void DIEString::print(raw_ostream &O) {
	O << "Str: \"" << Str << "\"";
	}
	#endif

	//===----------------------------------------------------------------------===//
	// DIEDwarfLabel Implementation
	//===----------------------------------------------------------------------===//

	/// EmitValue - Emit label value.
	///
	void DIEDwarfLabel::EmitValue(Dwarf *D, unsigned Form) const {
	bool IsSmall = Form == dwarf::DW_FORM_data4;
	D->EmitReference(Label, false, IsSmall);
	}

	/// SizeOf - Determine size of label value in bytes.
	///
	unsigned DIEDwarfLabel::SizeOf(const TargetData *TD, unsigned Form) const {
	if (Form == dwarf::DW_FORM_data4) return 4;
	return TD->getPointerSize();
	}

	#ifndef NDEBUG
	void DIEDwarfLabel::print(raw_ostream &O) {
	O << "Lbl: ";
	Label.print(O);
	}
	#endif

	//===----------------------------------------------------------------------===//
	// DIEObjectLabel Implementation
	//===----------------------------------------------------------------------===//

	/// EmitValue - Emit label value.
	///
	void DIEObjectLabel::EmitValue(Dwarf *D, unsigned Form) const {
	bool IsSmall = Form == dwarf::DW_FORM_data4;
	D->EmitReference(Sym, false, IsSmall);
	}

	/// SizeOf - Determine size of label value in bytes.
	///
	unsigned DIEObjectLabel::SizeOf(const TargetData *TD, unsigned Form) const {
	if (Form == dwarf::DW_FORM_data4) return 4;
	return TD->getPointerSize();
	}

	#ifndef NDEBUG
	void DIEObjectLabel::print(raw_ostream &O) {
	O << "Obj: " << Sym->getName();
	}
	#endif

	//===----------------------------------------------------------------------===//
	// DIESectionOffset Implementation
	//===----------------------------------------------------------------------===//

	/// EmitValue - Emit delta value.
	///
	void DIESectionOffset::EmitValue(Dwarf *D, unsigned Form) const {
	bool IsSmall = Form == dwarf::DW_FORM_data4;
	D->EmitSectionOffset(Label.getTag(), Section.getTag(),
	Label.getNumber(), Section.getNumber(),
	IsSmall, IsEH, UseSet);
	}

	/// SizeOf - Determine size of delta value in bytes.
	///
	unsigned DIESectionOffset::SizeOf(const TargetData *TD, unsigned Form) const {
	if (Form == dwarf::DW_FORM_data4) return 4;
	return TD->getPointerSize();
	}

	#ifndef NDEBUG
	void DIESectionOffset::print(raw_ostream &O) {
	O << "Off: ";
	Label.print(O);
	O << "-";
	Section.print(O);
	O << "-" << IsEH << "-" << UseSet;
	}
	#endif

	//===----------------------------------------------------------------------===//
	// DIEDelta Implementation
	//===----------------------------------------------------------------------===//

	/// EmitValue - Emit delta value.
	///
	void DIEDelta::EmitValue(Dwarf *D, unsigned Form) const {
	bool IsSmall = Form == dwarf::DW_FORM_data4;
	D->EmitDifference(LabelHi, LabelLo, IsSmall);
	}

	/// SizeOf - Determine size of delta value in bytes.
	///
	unsigned DIEDelta::SizeOf(const TargetData *TD, unsigned Form) const {
	if (Form == dwarf::DW_FORM_data4) return 4;
	return TD->getPointerSize();
	}

	#ifndef NDEBUG
	void DIEDelta::print(raw_ostream &O) {
	O << "Del: ";
	LabelHi.print(O);
	O << "-";
	LabelLo.print(O);
	}
	#endif

	//===----------------------------------------------------------------------===//
	// DIEEntry Implementation
	//===----------------------------------------------------------------------===//

	/// EmitValue - Emit debug information entry offset.
	///
	void DIEEntry::EmitValue(Dwarf *D, unsigned Form) const {
	D->getAsm()->EmitInt32(Entry->getOffset());
	}

	#ifndef NDEBUG
	void DIEEntry::print(raw_ostream &O) {
	O << format("Die: 0x%lx", (long)(intptr_t)Entry);
	}
	#endif

	//===----------------------------------------------------------------------===//
	// DIEBlock Implementation
	//===----------------------------------------------------------------------===//

	/// ComputeSize - calculate the size of the block.
	///
	unsigned DIEBlock::ComputeSize(const TargetData *TD) {
	if (!Size) {
	const SmallVector<DIEAbbrevData, 8> &AbbrevData = Abbrev.getData();
	for (unsigned i = 0, N = Values.size(); i < N; ++i)
	Size += Values[i]->SizeOf(TD, AbbrevData[i].getForm());
	}

	return Size;
	}

	/// EmitValue - Emit block data.
	///
	void DIEBlock::EmitValue(Dwarf *D, unsigned Form) const {
	const AsmPrinter *Asm = D->getAsm();
	switch (Form) {
	case dwarf::DW_FORM_block1: Asm->EmitInt8(Size); break;
	case dwarf::DW_FORM_block2: Asm->EmitInt16(Size); break;
	case dwarf::DW_FORM_block4: Asm->EmitInt32(Size); break;
	case dwarf::DW_FORM_block: Asm->EmitULEB128Bytes(Size); break;
	default: llvm_unreachable("Improper form for block"); break;
	}

	const SmallVector<DIEAbbrevData, 8> &AbbrevData = Abbrev.getData();
	for (unsigned i = 0, N = Values.size(); i < N; ++i) {
	Asm->O << '\n';
	Values[i]->EmitValue(D, AbbrevData[i].getForm());
	}
	}

	/// SizeOf - Determine size of block data in bytes.
	///
	unsigned DIEBlock::SizeOf(const TargetData *TD, unsigned Form) const {
	switch (Form) {
	case dwarf::DW_FORM_block1: return Size + sizeof(int8_t);
	case dwarf::DW_FORM_block2: return Size + sizeof(int16_t);
	case dwarf::DW_FORM_block4: return Size + sizeof(int32_t);
	case dwarf::DW_FORM_block: return Size + MCAsmInfo::getULEB128Size(Size);
	default: llvm_unreachable("Improper form for block"); break;
	}
	return 0;
	}

	#ifndef NDEBUG
	void DIEBlock::print(raw_ostream &O) {
	O << "Blk: ";
	DIE::print(O, 5);
	}
	#endif