[flang] Remove obsolete code

Original-commit: flang-compiler/f18@81a97453a8
Reviewed-on: https://github.com/flang-compiler/f18/pull/623
This commit is contained in:
peter klausler 2019-08-05 12:47:43 -07:00
parent 58f93ac714
commit bef468fbfd
1 changed files with 0 additions and 24 deletions

View File

@ -545,30 +545,6 @@ Expr<T> FoldOperation(FoldingContext &context, FunctionRef<T> &&funcRef) {
return Expr<T>{std::move(funcRef)};
}
// TODO pmk rm
template<typename RESULT, typename TO, typename FROM>
Expr<RESULT> SIGN(
FoldingContext &context, const Scalar<TO> &to, const Scalar<FROM> &from) {
bool isNegative{false};
if constexpr (FROM::category == TypeCategory::Integer) {
isNegative = from.IsNegative();
} else {
static_assert(FROM::category == TypeCategory::Real);
isNegative = from.IsSignBitSet();
}
if constexpr (TO::category == TypeCategory::Integer) {
auto result{to.SIGN(isNegative)};
if (result.overflow) {
context.messages().Say(
"SIGN() folding overflows integer(kind=%d)"_en_US, TO::kind);
}
return Expr<RESULT>{Constant<RESULT>{std::move(result.value)}};
} else {
static_assert(TO::category == TypeCategory::Real);
return Expr<RESULT>{Constant<RESULT>{to.SIGN(isNegative)}};
}
}
template<int KIND>
Expr<Type<TypeCategory::Integer, KIND>> FoldIntrinsicFunction(
FoldingContext &context,