6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2024-11-01 15:11:24 +00:00
Code Issues Projects Releases Wiki Activity

Make stripPointerCasts and getUnderlyingObject

Browse Source 
non-recursive.


git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@61479 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Duncan Sands 2008-12-29 21:06:19 +00:00
parent 2964fe37ae
commit f08bf1193c
1 changed files with 39 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

65
lib/VMCore/Value.cpp
View File

@ -324,38 +324,51 @@ void Value::replaceAllUsesWith(Value *New) {
Value *Value::stripPointerCasts() { Value *Value::stripPointerCasts() {
if (!isa<PointerType>(getType())) if (!isa<PointerType>(getType()))
return this; return this;
Value *V = this;
if (ConstantExpr *CE = dyn_cast<ConstantExpr>(this)) { do {
if (CE->getOpcode() == Instruction::BitCast) { if (ConstantExpr *CE = dyn_cast<ConstantExpr>(V)) {
return CE->getOperand(0)->stripPointerCasts(); if (CE->getOpcode() == Instruction::GetElementPtr) {
} else if (CE->getOpcode() == Instruction::GetElementPtr) { for (unsigned i = 1, e = CE->getNumOperands(); i != e; ++i)
for (unsigned i = 1, e = CE->getNumOperands(); i != e; ++i) if (!CE->getOperand(i)->isNullValue())
if (!CE->getOperand(i)->isNullValue()) return V;
return this; V = CE->getOperand(0);
return CE->getOperand(0)->stripPointerCasts(); } else if (CE->getOpcode() == Instruction::BitCast) {
V = CE->getOperand(0);
} else {
return V;
}
} else if (GetElementPtrInst *GEP = dyn_cast<GetElementPtrInst>(V)) {
if (!GEP->hasAllZeroIndices())
return V;
V = GEP->getOperand(0);
} else if (BitCastInst *CI = dyn_cast<BitCastInst>(V)) {
V = CI->getOperand(0);
} else {
return V;
} }
} else if (BitCastInst *CI = dyn_cast<BitCastInst>(this)) { assert(isa<PointerType>(V->getType()) && "Unexpected operand type!");
return CI->getOperand(0)->stripPointerCasts(); } while (1);
} else if (GetElementPtrInst *GEP = dyn_cast<GetElementPtrInst>(this)) {
if (GEP->hasAllZeroIndices())
return GEP->getOperand(0)->stripPointerCasts();
}
return this;
} }
Value *Value::getUnderlyingObject() { Value *Value::getUnderlyingObject() {
if (!isa<PointerType>(getType())) if (!isa<PointerType>(getType()))
return this; return this;
Value *V = this;
if (Instruction *I = dyn_cast<Instruction>(this)) { do {
if (isa<BitCastInst>(I) || isa<GetElementPtrInst>(I)) if (Instruction *I = dyn_cast<Instruction>(V)) {
return I->getOperand(0)->getUnderlyingObject(); if (!isa<BitCastInst>(I) && !isa<GetElementPtrInst>(I))
} else if (ConstantExpr *CE = dyn_cast<ConstantExpr>(this)) { return V;
if (CE->getOpcode() == Instruction::BitCast || V = I->getOperand(0);
CE->getOpcode() == Instruction::GetElementPtr) } else if (ConstantExpr *CE = dyn_cast<ConstantExpr>(V)) {
return CE->getOperand(0)->getUnderlyingObject(); if (CE->getOpcode() != Instruction::BitCast &&
} CE->getOpcode() != Instruction::GetElementPtr)
return this; return V;
V = CE->getOperand(0);
} else {
return V;
}
assert(isa<PointerType>(V->getType()) && "Unexpected operand type!");
} while (1);
} }
/// DoPHITranslation - If this value is a PHI node with CurBB as its parent, /// DoPHITranslation - If this value is a PHI node with CurBB as its parent,