RPCS3/llvm
1
0
Fork 0
mirror of https://github.com/RPCS3/llvm.git synced 2025-04-05 14:52:02 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

* Add constant folding for additional floating point library calls such as

Browse Source 
sinh, cosh, etc.
* Make the name comparisons for the fp libcalls a little more efficient by
  switching on the first character of the name before doing comparisons.


git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@21611 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Reid Spencer 2005-04-28 23:01:59 +00:00
parent 2c56e8a23e
commit 1d3b71846b
1 changed files with 90 additions and 26 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

116
lib/Transforms/Utils/Local.cpp
View File

@ -242,9 +242,29 @@ bool llvm::canConstantFoldCallTo(Function *F) {
default: break; default: break;
} }
return Name == "sin" || Name == "cos" || Name == "tan" || Name == "sqrt" || switch (Name[0])
Name == "log" || Name == "log10" || Name == "exp" || Name == "pow" || {
Name == "acos" || Name == "asin" || Name == "atan" || Name == "fmod"; case 'a':
return Name == "acos" || Name == "asin" || Name == "atan" ||
Name == "atan2";
case 'c':
return Name == "ceil" || Name == "cos" || Name == "cosf" ||
Name == "cosh";
case 'e':
return Name == "exp";
case 'f':
return Name == "fabs" || Name == "fmod" || Name == "floor";
case 'l':
return Name == "log" || Name == "log10";
case 'p':
return Name == "pow";
case 's':
return Name == "sin" || Name == "sinh" || Name == "sqrt";
case 't':
return Name == "tan" || Name == "tanh";
default:
return false;
}
} }
static Constant *ConstantFoldFP(double (*NativeFP)(double), double V, static Constant *ConstantFoldFP(double (*NativeFP)(double), double V,
@ -266,31 +286,63 @@ Constant *llvm::ConstantFoldCall(Function *F,
if (Operands.size() == 1) { if (Operands.size() == 1) {
if (ConstantFP *Op = dyn_cast<ConstantFP>(Operands[0])) { if (ConstantFP *Op = dyn_cast<ConstantFP>(Operands[0])) {
double V = Op->getValue(); double V = Op->getValue();
if (Name == "sin") switch (Name[0])
return ConstantFP::get(Ty, sin(V)); {
else if (Name == "cos") case 'a':
return ConstantFP::get(Ty, cos(V)); if (Name == "acos")
else if (Name == "tan") return ConstantFoldFP(acos, V, Ty);
return ConstantFP::get(Ty, tan(V)); else if (Name == "asin")
else if (Name == "sqrt" && V >= 0) return ConstantFoldFP(asin, V, Ty);
return ConstantFP::get(Ty, sqrt(V)); else if (Name == "atan")
else if (Name == "exp") return ConstantFP::get(Ty, atan(V));
return ConstantFP::get(Ty, exp(V)); break;
else if (Name == "log" && V > 0) case 'c':
return ConstantFP::get(Ty, log(V)); if (Name == "ceil")
else if (Name == "log10") return ConstantFoldFP(ceil, V, Ty);
return ConstantFoldFP(log10, V, Ty); else if (Name == "cos")
else if (Name == "acos") return ConstantFP::get(Ty, cos(V));
return ConstantFoldFP(acos, V, Ty); else if (Name == "cosh")
else if (Name == "asin") return ConstantFP::get(Ty, cosh(V));
return ConstantFoldFP(asin, V, Ty); break;
else if (Name == "atan") case 'e':
return ConstantFP::get(Ty, atan(V)); if (Name == "exp")
return ConstantFP::get(Ty, exp(V));
break;
case 'f':
if (Name == "fabs")
return ConstantFP::get(Ty, fabs(V));
else if (Name == "floor")
return ConstantFoldFP(floor, V, Ty);
break;
case 'l':
if (Name == "log" && V > 0)
return ConstantFP::get(Ty, log(V));
else if (Name == "log10" && V > 0)
return ConstantFoldFP(log10, V, Ty);
break;
case 's':
if (Name == "sin")
return ConstantFP::get(Ty, sin(V));
else if (Name == "sinh")
return ConstantFP::get(Ty, sinh(V));
else if (Name == "sqrt" && V >= 0)
return ConstantFP::get(Ty, sqrt(V));
break;
case 't':
if (Name == "tan")
return ConstantFP::get(Ty, tan(V));
else if (Name == "tanh")
return ConstantFP::get(Ty, tanh(V));
break;
default:
break;
}
} }
} else if (Operands.size() == 2) { } else if (Operands.size() == 2) {
if (ConstantFP *Op1 = dyn_cast<ConstantFP>(Operands[0])) if (ConstantFP *Op1 = dyn_cast<ConstantFP>(Operands[0])) {
double Op1V = Op1->getValue();
if (ConstantFP *Op2 = dyn_cast<ConstantFP>(Operands[1])) { if (ConstantFP *Op2 = dyn_cast<ConstantFP>(Operands[1])) {
double Op1V = Op1->getValue(), Op2V = Op2->getValue(); double Op2V = Op2->getValue();
if (Name == "llvm.isunordered") if (Name == "llvm.isunordered")
return ConstantBool::get(IsNAN(Op1V) || IsNAN(Op2V)); return ConstantBool::get(IsNAN(Op1V) || IsNAN(Op2V));
@ -305,8 +357,20 @@ Constant *llvm::ConstantFoldCall(Function *F,
double V = fmod(Op1V, Op2V); double V = fmod(Op1V, Op2V);
if (errno == 0) if (errno == 0)
return ConstantFP::get(Ty, V); return ConstantFP::get(Ty, V);
} } else if (Name == "atan2")
return ConstantFP::get(Ty, atan2(Op1V,Op2V));
} }
else if (Name == "pow" && Op1V == 1.0) {
return ConstantFP::get(Ty,1.0);
}
} else if (ConstantFP* Op2 = dyn_cast<ConstantFP>(Operands[1])) {
double Op2V = Op2->getValue();
if (Name == "pow")
if (Op2V == 0.0)
return ConstantFP::get(Ty,1.0);
else if (Op2V == 1.0)
return Operands[0];
}
} }
return 0; return 0;
} }