//
//===----------------------------------------------------------------------===//
-#include "llvm/Optimizations/ConstantHandling.h"
+#include "llvm/ConstantHandling.h"
+#include "llvm/iPHINode.h"
+#include <cmath>
+
+AnnotationID ConstRules::AID(AnnotationManager::getID("opt::ConstRules",
+ &ConstRules::find));
+
+// ConstantFoldInstruction - Attempt to constant fold the specified instruction.
+// If successful, the constant result is returned, if not, null is returned.
+//
+Constant *ConstantFoldInstruction(Instruction *I) {
+ if (PHINode *PN = dyn_cast<PHINode>(I)) {
+ if (PN->getNumIncomingValues() == 0)
+ return Constant::getNullValue(PN->getType());
+
+ Constant *Result = dyn_cast<Constant>(PN->getIncomingValue(0));
+ if (Result == 0) return 0;
+
+ // Handle PHI nodes specially here...
+ for (unsigned i = 1, e = PN->getNumIncomingValues(); i != e; ++i)
+ if (PN->getIncomingValue(i) != Result)
+ return 0; // Not all the same incoming constants...
+
+ // If we reach here, all incoming values are the same constant.
+ return Result;
+ }
+
+ Constant *Op0 = 0;
+ Constant *Op1 = 0;
+
+ if (I->getNumOperands() != 0) { // Get first operand if it's a constant...
+ Op0 = dyn_cast<Constant>(I->getOperand(0));
+ if (Op0 == 0) return 0; // Not a constant?, can't fold
+
+ if (I->getNumOperands() != 1) { // Get second operand if it's a constant...
+ Op1 = dyn_cast<Constant>(I->getOperand(1));
+ if (Op1 == 0) return 0; // Not a constant?, can't fold
+ }
+ }
+
+ switch (I->getOpcode()) {
+ case Instruction::Cast:
+ return ConstRules::get(*Op0)->castTo(Op0, I->getType());
+ case Instruction::Add: return *Op0 + *Op1;
+ case Instruction::Sub: return *Op0 - *Op1;
+ case Instruction::Mul: return *Op0 * *Op1;
+ case Instruction::Div: return *Op0 / *Op1;
+ case Instruction::Rem: return *Op0 % *Op1;
+ case Instruction::And: return *Op0 & *Op1;
+ case Instruction::Or: return *Op0 | *Op1;
+ case Instruction::Xor: return *Op0 ^ *Op1;
+
+ case Instruction::SetEQ: return *Op0 == *Op1;
+ case Instruction::SetNE: return *Op0 != *Op1;
+ case Instruction::SetLE: return *Op0 <= *Op1;
+ case Instruction::SetGE: return *Op0 >= *Op1;
+ case Instruction::SetLT: return *Op0 < *Op1;
+ case Instruction::SetGT: return *Op0 > *Op1;
+ case Instruction::Shl: return *Op0 << *Op1;
+ case Instruction::Shr: return *Op0 >> *Op1;
+ default:
+ return 0;
+ }
+}
+
+Constant *ConstantFoldCastInstruction(const Constant *V, const Type *DestTy) {
+ return ConstRules::get(*V)->castTo(V, DestTy);
+}
+
+Constant *ConstantFoldBinaryInstruction(unsigned Opcode, const Constant *V1,
+ const Constant *V2) {
+ switch (Opcode) {
+ case Instruction::Add: return *V1 + *V2;
+ case Instruction::Sub: return *V1 - *V2;
+ case Instruction::Mul: return *V1 * *V2;
+ case Instruction::Div: return *V1 / *V2;
+ case Instruction::Rem: return *V1 % *V2;
+ case Instruction::And: return *V1 & *V2;
+ case Instruction::Or: return *V1 | *V2;
+ case Instruction::Xor: return *V1 ^ *V2;
+
+ case Instruction::SetEQ: return *V1 == *V2;
+ case Instruction::SetNE: return *V1 != *V2;
+ case Instruction::SetLE: return *V1 <= *V2;
+ case Instruction::SetGE: return *V1 >= *V2;
+ case Instruction::SetLT: return *V1 < *V2;
+ case Instruction::SetGT: return *V1 > *V2;
+ }
+ return 0;
+}
+
+Constant *ConstantFoldShiftInstruction(unsigned Opcode, const Constant *V1,
+ const Constant *V2) {
+ switch (Opcode) {
+ case Instruction::Shl: return *V1 << *V2;
+ case Instruction::Shr: return *V1 >> *V2;
+ default: return 0;
+ }
+}
-namespace opt {
//===----------------------------------------------------------------------===//
// TemplateRules Class
// Redirecting functions that cast to the appropriate types
//===--------------------------------------------------------------------===//
- virtual ConstPoolVal *not(const ConstPoolVal *V) const {
- return SubClassName::Not((const ArgType *)V);
- }
-
-
- virtual ConstPoolVal *add(const ConstPoolVal *V1,
- const ConstPoolVal *V2) const {
+ virtual Constant *add(const Constant *V1, const Constant *V2) const {
return SubClassName::Add((const ArgType *)V1, (const ArgType *)V2);
}
-
- virtual ConstPoolVal *sub(const ConstPoolVal *V1,
- const ConstPoolVal *V2) const {
+ virtual Constant *sub(const Constant *V1, const Constant *V2) const {
return SubClassName::Sub((const ArgType *)V1, (const ArgType *)V2);
}
-
- virtual ConstPoolVal *mul(const ConstPoolVal *V1,
- const ConstPoolVal *V2) const {
+ virtual Constant *mul(const Constant *V1, const Constant *V2) const {
return SubClassName::Mul((const ArgType *)V1, (const ArgType *)V2);
}
+ virtual Constant *div(const Constant *V1, const Constant *V2) const {
+ return SubClassName::Div((const ArgType *)V1, (const ArgType *)V2);
+ }
+ virtual Constant *rem(const Constant *V1, const Constant *V2) const {
+ return SubClassName::Rem((const ArgType *)V1, (const ArgType *)V2);
+ }
+ virtual Constant *op_and(const Constant *V1, const Constant *V2) const {
+ return SubClassName::And((const ArgType *)V1, (const ArgType *)V2);
+ }
+ virtual Constant *op_or(const Constant *V1, const Constant *V2) const {
+ return SubClassName::Or((const ArgType *)V1, (const ArgType *)V2);
+ }
+ virtual Constant *op_xor(const Constant *V1, const Constant *V2) const {
+ return SubClassName::Xor((const ArgType *)V1, (const ArgType *)V2);
+ }
+ virtual Constant *shl(const Constant *V1, const Constant *V2) const {
+ return SubClassName::Shl((const ArgType *)V1, (const ArgType *)V2);
+ }
+ virtual Constant *shr(const Constant *V1, const Constant *V2) const {
+ return SubClassName::Shr((const ArgType *)V1, (const ArgType *)V2);
+ }
- virtual ConstPoolBool *lessthan(const ConstPoolVal *V1,
- const ConstPoolVal *V2) const {
+ virtual ConstantBool *lessthan(const Constant *V1,
+ const Constant *V2) const {
return SubClassName::LessThan((const ArgType *)V1, (const ArgType *)V2);
}
// Casting operators. ick
- virtual ConstPoolBool *castToBool(const ConstPoolVal *V) const {
+ virtual ConstantBool *castToBool(const Constant *V) const {
return SubClassName::CastToBool((const ArgType*)V);
}
- virtual ConstPoolSInt *castToSByte(const ConstPoolVal *V) const {
+ virtual ConstantSInt *castToSByte(const Constant *V) const {
return SubClassName::CastToSByte((const ArgType*)V);
}
- virtual ConstPoolUInt *castToUByte(const ConstPoolVal *V) const {
+ virtual ConstantUInt *castToUByte(const Constant *V) const {
return SubClassName::CastToUByte((const ArgType*)V);
}
- virtual ConstPoolSInt *castToShort(const ConstPoolVal *V) const {
+ virtual ConstantSInt *castToShort(const Constant *V) const {
return SubClassName::CastToShort((const ArgType*)V);
}
- virtual ConstPoolUInt *castToUShort(const ConstPoolVal *V) const {
+ virtual ConstantUInt *castToUShort(const Constant *V) const {
return SubClassName::CastToUShort((const ArgType*)V);
}
- virtual ConstPoolSInt *castToInt(const ConstPoolVal *V) const {
+ virtual ConstantSInt *castToInt(const Constant *V) const {
return SubClassName::CastToInt((const ArgType*)V);
}
- virtual ConstPoolUInt *castToUInt(const ConstPoolVal *V) const {
+ virtual ConstantUInt *castToUInt(const Constant *V) const {
return SubClassName::CastToUInt((const ArgType*)V);
}
- virtual ConstPoolSInt *castToLong(const ConstPoolVal *V) const {
+ virtual ConstantSInt *castToLong(const Constant *V) const {
return SubClassName::CastToLong((const ArgType*)V);
}
- virtual ConstPoolUInt *castToULong(const ConstPoolVal *V) const {
+ virtual ConstantUInt *castToULong(const Constant *V) const {
return SubClassName::CastToULong((const ArgType*)V);
}
- virtual ConstPoolFP *castToFloat(const ConstPoolVal *V) const {
+ virtual ConstantFP *castToFloat(const Constant *V) const {
return SubClassName::CastToFloat((const ArgType*)V);
}
- virtual ConstPoolFP *castToDouble(const ConstPoolVal *V) const {
+ virtual ConstantFP *castToDouble(const Constant *V) const {
return SubClassName::CastToDouble((const ArgType*)V);
}
+ virtual ConstantPointer *castToPointer(const Constant *V,
+ const PointerType *Ty) const {
+ return SubClassName::CastToPointer((const ArgType*)V, Ty);
+ }
//===--------------------------------------------------------------------===//
// Default "noop" implementations
//===--------------------------------------------------------------------===//
- inline static ConstPoolVal *Not(const ArgType *V) { return 0; }
-
- inline static ConstPoolVal *Add(const ArgType *V1, const ArgType *V2) {
- return 0;
- }
- inline static ConstPoolVal *Sub(const ArgType *V1, const ArgType *V2) {
- return 0;
- }
- inline static ConstPoolVal *Mul(const ArgType *V1, const ArgType *V2) {
- return 0;
- }
- inline static ConstPoolBool *LessThan(const ArgType *V1, const ArgType *V2) {
+ static Constant *Add(const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *Sub(const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *Mul(const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *Div(const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *Rem(const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *And(const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *Or (const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *Xor(const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *Shl(const ArgType *V1, const ArgType *V2) { return 0; }
+ static Constant *Shr(const ArgType *V1, const ArgType *V2) { return 0; }
+ static ConstantBool *LessThan(const ArgType *V1, const ArgType *V2) {
return 0;
}
// Casting operators. ick
- inline static ConstPoolBool *CastToBool (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolSInt *CastToSByte (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolUInt *CastToUByte (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolSInt *CastToShort (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolUInt *CastToUShort(const ConstPoolVal *V) { return 0; }
- inline static ConstPoolSInt *CastToInt (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolUInt *CastToUInt (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolSInt *CastToLong (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolUInt *CastToULong (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolFP *CastToFloat (const ConstPoolVal *V) { return 0; }
- inline static ConstPoolFP *CastToDouble(const ConstPoolVal *V) { return 0; }
+ static ConstantBool *CastToBool (const Constant *V) { return 0; }
+ static ConstantSInt *CastToSByte (const Constant *V) { return 0; }
+ static ConstantUInt *CastToUByte (const Constant *V) { return 0; }
+ static ConstantSInt *CastToShort (const Constant *V) { return 0; }
+ static ConstantUInt *CastToUShort(const Constant *V) { return 0; }
+ static ConstantSInt *CastToInt (const Constant *V) { return 0; }
+ static ConstantUInt *CastToUInt (const Constant *V) { return 0; }
+ static ConstantSInt *CastToLong (const Constant *V) { return 0; }
+ static ConstantUInt *CastToULong (const Constant *V) { return 0; }
+ static ConstantFP *CastToFloat (const Constant *V) { return 0; }
+ static ConstantFP *CastToDouble(const Constant *V) { return 0; }
+ static ConstantPointer *CastToPointer(const Constant *,
+ const PointerType *) {return 0;}
};
//
// EmptyRules provides a concrete base class of ConstRules that does nothing
//
-static // EmptyInst is static
-struct EmptyRules : public TemplateRules<ConstPoolVal, EmptyRules> {
-} EmptyInst;
+struct EmptyRules : public TemplateRules<Constant, EmptyRules> {
+};
//
// BoolRules provides a concrete base class of ConstRules for the 'bool' type.
//
-static // BoolTyInst is static...
-struct BoolRules : public TemplateRules<ConstPoolBool, BoolRules> {
+struct BoolRules : public TemplateRules<ConstantBool, BoolRules> {
+
+ static ConstantBool *LessThan(const ConstantBool *V1, const ConstantBool *V2){
+ return ConstantBool::get(V1->getValue() < V2->getValue());
+ }
- inline static ConstPoolVal *Not(const ConstPoolBool *V) {
- return ConstPoolBool::get(!V->getValue());
+ static Constant *And(const ConstantBool *V1, const ConstantBool *V2) {
+ return ConstantBool::get(V1->getValue() & V2->getValue());
}
- inline static ConstPoolVal *Or(const ConstPoolBool *V1,
- const ConstPoolBool *V2) {
- return ConstPoolBool::get(V1->getValue() | V2->getValue());
+ static Constant *Or(const ConstantBool *V1, const ConstantBool *V2) {
+ return ConstantBool::get(V1->getValue() | V2->getValue());
}
- inline static ConstPoolVal *And(const ConstPoolBool *V1,
- const ConstPoolBool *V2) {
- return ConstPoolBool::get(V1->getValue() & V2->getValue());
+ static Constant *Xor(const ConstantBool *V1, const ConstantBool *V2) {
+ return ConstantBool::get(V1->getValue() ^ V2->getValue());
}
-} BoolTyInst;
+};
+
+
+//===----------------------------------------------------------------------===//
+// PointerRules Class
+//===----------------------------------------------------------------------===//
+//
+// PointerRules provides a concrete base class of ConstRules for pointer types
+//
+struct PointerRules : public TemplateRules<ConstantPointer, PointerRules> {
+ static ConstantBool *CastToBool (const Constant *V) {
+ if (V->isNullValue()) return ConstantBool::False;
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantSInt *CastToSByte (const Constant *V) {
+ if (V->isNullValue()) return ConstantSInt::get(Type::SByteTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantUInt *CastToUByte (const Constant *V) {
+ if (V->isNullValue()) return ConstantUInt::get(Type::UByteTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantSInt *CastToShort (const Constant *V) {
+ if (V->isNullValue()) return ConstantSInt::get(Type::ShortTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantUInt *CastToUShort(const Constant *V) {
+ if (V->isNullValue()) return ConstantUInt::get(Type::UShortTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantSInt *CastToInt (const Constant *V) {
+ if (V->isNullValue()) return ConstantSInt::get(Type::IntTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantUInt *CastToUInt (const Constant *V) {
+ if (V->isNullValue()) return ConstantUInt::get(Type::UIntTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantSInt *CastToLong (const Constant *V) {
+ if (V->isNullValue()) return ConstantSInt::get(Type::LongTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantUInt *CastToULong (const Constant *V) {
+ if (V->isNullValue()) return ConstantUInt::get(Type::ULongTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantFP *CastToFloat (const Constant *V) {
+ if (V->isNullValue()) return ConstantFP::get(Type::FloatTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+ static ConstantFP *CastToDouble(const Constant *V) {
+ if (V->isNullValue()) return ConstantFP::get(Type::DoubleTy, 0);
+ return 0; // Can't const prop other types of pointers
+ }
+
+ static ConstantPointer *CastToPointer(const ConstantPointer *V,
+ const PointerType *PTy) {
+ if (V->getType() == PTy)
+ return const_cast<ConstantPointer*>(V); // Allow cast %PTy %ptr to %PTy
+ if (V->isNullValue())
+ return ConstantPointerNull::get(PTy);
+ return 0; // Can't const prop other types of pointers
+ }
+};
//===----------------------------------------------------------------------===//
// different types. This allows the C++ compiler to automatically generate our
// constant handling operations in a typesafe and accurate manner.
//
-template<class ConstPoolClass, class BuiltinType, const Type **Ty>
-struct DirectRules
- : public TemplateRules<ConstPoolClass,
- DirectRules<ConstPoolClass, BuiltinType, Ty> > {
-
- inline static ConstPoolVal *Not(const ConstPoolClass *V) {
- return ConstPoolClass::get(*Ty, !(BuiltinType)V->getValue());;
+template<class ConstantClass, class BuiltinType, Type **Ty, class SuperClass>
+struct DirectRules : public TemplateRules<ConstantClass, SuperClass> {
+ static Constant *Add(const ConstantClass *V1, const ConstantClass *V2) {
+ BuiltinType R = (BuiltinType)V1->getValue() + (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
}
- inline static ConstPoolVal *Add(const ConstPoolClass *V1,
- const ConstPoolClass *V2) {
- BuiltinType Result = (BuiltinType)V1->getValue() +
- (BuiltinType)V2->getValue();
- return ConstPoolClass::get(*Ty, Result);
+ static Constant *Sub(const ConstantClass *V1, const ConstantClass *V2) {
+ BuiltinType R = (BuiltinType)V1->getValue() - (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
}
- inline static ConstPoolVal *Sub(const ConstPoolClass *V1,
- const ConstPoolClass *V2) {
- BuiltinType Result = (BuiltinType)V1->getValue() -
- (BuiltinType)V2->getValue();
- return ConstPoolClass::get(*Ty, Result);
+ static Constant *Mul(const ConstantClass *V1, const ConstantClass *V2) {
+ BuiltinType R = (BuiltinType)V1->getValue() * (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
}
- inline static ConstPoolVal *Mul(const ConstPoolClass *V1,
- const ConstPoolClass *V2) {
- BuiltinType Result = (BuiltinType)V1->getValue() *
- (BuiltinType)V2->getValue();
- return ConstPoolClass::get(*Ty, Result);
+ static Constant *Div(const ConstantClass *V1, const ConstantClass *V2) {
+ if (V2->isNullValue()) return 0;
+ BuiltinType R = (BuiltinType)V1->getValue() / (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
}
- inline static ConstPoolBool *LessThan(const ConstPoolClass *V1,
- const ConstPoolClass *V2) {
- bool Result = (BuiltinType)V1->getValue() < (BuiltinType)V2->getValue();
- return ConstPoolBool::get(Result);
+ static ConstantBool *LessThan(const ConstantClass *V1,
+ const ConstantClass *V2) {
+ bool R = (BuiltinType)V1->getValue() < (BuiltinType)V2->getValue();
+ return ConstantBool::get(R);
}
+ static ConstantPointer *CastToPointer(const ConstantClass *V,
+ const PointerType *PTy) {
+ if (V->isNullValue()) // Is it a FP or Integral null value?
+ return ConstantPointerNull::get(PTy);
+ return 0; // Can't const prop other types of pointers
+ }
+
// Casting operators. ick
#define DEF_CAST(TYPE, CLASS, CTYPE) \
- inline static CLASS *CastTo##TYPE (const ConstPoolClass *V) { \
+ static CLASS *CastTo##TYPE (const ConstantClass *V) { \
return CLASS::get(Type::TYPE##Ty, (CTYPE)(BuiltinType)V->getValue()); \
}
- DEF_CAST(Bool , ConstPoolBool, bool)
- DEF_CAST(SByte , ConstPoolSInt, signed char)
- DEF_CAST(UByte , ConstPoolUInt, unsigned char)
- DEF_CAST(Short , ConstPoolSInt, signed short)
- DEF_CAST(UShort, ConstPoolUInt, unsigned short)
- DEF_CAST(Int , ConstPoolSInt, signed int)
- DEF_CAST(UInt , ConstPoolUInt, unsigned int)
- DEF_CAST(Long , ConstPoolSInt, int64_t)
- DEF_CAST(ULong , ConstPoolUInt, uint64_t)
- DEF_CAST(Float , ConstPoolFP , float)
- DEF_CAST(Double, ConstPoolFP , double)
+ DEF_CAST(Bool , ConstantBool, bool)
+ DEF_CAST(SByte , ConstantSInt, signed char)
+ DEF_CAST(UByte , ConstantUInt, unsigned char)
+ DEF_CAST(Short , ConstantSInt, signed short)
+ DEF_CAST(UShort, ConstantUInt, unsigned short)
+ DEF_CAST(Int , ConstantSInt, signed int)
+ DEF_CAST(UInt , ConstantUInt, unsigned int)
+ DEF_CAST(Long , ConstantSInt, int64_t)
+ DEF_CAST(ULong , ConstantUInt, uint64_t)
+ DEF_CAST(Float , ConstantFP , float)
+ DEF_CAST(Double, ConstantFP , double)
#undef DEF_CAST
};
+
+//===----------------------------------------------------------------------===//
+// DirectIntRules Class
+//===----------------------------------------------------------------------===//
+//
+// DirectIntRules provides implementations of functions that are valid on
+// integer types, but not all types in general.
+//
+template <class ConstantClass, class BuiltinType, Type **Ty>
+struct DirectIntRules
+ : public DirectRules<ConstantClass, BuiltinType, Ty,
+ DirectIntRules<ConstantClass, BuiltinType, Ty> > {
+
+ static Constant *Rem(const ConstantClass *V1,
+ const ConstantClass *V2) {
+ if (V2->isNullValue()) return 0;
+ BuiltinType R = (BuiltinType)V1->getValue() % (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
+ }
+
+ static Constant *And(const ConstantClass *V1, const ConstantClass *V2) {
+ BuiltinType R = (BuiltinType)V1->getValue() & (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
+ }
+ static Constant *Or(const ConstantClass *V1, const ConstantClass *V2) {
+ BuiltinType R = (BuiltinType)V1->getValue() | (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
+ }
+ static Constant *Xor(const ConstantClass *V1, const ConstantClass *V2) {
+ BuiltinType R = (BuiltinType)V1->getValue() ^ (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
+ }
+
+ static Constant *Shl(const ConstantClass *V1, const ConstantClass *V2) {
+ BuiltinType R = (BuiltinType)V1->getValue() << (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
+ }
+
+ static Constant *Shr(const ConstantClass *V1, const ConstantClass *V2) {
+ BuiltinType R = (BuiltinType)V1->getValue() >> (BuiltinType)V2->getValue();
+ return ConstantClass::get(*Ty, R);
+ }
+};
+
+
+//===----------------------------------------------------------------------===//
+// DirectFPRules Class
+//===----------------------------------------------------------------------===//
+//
+// DirectFPRules provides implementations of functions that are valid on
+// floating point types, but not all types in general.
+//
+template <class ConstantClass, class BuiltinType, Type **Ty>
+struct DirectFPRules
+ : public DirectRules<ConstantClass, BuiltinType, Ty,
+ DirectFPRules<ConstantClass, BuiltinType, Ty> > {
+ static Constant *Rem(const ConstantClass *V1, const ConstantClass *V2) {
+ if (V2->isNullValue()) return 0;
+ BuiltinType Result = std::fmod((BuiltinType)V1->getValue(),
+ (BuiltinType)V2->getValue());
+ return ConstantClass::get(*Ty, Result);
+ }
+};
+
+
//===----------------------------------------------------------------------===//
// DirectRules Subclasses
//===----------------------------------------------------------------------===//
// code. Thank goodness C++ compilers are great at stomping out layers of
// templates... can you imagine having to do this all by hand? (/me is lazy :)
//
-static DirectRules<ConstPoolSInt, signed char , &Type::SByteTy> SByteTyInst;
-static DirectRules<ConstPoolUInt, unsigned char , &Type::UByteTy> UByteTyInst;
-static DirectRules<ConstPoolSInt, signed short, &Type::ShortTy> ShortTyInst;
-static DirectRules<ConstPoolUInt, unsigned short, &Type::UShortTy> UShortTyInst;
-static DirectRules<ConstPoolSInt, signed int , &Type::IntTy> IntTyInst;
-static DirectRules<ConstPoolUInt, unsigned int , &Type::UIntTy> UIntTyInst;
-static DirectRules<ConstPoolSInt, int64_t , &Type::LongTy> LongTyInst;
-static DirectRules<ConstPoolUInt, uint64_t , &Type::ULongTy> ULongTyInst;
-static DirectRules<ConstPoolFP , float , &Type::FloatTy> FloatTyInst;
-static DirectRules<ConstPoolFP , double , &Type::DoubleTy> DoubleTyInst;
-
// ConstRules::find - Return the constant rules that take care of the specified
-// type. Note that this is cached in the Type value itself, so switch statement
-// is only hit at most once per type.
+// type.
//
-const ConstRules *ConstRules::find(const Type *Ty) {
- const ConstRules *Result;
+Annotation *ConstRules::find(AnnotationID AID, const Annotable *TyA, void *) {
+ assert(AID == ConstRules::AID && "Bad annotation for factory!");
+ const Type *Ty = cast<Type>((const Value*)TyA);
+
switch (Ty->getPrimitiveID()) {
- case Type::BoolTyID: Result = &BoolTyInst; break;
- case Type::SByteTyID: Result = &SByteTyInst; break;
- case Type::UByteTyID: Result = &UByteTyInst; break;
- case Type::ShortTyID: Result = &ShortTyInst; break;
- case Type::UShortTyID: Result = &UShortTyInst; break;
- case Type::IntTyID: Result = &IntTyInst; break;
- case Type::UIntTyID: Result = &UIntTyInst; break;
- case Type::LongTyID: Result = &LongTyInst; break;
- case Type::ULongTyID: Result = &ULongTyInst; break;
- case Type::FloatTyID: Result = &FloatTyInst; break;
- case Type::DoubleTyID: Result = &DoubleTyInst; break;
- default: Result = &EmptyInst; break;
- }
-
- Ty->setConstRules(Result); // Cache the value for future short circuiting!
- return Result;
+ case Type::BoolTyID: return new BoolRules();
+ case Type::PointerTyID: return new PointerRules();
+ case Type::SByteTyID:
+ return new DirectIntRules<ConstantSInt, signed char , &Type::SByteTy>();
+ case Type::UByteTyID:
+ return new DirectIntRules<ConstantUInt, unsigned char , &Type::UByteTy>();
+ case Type::ShortTyID:
+ return new DirectIntRules<ConstantSInt, signed short, &Type::ShortTy>();
+ case Type::UShortTyID:
+ return new DirectIntRules<ConstantUInt, unsigned short, &Type::UShortTy>();
+ case Type::IntTyID:
+ return new DirectIntRules<ConstantSInt, signed int , &Type::IntTy>();
+ case Type::UIntTyID:
+ return new DirectIntRules<ConstantUInt, unsigned int , &Type::UIntTy>();
+ case Type::LongTyID:
+ return new DirectIntRules<ConstantSInt, int64_t , &Type::LongTy>();
+ case Type::ULongTyID:
+ return new DirectIntRules<ConstantUInt, uint64_t , &Type::ULongTy>();
+ case Type::FloatTyID:
+ return new DirectFPRules<ConstantFP , float , &Type::FloatTy>();
+ case Type::DoubleTyID:
+ return new DirectFPRules<ConstantFP , double , &Type::DoubleTy>();
+ default:
+ return new EmptyRules();
+ }
}
-
-
-} // End namespace opt
projects / oota-llvm.git / blobdiff