maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity

[flang] Cleaned folding test helper template 

Original-commit: flang-compiler/f18@b402c0a09c
This commit is contained in:
Jean Perier 2019-01-25 03:24:31 -08:00
parent fd8e708108
commit 8453e1bc13
1 changed files with 8 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
flang/test/evaluate/folding.cc
View File

@ -20,30 +20,26 @@
using namespace Fortran::evaluate;
// helpers to call functions on all types from tuple
template<typename... T> static void VariadicCallHelper(const T... args) {
return;
}
// helper to call functions on all types from tuple
template<typename... T> struct RunOnTypes {};
template<typename Test, typename... T>
static void VariadicCallHelper(const std::tuple<T...> dummy) {
VariadicCallHelper(Test::template Run<T>()...);
return;
}
struct RunOnTypes<Test, std::tuple<T...>> {
static void Run() { (..., Test::template Run<T>()); }
};
struct TestGetScalarConstantValue {
template<typename T> static bool Run() {
template<typename T> static void Run() {
Expr<T> exprFullyTyped{Constant<T>{Scalar<T>{}}};
Expr<SomeKind<T::category>> exprSomeKind{exprFullyTyped};
Expr<SomeType> exprSomeType{exprSomeKind};
TEST(GetScalarConstantValue<T>(exprFullyTyped) != nullptr);
TEST(GetScalarConstantValue<T>(exprSomeKind) != nullptr);
TEST(GetScalarConstantValue<T>(exprSomeType) != nullptr);
return true;
}
};
int main() {
VariadicCallHelper<TestGetScalarConstantValue>(AllIntrinsicTypes{});
using TestTypes = AllIntrinsicTypes;
RunOnTypes<TestGetScalarConstantValue, TestTypes>::Run();
return testing::Complete();
}