projects/ldc: gen/todebug.cpp annotate

annotate gen/todebug.cpp @ 837:331a176c1f4f

Removed error on naked, not fully complete, but I'll be doing more work on it during this Christmas, and some things do work. Fixed taking delegate of final class method. see mini/delegate3.d.

author	Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
date	Tue, 09 Dec 2008 14:07:30 +0100
parents	8e6135be6999
children	01d9ece9982a

rev	line source
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	1 #include "gen/llvm.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	2 #include "llvm/Support/Dwarf.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	3 #include "llvm/CodeGen/MachineModuleInfo.h"
285 297690b5d4a5 [svn r306] Fixed: it's now possible to compile and link llvmdc with MinGW32 and msys on Win32 :D I tried it myself ;) Building the runtime still needs some work, but it's a step in the right direction. lindquist parents: 268 diff changeset	4 #include "llvm/System/Path.h"
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	5
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	6 #include "declaration.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	7 #include "module.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	8 #include "mars.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	9
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	10 #include "gen/todebug.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	11 #include "gen/irstate.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	12 #include "gen/tollvm.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	13 #include "gen/logger.h"
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	14
139 0ab29b838084 [svn r143] Fixed: a few bugs in debug information, still only line info, but should be correct files now :) lindquist parents: 136 diff changeset	15 #include "ir/irmodule.h"
0ab29b838084 [svn r143] Fixed: a few bugs in debug information, still only line info, but should be correct files now :) lindquist parents: 136 diff changeset	16
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	17 using namespace llvm::dwarf;
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	18
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	19 #define DBG_NULL ( LLConstant::getNullValue(DBG_TYPE) )
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	20 #define DBG_TYPE ( getPtrToType(llvm::StructType::get(NULL,NULL)) )
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	21 #define DBG_CAST(X) ( llvm::ConstantExpr::getBitCast(X, DBG_TYPE) )
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	22
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	23 #define DBG_TAG(X) ( llvm::ConstantExpr::getAdd( DtoConstUint( X ), DtoConstUint( llvm::LLVMDebugVersion ) ) )
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	24
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	25 //////////////////////////////////////////////////////////////////////////////////////////////////
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	26
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	27 /**
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	28 * Emits a global variable, LLVM Dwarf style.
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	29 * @param type Type of variable.
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	30 * @param values Initializers.
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	31 * @param name Name.
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	32 * @return The global variable.
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	33 */
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	34 static LLGlobalVariable* emitDwarfGlobal(const LLStructType* type, const std::vector<LLConstant> values, const char name, bool linkonce=false)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	35 {
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	36 LLConstant* c = llvm::ConstantStruct::get(type, values);
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	37 LLGlobalValue::LinkageTypes linkage = linkonce ? LLGlobalValue::LinkOnceLinkage : LLGlobalValue::InternalLinkage;
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	38 LLGlobalVariable* gv = new LLGlobalVariable(type, true, linkage, c, name, gIR->module);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	39 gv->setSection("llvm.metadata");
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	40 return gv;
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	41 }
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	42
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	43 /**
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	44 * Emits a global variable, LLVM Dwarf style, only declares.
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	45 * @param type Type of variable.
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	46 * @param name Name.
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	47 * @return The global variable.
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	48 */
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	49 static LLGlobalVariable* emitDwarfGlobalDecl(const LLStructType* type, const char* name, bool linkonce=false)
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	50 {
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	51 LLGlobalValue::LinkageTypes linkage = linkonce ? LLGlobalValue::LinkOnceLinkage : LLGlobalValue::InternalLinkage;
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	52 LLGlobalVariable* gv = new LLGlobalVariable(type, true, linkage, NULL, name, gIR->module);
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	53 gv->setSection("llvm.metadata");
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	54 return gv;
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	55 }
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	56
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	57 //////////////////////////////////////////////////////////////////////////////////////////////////
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	58
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	59 /**
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	60 * Emits the Dwarf anchors that are used repeatedly by LLVM debug info.
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	61 */
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	62 static void emitDwarfAnchors()
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	63 {
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	64 const llvm::StructType* anchorTy = isaStruct(gIR->module->getTypeByName("llvm.dbg.anchor.type"));
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	65 std::vector<LLConstant*> vals(2);
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	66
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	67 vals[0] = DtoConstUint(llvm::LLVMDebugVersion);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	68 vals[1] = DtoConstUint(DW_TAG_compile_unit);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	69 gIR->dwarfCUs = emitDwarfGlobal(anchorTy, vals, "llvm.dbg.compile_units", true);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	70
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	71 vals[0] = DtoConstUint(llvm::LLVMDebugVersion);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	72 vals[1] = DtoConstUint(DW_TAG_variable);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	73 gIR->dwarfGVs = emitDwarfGlobal(anchorTy, vals, "llvm.dbg.global_variables", true);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	74
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	75 vals[0] = DtoConstUint(llvm::LLVMDebugVersion);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	76 vals[1] = DtoConstUint(DW_TAG_subprogram);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	77 gIR->dwarfSPs = emitDwarfGlobal(anchorTy, vals, "llvm.dbg.subprograms", true);
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	78 }
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	79
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	80 //////////////////////////////////////////////////////////////////////////////////////////////////
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	81
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	82 static LLConstant* getDwarfAnchor(dwarf_constants c)
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	83 {
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	84 if (!gIR->dwarfCUs)
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	85 emitDwarfAnchors();
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	86 switch (c)
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	87 {
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	88 case DW_TAG_compile_unit:
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	89 return gIR->dwarfCUs;
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	90 case DW_TAG_variable:
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	91 return gIR->dwarfGVs;
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	92 case DW_TAG_subprogram:
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	93 return gIR->dwarfSPs;
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	94 default:
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	95 assert(0);
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	96 }
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	97 }
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	98
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	99 //////////////////////////////////////////////////////////////////////////////////////////////////
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	100
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	101 static const llvm::StructType* getDwarfCompileUnitType() {
96 ce7ed8f59b99 [svn r100] Moved test/ray.d to demos/ray.d. lindquist parents: 94 diff changeset	102 return isaStruct(gIR->module->getTypeByName("llvm.dbg.compile_unit.type"));
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	103 }
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	104
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	105 static const llvm::StructType* getDwarfSubProgramType() {
96 ce7ed8f59b99 [svn r100] Moved test/ray.d to demos/ray.d. lindquist parents: 94 diff changeset	106 return isaStruct(gIR->module->getTypeByName("llvm.dbg.subprogram.type"));
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	107 }
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	108
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	109 static const llvm::StructType* getDwarfVariableType() {
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	110 return isaStruct(gIR->module->getTypeByName("llvm.dbg.variable.type"));
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	111 }
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	112
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	113 static const llvm::StructType* getDwarfDerivedTypeType() {
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	114 return isaStruct(gIR->module->getTypeByName("llvm.dbg.derivedtype.type"));
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	115 }
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	116
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	117 static const llvm::StructType* getDwarfBasicTypeType() {
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	118 return isaStruct(gIR->module->getTypeByName("llvm.dbg.basictype.type"));
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	119 }
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	120
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	121 static const llvm::StructType* getDwarfCompositeTypeType() {
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	122 return isaStruct(gIR->module->getTypeByName("llvm.dbg.compositetype.type"));
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	123 }
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	124
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	125 static const llvm::StructType* getDwarfGlobalVariableType() {
56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	126 return isaStruct(gIR->module->getTypeByName("llvm.dbg.global_variable.type"));
56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	127 }
56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	128
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	129 //////////////////////////////////////////////////////////////////////////////////////////////////
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	130
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	131 static LLGlobalVariable* dwarfCompileUnit(Module* m)
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	132 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	133 std::vector<LLConstant*> vals(6);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	134 vals[0] = DBG_TAG(DW_TAG_compile_unit);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	135 vals[1] = DBG_CAST(getDwarfAnchor(DW_TAG_compile_unit));
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	136
811 8e6135be6999 Fixed ModuleInfo generation to no longer use the ModuleInfo class' default initializer for types/defaults, it's unsafe as initializers don't necesarily match the "formal" type. There might be explicit padding. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 797 diff changeset	137 if (global.params.symdebug == 2)
8e6135be6999 Fixed ModuleInfo generation to no longer use the ModuleInfo class' default initializer for types/defaults, it's unsafe as initializers don't necesarily match the "formal" type. There might be explicit padding. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 797 diff changeset	138 vals[2] = DtoConstUint(DW_LANG_C);
8e6135be6999 Fixed ModuleInfo generation to no longer use the ModuleInfo class' default initializer for types/defaults, it's unsafe as initializers don't necesarily match the "formal" type. There might be explicit padding. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 797 diff changeset	139 else
8e6135be6999 Fixed ModuleInfo generation to no longer use the ModuleInfo class' default initializer for types/defaults, it's unsafe as initializers don't necesarily match the "formal" type. There might be explicit padding. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 797 diff changeset	140 vals[2] = DtoConstUint(DW_LANG_D);
718 72ee105be27b Make sure debug info has correct file name and path. Christian Kamm <kamm incasoftware de> parents: 702 diff changeset	141 vals[3] = DtoConstStringPtr(FileName::name(m->srcfile->name->toChars()), "llvm.metadata");
139 0ab29b838084 [svn r143] Fixed: a few bugs in debug information, still only line info, but should be correct files now :) lindquist parents: 136 diff changeset	142 std::string srcpath(FileName::path(m->srcfile->name->toChars()));
718 72ee105be27b Make sure debug info has correct file name and path. Christian Kamm <kamm incasoftware de> parents: 702 diff changeset	143 if (!FileName::absolute(srcpath.c_str())) {
72ee105be27b Make sure debug info has correct file name and path. Christian Kamm <kamm incasoftware de> parents: 702 diff changeset	144 llvm::sys::Path tmp = llvm::sys::Path::GetCurrentDirectory();
72ee105be27b Make sure debug info has correct file name and path. Christian Kamm <kamm incasoftware de> parents: 702 diff changeset	145 tmp.appendComponent(srcpath);
72ee105be27b Make sure debug info has correct file name and path. Christian Kamm <kamm incasoftware de> parents: 702 diff changeset	146 srcpath = tmp.toString();
736 e4e50f4b58cd Fix debug path. Christian Kamm <kamm incasoftware de> parents: 729 diff changeset	147 if (!srcpath.empty() && srcpath.rbegin() != '/' && srcpath.rbegin() != '\\')
729 50d01791859c Always add trailing slash to source path for debug info. Christian Kamm <kamm incasoftware de> parents: 718 diff changeset	148 srcpath = srcpath + '/';
718 72ee105be27b Make sure debug info has correct file name and path. Christian Kamm <kamm incasoftware de> parents: 702 diff changeset	149 }
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	150 vals[4] = DtoConstStringPtr(srcpath.c_str(), "llvm.metadata");
690 8526cf626110 Homepage rename. Christian Kamm <kamm incasoftware de> parents: 686 diff changeset	151 vals[5] = DtoConstStringPtr("LDC (http://www.dsource.org/projects/ldc)", "llvm.metadata");
139 0ab29b838084 [svn r143] Fixed: a few bugs in debug information, still only line info, but should be correct files now :) lindquist parents: 136 diff changeset	152
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	153 LLGlobalVariable* gv = emitDwarfGlobal(getDwarfCompileUnitType(), vals, "llvm.dbg.compile_unit");
173 db9890b3fb64 [svn r189] moving IR data back into DMD frontend nodes ChristianK parents: 156 diff changeset	154 m->ir.irModule->dwarfCompileUnit = gv;
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	155 return gv;
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	156 }
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	157
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	158 //////////////////////////////////////////////////////////////////////////////////////////////////
d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	159
702 353d9d184091 changed uint to unsigned int, thanks Elrood Christian Kamm <kamm incasoftware de> parents: 690 diff changeset	160 static LLGlobalVariable* dwarfSubProgram(llvm::GlobalVariable* emitUnit, llvm::GlobalVariable* defineUnit, const char* prettyname, const char* mangledname, unsigned int linenum, bool isprivate)
686 363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	161 {
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	162 std::vector<LLConstant*> vals(11);
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	163 vals[0] = DBG_TAG(DW_TAG_subprogram);
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	164 vals[1] = DBG_CAST(getDwarfAnchor(DW_TAG_subprogram));
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	165
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	166 vals[2] = DBG_CAST(emitUnit);
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	167 vals[3] = DtoConstStringPtr(prettyname, "llvm.metadata");
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	168 vals[4] = vals[3];
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	169 vals[5] = DtoConstStringPtr(mangledname, "llvm.metadata");
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	170 vals[6] = DBG_CAST(defineUnit);
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	171 vals[7] = DtoConstUint(linenum);
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	172 vals[8] = DBG_NULL;
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	173 vals[9] = DtoConstBool(isprivate);
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	174 vals[10] = DtoConstBool(emitUnit == defineUnit);
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	175
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	176 Logger::println("emitting subprogram global");
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	177
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	178 return emitDwarfGlobal(getDwarfSubProgramType(), vals, "llvm.dbg.subprogram");
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	179 }
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	180
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	181 /*
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	182 static LLGlobalVariable* dwarfSubProgram(FuncDeclaration* fd, llvm::GlobalVariable* compileUnit)
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	183 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	184 std::vector<LLConstant*> vals(11);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	185 vals[0] = DBG_TAG(DW_TAG_subprogram);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	186 vals[1] = DBG_CAST(getDwarfAnchor(DW_TAG_subprogram));
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	187
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	188 vals[2] = DBG_CAST(compileUnit);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	189 vals[3] = DtoConstStringPtr(fd->toPrettyChars(), "llvm.metadata");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	190 vals[4] = vals[3];
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	191 vals[5] = DtoConstStringPtr(fd->mangle(), "llvm.metadata");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	192 vals[6] = DBG_CAST( DtoDwarfCompileUnit(fd->getModule()) );
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	193 vals[7] = DtoConstUint(fd->loc.linnum);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	194 vals[8] = DBG_NULL;
611 83ca663ecc20 Backed out changeset 1b62222581fb Christian Kamm <kamm incasoftware de> parents: 610 diff changeset	195 vals[9] = DtoConstBool(fd->protection == PROTprivate);
83ca663ecc20 Backed out changeset 1b62222581fb Christian Kamm <kamm incasoftware de> parents: 610 diff changeset	196 vals[10] = DtoConstBool(fd->getModule() == gIR->dmodule);
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	197
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	198 Logger::println("emitting subprogram global");
82 d8dd47ef3973 [svn r86] Changed the way arguments are given storage. It is now detected if they will need it during semantic passes. lindquist parents: diff changeset	199
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	200 return emitDwarfGlobal(getDwarfSubProgramType(), vals, "llvm.dbg.subprogram");
686 363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	201 }*/
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	202
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	203 //////////////////////////////////////////////////////////////////////////////////////////////////
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	204
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	205 static LLGlobalVariable* dwarfTypeDescription_impl(Type* type, LLGlobalVariable* cu, const char* c_name);
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	206 static LLGlobalVariable* dwarfTypeDescription(Type* type, LLGlobalVariable* cu, const char* c_name);
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	207
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	208 //////////////////////////////////////////////////////////////////////////////////////////////////
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	209
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	210 static LLGlobalVariable* dwarfBasicType(Type* type, llvm::GlobalVariable* compileUnit)
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	211 {
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	212 Type* t = type->toBasetype();
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	213
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	214 const LLType* T = DtoType(type);
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	215
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	216 std::vector<LLConstant*> vals(10);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	217
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	218 // tag
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	219 vals[0] = DBG_TAG(DW_TAG_base_type);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	220
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	221 // context
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	222 vals[1] = DBG_CAST(compileUnit);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	223
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	224 // name
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	225 vals[2] = DtoConstStringPtr(type->toChars(), "llvm.metadata");
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	226
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	227 // compile unit where defined
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	228 vals[3] = DBG_NULL;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	229
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	230 // line number where defined
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	231 vals[4] = DtoConstInt(0);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	232
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	233 // size in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	234 vals[5] = LLConstantInt::get(LLType::Int64Ty, getTypeBitSize(T), false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	235
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	236 // alignment in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	237 vals[6] = LLConstantInt::get(LLType::Int64Ty, getABITypeAlign(T)*8, false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	238
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	239 // offset in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	240 vals[7] = LLConstantInt::get(LLType::Int64Ty, 0, false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	241
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	242 // FIXME: dont know what this is
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	243 vals[8] = DtoConstUint(0);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	244
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	245 // dwarf type
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	246 unsigned id;
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	247 if (t->isintegral())
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	248 {
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	249 if (type->isunsigned())
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	250 id = DW_ATE_unsigned;
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	251 else
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	252 id = DW_ATE_signed;
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	253 }
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	254 else if (t->isfloating())
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	255 {
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	256 id = DW_ATE_float;
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	257 }
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	258 else
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	259 {
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	260 assert(0 && "unsupported basictype for debug info");
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	261 }
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	262 vals[9] = DtoConstUint(id);
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	263
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	264 return emitDwarfGlobal(getDwarfBasicTypeType(), vals, "llvm.dbg.basictype");
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	265 }
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	266
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	267 //////////////////////////////////////////////////////////////////////////////////////////////////
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	268
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	269 static LLGlobalVariable* dwarfDerivedType(Type* type, llvm::GlobalVariable* compileUnit)
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	270 {
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	271 const LLType* T = DtoType(type);
486 a34078905d01 Added pragma(llvmdc, "string") for misc per-module compiler configuration, currently "string" can only be "verbose" which forces -vv for module it appears in. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 285 diff changeset	272 Type* t = type->toBasetype();
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	273
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	274 // defaults
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	275 LLConstant* name = getNullPtr(getVoidPtrType());
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	276
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	277 // find tag
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	278 unsigned tag;
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	279 if (t->ty == Tpointer)
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	280 {
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	281 tag = DW_TAG_pointer_type;
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	282 }
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	283 else
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	284 {
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	285 assert(0 && "unsupported derivedtype for debug info");
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	286 }
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	287
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	288 std::vector<LLConstant*> vals(10);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	289
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	290 // tag
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	291 vals[0] = DBG_TAG(tag);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	292
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	293 // context
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	294 vals[1] = DBG_CAST(compileUnit);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	295
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	296 // name
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	297 vals[2] = name;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	298
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	299 // compile unit where defined
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	300 vals[3] = DBG_NULL;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	301
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	302 // line number where defined
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	303 vals[4] = DtoConstInt(0);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	304
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	305 // size in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	306 vals[5] = LLConstantInt::get(LLType::Int64Ty, getTypeBitSize(T), false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	307
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	308 // alignment in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	309 vals[6] = LLConstantInt::get(LLType::Int64Ty, getABITypeAlign(T)*8, false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	310
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	311 // offset in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	312 vals[7] = LLConstantInt::get(LLType::Int64Ty, 0, false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	313
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	314 // FIXME: dont know what this is
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	315 vals[8] = DtoConstUint(0);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	316
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	317 // base type
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	318 Type* nt = t->nextOf();
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	319 LLGlobalVariable* nTD = dwarfTypeDescription_impl(nt, compileUnit, NULL);
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	320 if (nt->ty == Tvoid \|\| !nTD)
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	321 vals[9] = DBG_NULL;
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	322 else
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	323 vals[9] = DBG_CAST(nTD);
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	324
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	325 return emitDwarfGlobal(getDwarfDerivedTypeType(), vals, "llvm.dbg.derivedtype");
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	326 }
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	327
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	328 //////////////////////////////////////////////////////////////////////////////////////////////////
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	329
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	330 static LLGlobalVariable* dwarfMemberType(unsigned linnum, Type* type, LLGlobalVariable* compileUnit, LLGlobalVariable* definedCU, const char* c_name, unsigned offset)
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	331 {
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	332 const LLType* T = DtoType(type);
486 a34078905d01 Added pragma(llvmdc, "string") for misc per-module compiler configuration, currently "string" can only be "verbose" which forces -vv for module it appears in. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 285 diff changeset	333 Type* t = type->toBasetype();
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	334
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	335 // defaults
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	336 LLConstant* name;
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	337 if (c_name)
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	338 name = DtoConstStringPtr(c_name, "llvm.metadata");
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	339 else
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	340 name = getNullPtr(getVoidPtrType());
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	341
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	342 std::vector<LLConstant*> vals(10);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	343
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	344 // tag
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	345 vals[0] = DBG_TAG(DW_TAG_member);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	346
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	347 // context
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	348 vals[1] = DBG_CAST(compileUnit);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	349
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	350 // name
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	351 vals[2] = name;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	352
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	353 // compile unit where defined
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	354 if (definedCU)
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	355 vals[3] = DBG_CAST(definedCU);
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	356 else
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	357 vals[3] = DBG_NULL;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	358
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	359 // line number where defined
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	360 vals[4] = DtoConstInt(linnum);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	361
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	362 // size in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	363 vals[5] = LLConstantInt::get(LLType::Int64Ty, getTypeBitSize(T), false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	364
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	365 // alignment in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	366 vals[6] = LLConstantInt::get(LLType::Int64Ty, getABITypeAlign(T)*8, false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	367
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	368 // offset in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	369 vals[7] = LLConstantInt::get(LLType::Int64Ty, offset*8, false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	370
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	371 // FIXME: dont know what this is
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	372 vals[8] = DtoConstUint(0);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	373
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	374 // base type
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	375 LLGlobalVariable* nTD = dwarfTypeDescription(t, compileUnit, NULL);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	376 if (t->ty == Tvoid \|\| !nTD)
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	377 vals[9] = DBG_NULL;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	378 else
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	379 vals[9] = DBG_CAST(nTD);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	380
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	381 return emitDwarfGlobal(getDwarfDerivedTypeType(), vals, "llvm.dbg.derivedtype");
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	382 }
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	383
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	384 //////////////////////////////////////////////////////////////////////////////////////////////////
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	385
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	386 static LLGlobalVariable* dwarfCompositeType(Type* type, llvm::GlobalVariable* compileUnit)
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	387 {
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	388 const LLType* T = DtoType(type);
486 a34078905d01 Added pragma(llvmdc, "string") for misc per-module compiler configuration, currently "string" can only be "verbose" which forces -vv for module it appears in. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 285 diff changeset	389 Type* t = type->toBasetype();
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	390
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	391 // defaults
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	392 LLConstant* name = getNullPtr(getVoidPtrType());
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	393 LLGlobalVariable* members = NULL;
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	394 unsigned linnum = 0;
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	395 LLGlobalVariable* definedCU = NULL;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	396
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	397 // prepare tag and members
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	398 unsigned tag;
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	399
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	400 // declare final global variable
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	401 LLGlobalVariable* gv = NULL;
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	402
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	403 // dynamic array
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	404 if (t->ty == Tarray)
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	405 {
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	406 tag = DW_TAG_structure_type;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	407
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	408 LLGlobalVariable* len = dwarfMemberType(0, Type::tsize_t, compileUnit, NULL, "length", 0);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	409 assert(len);
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	410 LLGlobalVariable* ptr = dwarfMemberType(0, t->nextOf()->pointerTo(), compileUnit, NULL, "ptr", global.params.is64bit?8:4);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	411 assert(ptr);
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	412
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	413 const LLArrayType* at = LLArrayType::get(DBG_TYPE, 2);
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	414
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	415 std::vector<LLConstant*> elems(2);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	416 elems[0] = DBG_CAST(len);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	417 elems[1] = DBG_CAST(ptr);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	418
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	419 LLConstant* ca = LLConstantArray::get(at, elems);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	420 members = new LLGlobalVariable(ca->getType(), true, LLGlobalValue::InternalLinkage, ca, ".array", gIR->module);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	421 members->setSection("llvm.metadata");
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	422
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	423 name = DtoConstStringPtr(t->toChars(), "llvm.metadata");
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	424 }
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	425
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	426 // struct/class
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	427 else if (t->ty == Tstruct \|\| t->ty == Tclass)
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	428 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	429 AggregateDeclaration* sd;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	430 if (t->ty == Tstruct)
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	431 {
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	432 TypeStruct* ts = (TypeStruct*)t;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	433 sd = ts->sym;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	434 }
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	435 else
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	436 {
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	437 TypeClass* tc = (TypeClass*)t;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	438 sd = tc->sym;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	439 }
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	440 assert(sd);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	441
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	442 IrStruct* ir = sd->ir.irStruct;
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	443 assert(ir);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	444 if (ir->dwarfComposite)
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	445 return ir->dwarfComposite;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	446
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	447 // set to handle recursive types properly
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	448 gv = emitDwarfGlobalDecl(getDwarfCompositeTypeType(), "llvm.dbg.compositetype");
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	449 ir->dwarfComposite = gv;
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	450
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	451 tag = DW_TAG_structure_type;
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	452
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	453 name = DtoConstStringPtr(sd->toChars(), "llvm.metadata");
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	454 linnum = sd->loc.linnum;
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	455 definedCU = DtoDwarfCompileUnit(sd->getModule());
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	456
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	457 std::vector<LLConstant*> elems;
797 340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	458 if (!ir->aggrdecl->isInterfaceDeclaration()) // plain interfaces don't have one
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	459 {
797 340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	460 std::vector<VarDeclaration*>& arr = ir->varDecls;
340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	461 size_t narr = arr.size();
340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	462 elems.reserve(narr);
340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	463 for (int k=0; k<narr; k++)
340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	464 {
340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	465 VarDeclaration* vd = arr[k];
340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	466 assert(vd);
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	467
797 340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	468 LLGlobalVariable* ptr = dwarfMemberType(vd->loc.linnum, vd->type, compileUnit, definedCU, vd->toChars(), vd->offset);
340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	469 elems.push_back(DBG_CAST(ptr));
340acf1535d0 Removed KDevelop3 project files, CMake can generate them just fine! Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 736 diff changeset	470 }
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	471 }
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	472
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	473 const LLArrayType* at = LLArrayType::get(DBG_TYPE, elems.size());
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	474 LLConstant* ca = LLConstantArray::get(at, elems);
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	475 members = new LLGlobalVariable(ca->getType(), true, LLGlobalValue::InternalLinkage, ca, ".array", gIR->module);
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	476 members->setSection("llvm.metadata");
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	477 }
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	478
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	479 // unsupported composite type
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	480 else
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	481 {
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	482 assert(0 && "unsupported compositetype for debug info");
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	483 }
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	484
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	485 std::vector<LLConstant*> vals(11);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	486
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	487 // tag
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	488 vals[0] = DBG_TAG(tag);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	489
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	490 // context
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	491 vals[1] = DBG_CAST(compileUnit);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	492
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	493 // name
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	494 vals[2] = name;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	495
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	496 // compile unit where defined
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	497 if (definedCU)
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	498 vals[3] = DBG_CAST(definedCU);
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	499 else
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	500 vals[3] = DBG_NULL;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	501
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	502 // line number where defined
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	503 vals[4] = DtoConstInt(linnum);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	504
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	505 // size in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	506 vals[5] = LLConstantInt::get(LLType::Int64Ty, getTypeBitSize(T), false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	507
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	508 // alignment in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	509 vals[6] = LLConstantInt::get(LLType::Int64Ty, getABITypeAlign(T)*8, false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	510
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	511 // offset in bits
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	512 vals[7] = LLConstantInt::get(LLType::Int64Ty, 0, false);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	513
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	514 // FIXME: dont know what this is
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	515 vals[8] = DtoConstUint(0);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	516
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	517 // FIXME: ditto
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	518 vals[9] = DBG_NULL;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	519
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	520 // members array
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	521 if (members)
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	522 vals[10] = DBG_CAST(members);
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	523 else
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	524 vals[10] = DBG_NULL;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	525
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	526 // set initializer
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	527 if (!gv)
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	528 gv = emitDwarfGlobalDecl(getDwarfCompositeTypeType(), "llvm.dbg.compositetype");
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	529 LLConstant* initia = LLConstantStruct::get(getDwarfCompositeTypeType(), vals);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	530 gv->setInitializer(initia);
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	531
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	532 return gv;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	533 }
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	534
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	535 //////////////////////////////////////////////////////////////////////////////////////////////////
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	536
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	537 static LLGlobalVariable* dwarfGlobalVariable(LLGlobalVariable* ll, VarDeclaration* vd)
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	538 {
56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	539 assert(vd->isDataseg());
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	540 LLGlobalVariable* compileUnit = DtoDwarfCompileUnit(gIR->dmodule);
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	541
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	542 std::vector<LLConstant*> vals(12);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	543 vals[0] = DBG_TAG(DW_TAG_variable);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	544 vals[1] = DBG_CAST(getDwarfAnchor(DW_TAG_variable));
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	545
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	546 vals[2] = DBG_CAST(compileUnit);
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	547
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	548 vals[3] = DtoConstStringPtr(vd->mangle(), "llvm.metadata");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	549 vals[4] = DtoConstStringPtr(vd->toPrettyChars(), "llvm.metadata");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	550 vals[5] = DtoConstStringPtr(vd->toChars(), "llvm.metadata");
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	551
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	552 vals[6] = DBG_CAST(DtoDwarfCompileUnit(vd->getModule()));
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	553 vals[7] = DtoConstUint(vd->loc.linnum);
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	554
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	555 LLGlobalVariable* TY = dwarfTypeDescription_impl(vd->type, compileUnit, NULL);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	556 vals[8] = TY ? DBG_CAST(TY) : DBG_NULL;
611 83ca663ecc20 Backed out changeset 1b62222581fb Christian Kamm <kamm incasoftware de> parents: 610 diff changeset	557 vals[9] = DtoConstBool(vd->protection == PROTprivate);
83ca663ecc20 Backed out changeset 1b62222581fb Christian Kamm <kamm incasoftware de> parents: 610 diff changeset	558 vals[10] = DtoConstBool(vd->getModule() == gIR->dmodule);
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	559
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	560 vals[11] = DBG_CAST(ll);
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	561
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	562 return emitDwarfGlobal(getDwarfGlobalVariableType(), vals, "llvm.dbg.global_variable");
247 56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	563 }
56199753e637 [svn r264] Fixed debug info for global variables. lindquist parents: 246 diff changeset	564
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	565 //////////////////////////////////////////////////////////////////////////////////////////////////
e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	566
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	567 static LLGlobalVariable* dwarfVariable(VarDeclaration* vd, LLGlobalVariable* typeDescr)
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	568 {
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	569 assert(!vd->isDataseg() && "static variable");
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	570
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	571 unsigned tag;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	572 if (vd->isParameter())
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	573 tag = DW_TAG_arg_variable;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	574 else
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	575 tag = DW_TAG_auto_variable;
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	576
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	577 std::vector<LLConstant*> vals(6);
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	578 // tag
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	579 vals[0] = DBG_TAG(tag);
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	580 // context
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	581 vals[1] = DBG_CAST(gIR->func()->dwarfSubProg);
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	582 // name
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	583 vals[2] = DtoConstStringPtr(vd->toChars(), "llvm.metadata");
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	584 // compile unit where defined
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	585 vals[3] = DBG_CAST(DtoDwarfCompileUnit(vd->getModule()));
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	586 // line number where defined
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	587 vals[4] = DtoConstUint(vd->loc.linnum);
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	588 // type descriptor
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	589 vals[5] = DBG_CAST(typeDescr);
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	590
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	591 return emitDwarfGlobal(getDwarfVariableType(), vals, "llvm.dbg.variable");
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	592 }
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	593
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	594 //////////////////////////////////////////////////////////////////////////////////////////////////
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	595
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	596 static void dwarfDeclare(LLValue* var, LLGlobalVariable* varDescr)
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	597 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	598 LLSmallVector<LLValue*,2> args(2);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	599 args[0] = DtoBitCast(var, DBG_TYPE);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	600 args[1] = DBG_CAST(varDescr);
244 a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	601 gIR->ir->CreateCall(gIR->module->getFunction("llvm.dbg.declare"), args.begin(), args.end());
a95056b3c996 [svn r261] Fixed debug info for integer and floating local variables, can now be inspected in GDB. lindquist parents: 217 diff changeset	602 }
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	603
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	604 //////////////////////////////////////////////////////////////////////////////////////////////////
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	605
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	606 static LLGlobalVariable* dwarfTypeDescription_impl(Type* type, LLGlobalVariable* cu, const char* c_name)
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	607 {
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	608 Type* t = type->toBasetype();
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	609 if (t->ty == Tvoid)
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	610 return NULL;
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	611 else if (t->isintegral() \|\| t->isfloating())
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	612 return dwarfBasicType(type, cu);
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	613 else if (t->ty == Tpointer)
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	614 return dwarfDerivedType(type, cu);
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	615 else if (t->ty == Tarray \|\| t->ty == Tstruct \|\| t->ty == Tclass)
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	616 return dwarfCompositeType(type, cu);
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	617
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	618 return NULL;
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	619 }
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	620
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	621 static LLGlobalVariable* dwarfTypeDescription(Type* type, LLGlobalVariable* cu, const char* c_name)
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	622 {
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	623 Type* t = type->toBasetype();
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	624 if (t->ty == Tclass)
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	625 return dwarfTypeDescription_impl(type->pointerTo(), cu, c_name);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	626 else
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	627 return dwarfTypeDescription_impl(type, cu, c_name);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	628 }
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	629
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	630 //////////////////////////////////////////////////////////////////////////////////////////////////
b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	631
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	632 void DtoDwarfLocalVariable(LLValue* ll, VarDeclaration* vd)
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	633 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	634 Logger::println("D to dwarf local variable");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	635 LOG_SCOPE;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	636
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	637 // get compile units
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	638 LLGlobalVariable* thisCU = DtoDwarfCompileUnit(gIR->dmodule);
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	639 LLGlobalVariable* varCU = thisCU;
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	640 if (vd->getModule() != gIR->dmodule)
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	641 varCU = DtoDwarfCompileUnit(vd->getModule());
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	642
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	643 // get type description
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	644 Type* t = vd->type->toBasetype();
252 e3355ce5444b [svn r269] Fixed dwarf debug info for structs. lindquist parents: 250 diff changeset	645 LLGlobalVariable* TD = dwarfTypeDescription(vd->type, thisCU, NULL);
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	646 if (TD == NULL)
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	647 return; // unsupported
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	648
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	649 // get variable description
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	650 LLGlobalVariable* VD;
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	651 VD = dwarfVariable(vd, TD);
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	652
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	653 // declare
246 b604c56945b0 [svn r263] Changed * ATTENTION * to warnings. lindquist parents: 245 diff changeset	654 dwarfDeclare(ll, VD);
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	655 }
d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	656
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	657 //////////////////////////////////////////////////////////////////////////////////////////////////
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	658
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	659 LLGlobalVariable* DtoDwarfCompileUnit(Module* m)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	660 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	661 Logger::println("D to dwarf compile_unit");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	662 LOG_SCOPE;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	663
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	664 // we might be generating for an import
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	665 if (!m->ir.irModule)
683 b411c41a9716 Only allocate the module file name once. Fixes #90. Christian Kamm <kamm incasoftware de> parents: 663 diff changeset	666 m->ir.irModule = new IrModule(m, m->srcfile->toChars());
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	667 else if (m->ir.irModule->dwarfCompileUnit)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	668 {
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	669 if (m->ir.irModule->dwarfCompileUnit->getParent() == gIR->module)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	670 return m->ir.irModule->dwarfCompileUnit;
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	671 }
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	672
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	673 LLGlobalVariable* gv = dwarfCompileUnit(m);
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	674 m->ir.irModule->dwarfCompileUnit = gv;
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	675 return gv;
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	676 }
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	677
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	678 //////////////////////////////////////////////////////////////////////////////////////////////////
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	679
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	680 LLGlobalVariable* DtoDwarfSubProgram(FuncDeclaration* fd)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	681 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	682 Logger::println("D to dwarf subprogram");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	683 LOG_SCOPE;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	684
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	685 // FIXME: duplicates ?
686 363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	686 return dwarfSubProgram(
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	687 DtoDwarfCompileUnit(gIR->dmodule),
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	688 DtoDwarfCompileUnit(fd->getModule()),
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	689 fd->toPrettyChars(), fd->mangle(),
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	690 fd->loc.linnum,
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	691 fd->protection == PROTprivate);
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	692 }
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	693
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	694 //////////////////////////////////////////////////////////////////////////////////////////////////
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	695
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	696 LLGlobalVariable* DtoDwarfSubProgramInternal(const char* prettyname, const char* mangledname)
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	697 {
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	698 Logger::println("D to dwarf subprogram");
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	699 LOG_SCOPE;
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	700
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	701 // FIXME: duplicates ?
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	702 return dwarfSubProgram(
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	703 DtoDwarfCompileUnit(gIR->dmodule),
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	704 DtoDwarfCompileUnit(gIR->dmodule),
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	705 prettyname, mangledname,
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	706 0,
363bb6c0cc80 Emit stub debug info for generated functions to work around LLVM bug 2172. Christian Kamm <kamm incasoftware de> parents: 683 diff changeset	707 true);
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	708 }
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	709
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	710 //////////////////////////////////////////////////////////////////////////////////////////////////
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	711
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	712 LLGlobalVariable* DtoDwarfGlobalVariable(LLGlobalVariable* ll, VarDeclaration* vd)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	713 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	714 Logger::println("D to dwarf global_variable");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	715 LOG_SCOPE;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	716
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	717 // FIXME: duplicates ?
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	718 return dwarfGlobalVariable(ll, vd);
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	719 }
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	720
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	721 //////////////////////////////////////////////////////////////////////////////////////////////////
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	722
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	723 void DtoDwarfFuncStart(FuncDeclaration* fd)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	724 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	725 Logger::println("D to dwarf funcstart");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	726 LOG_SCOPE;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	727
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	728 assert(fd->ir.irFunc->dwarfSubProg);
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	729 gIR->ir->CreateCall(gIR->module->getFunction("llvm.dbg.func.start"), DBG_CAST(fd->ir.irFunc->dwarfSubProg));
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	730 }
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	731
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	732 //////////////////////////////////////////////////////////////////////////////////////////////////
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	733
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	734 void DtoDwarfFuncEnd(FuncDeclaration* fd)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	735 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	736 Logger::println("D to dwarf funcend");
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	737 LOG_SCOPE;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	738
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	739 assert(fd->ir.irFunc->dwarfSubProg);
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	740 gIR->ir->CreateCall(gIR->module->getFunction("llvm.dbg.region.end"), DBG_CAST(fd->ir.irFunc->dwarfSubProg));
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	741 }
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	742
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	743 //////////////////////////////////////////////////////////////////////////////////////////////////
245 d61ce72c39ab [svn r262] Fixed debug info for normal function parameters. lindquist parents: 244 diff changeset	744
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	745 void DtoDwarfStopPoint(unsigned ln)
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	746 {
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	747 Logger::println("D to dwarf stoppoint at line %u", ln);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	748 LOG_SCOPE;
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	749
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	750 LLSmallVector<LLValue*,3> args(3);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	751 args[0] = DtoConstUint(ln);
23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	752 args[1] = DtoConstUint(0);
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	753 FuncDeclaration* fd = gIR->func()->decl;
268 23d0d9855cad [svn r289] Fixed: right shift >> was broken for unsigned types. lindquist parents: 252 diff changeset	754 args[2] = DBG_CAST(DtoDwarfCompileUnit(fd->getModule()));
250 fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	755 gIR->ir->CreateCall(gIR->module->getFunction("llvm.dbg.stoppoint"), args.begin(), args.end());
fc9c1a0eabbd [svn r267] Fixed debug info for global variables. lindquist parents: 247 diff changeset	756 }

Mercurial > projects > ldc

annotate gen/todebug.cpp @ 837:331a176c1f4f