[llvm-commits] [llvm-gcc-4.2] r62648 - /llvm-gcc-4.2/trunk/gcc/llvm-debug.cpp
Devang Patel
dpatel at apple.com
Tue Jan 20 17:03:29 PST 2009
Author: dpatel
Date: Tue Jan 20 19:03:29 2009
New Revision: 62648
URL: http://llvm.org/viewvc/llvm-project?rev=62648&view=rev
Log:
Set member accessibility flag.
Do not seperate out file name and directory name in compile unit. It is only useful if the compiler emits multiple compile_units.
Modified:
llvm-gcc-4.2/trunk/gcc/llvm-debug.cpp
Modified: llvm-gcc-4.2/trunk/gcc/llvm-debug.cpp
URL: http://llvm.org/viewvc/llvm-project/llvm-gcc-4.2/trunk/gcc/llvm-debug.cpp?rev=62648&r1=62647&r2=62648&view=diff
==============================================================================
--- llvm-gcc-4.2/trunk/gcc/llvm-debug.cpp (original)
+++ llvm-gcc-4.2/trunk/gcc/llvm-debug.cpp Tue Jan 20 19:03:29 2009
@@ -558,7 +558,7 @@
llvm::DIType FwdDecl =
DebugFactory.CreateCompositeType(Tag, MainCompileUnit, TypeName,
MainCompileUnit, Loc.line,
- 0, 0, 0, DW_AT_declaration,
+ 0, 0, 0, llvm::DIType::FlagFwdDecl,
llvm::DIType(), llvm::DIArray(),
&Filename, &Directory);
@@ -617,11 +617,10 @@
const char *MemberName = GetNodeName(Member);
unsigned Flags = 0;
if (TREE_PROTECTED(Member))
- Flags = DW_ACCESS_protected;
+ Flags = llvm::DIType::FlagProtected;
else if (TREE_PRIVATE(Member))
- Flags = DW_ACCESS_private;
- else
- Flags = DW_ACCESS_public;
+ Flags = llvm::DIType::FlagPrivate;
+
DIType DTy =
DebugFactory.CreateDerivedType(DW_TAG_member, MainCompileUnit,
MemberName, MainCompileUnit,
@@ -727,8 +726,6 @@
DICompileUnit DebugInfo::createCompileUnit(const std::string &FullPath){
// Get source file information.
std::string Directory;
- std::string FileName;
- DirectoryAndFile(FullPath, Directory, FileName);
// Set up Language number.
unsigned LangTag;
@@ -752,7 +749,7 @@
else
LangTag = DW_LANG_C89;
- return DebugFactory.CreateCompileUnit(LangTag, FileName, Directory,
+ return DebugFactory.CreateCompileUnit(LangTag, FullPath, "",
version_string);
}
More information about the llvm-commits
mailing list