6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2025-08-02 23:26:31 +00:00
Code Issues Projects Releases Wiki Activity

Remove long dead code

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@6307 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Chris Lattner
2003-05-22 22:00:54 +00:00
parent de579f11ff
commit 7594b29c75
2 changed files with 0 additions and 73 deletions
Download Patch File Download Diff File Expand all files Collapse all files

46
support/lib/Support/NameMangling.cpp
View File

@@ -1,46 +0,0 @@
//===- NameMangling.cpp - Name Mangling for LLVM ----------------------------=//
//
// This file implements a consistent scheme for name mangling symbols.
//
//===----------------------------------------------------------------------===//
#include "llvm/Support/NameMangling.h"
#include "llvm/DerivedTypes.h"
#include "llvm/GlobalValue.h"
// MangleTypeName - Implement a consistent name-mangling scheme for
// a given type.
//
std::string MangleTypeName(const Type *Ty) {
std::string mangledName;
if (Ty->isPrimitiveType()) {
const std::string &longName = Ty->getDescription();
return std::string(longName.c_str(), (longName.length() < 2) ? 1 : 2);
} else if (const PointerType *PTy = dyn_cast<PointerType>(Ty)) {
mangledName = std::string("P_" + MangleTypeName(PTy->getElementType()));
} else if (const StructType *STy = dyn_cast<StructType>(Ty)) {
mangledName = std::string("S_");
for (unsigned i=0; i < STy->getNumContainedTypes(); ++i)
mangledName += MangleTypeName(STy->getContainedType(i));
} else if (const ArrayType *ATy = dyn_cast<ArrayType>(Ty)) {
mangledName = std::string("A_" +MangleTypeName(ATy->getElementType()));
} else if (const FunctionType *FTy = dyn_cast<FunctionType>(Ty)) {
mangledName = std::string("M_") + MangleTypeName(FTy->getReturnType());
for (unsigned i = 1; i < FTy->getNumContainedTypes(); ++i)
mangledName += std::string(MangleTypeName(FTy->getContainedType(i)));
}
return mangledName;
}
// mangleName - implement a consistent name-mangling scheme for all
// externally visible (i.e., global) objects.
// privateName should be unique within the module.
//
std::string MangleName(const std::string &privateName, const Value *V) {
// Lets drop the P_ before every global name since all globals are ptrs
return privateName + "_" +
MangleTypeName(isa<GlobalValue>(V)
? cast<GlobalValue>(V)->getType()->getElementType()
: V->getType());
}