mirror of
https://github.com/RPCS3/llvm-mirror.git
synced 2024-11-25 20:23:11 +01:00
550f4597b1
As noticed in D91470, some of the functions of LLVMFrontend, are not tested within the library itself (but indirectly by its users clang and flang). In particular, the file OMP.cpp which is generated by tablegen was not tested at all. Add tests for the parsing helpers in OMP.cpp. These are not meant to be exhaustive tests, just to ensure that we have some basic tests for all API functions. Reviewed By: clementval Differential Revision: https://reviews.llvm.org/D91643
85 lines
3.1 KiB
C++
85 lines
3.1 KiB
C++
//===- llvm/unittest/IR/OpenMPIRParsingTest.cpp ---------------------------===//
|
|
//
|
|
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
|
|
// See https://llvm.org/LICENSE.txt for license information.
|
|
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "llvm/Frontend/OpenMP/OMPConstants.h"
|
|
#include "gtest/gtest.h"
|
|
|
|
using namespace llvm;
|
|
using namespace llvm::omp;
|
|
|
|
namespace {
|
|
|
|
TEST(OpenMPParsingTest, OpenMPDirectiveKind) {
|
|
EXPECT_EQ(getOpenMPDirectiveKind("foobar"), OMPD_unknown);
|
|
|
|
EXPECT_EQ(getOpenMPDirectiveKind("for"), OMPD_for);
|
|
EXPECT_EQ(getOpenMPDirectiveKind("simd"), OMPD_simd);
|
|
EXPECT_EQ(getOpenMPDirectiveKind("for simd"), OMPD_for_simd);
|
|
}
|
|
|
|
TEST(OpenMPParsingTest, getOpenMPDirectiveName) {
|
|
EXPECT_EQ(getOpenMPDirectiveName(OMPD_unknown), "unknown");
|
|
|
|
EXPECT_EQ(getOpenMPDirectiveName(OMPD_for), "for");
|
|
EXPECT_EQ(getOpenMPDirectiveName(OMPD_simd), "simd");
|
|
EXPECT_EQ(getOpenMPDirectiveName(OMPD_for_simd), "for simd");
|
|
}
|
|
|
|
TEST(OpenMPParsingTest, getOpenMPClauseKind) {
|
|
EXPECT_EQ(getOpenMPClauseKind("foobar"), OMPC_unknown);
|
|
|
|
EXPECT_EQ(getOpenMPClauseKind("schedule"), OMPC_schedule);
|
|
EXPECT_EQ(getOpenMPClauseKind("if"), OMPC_if);
|
|
}
|
|
|
|
TEST(OpenMPParsingTest, getOpenMPClauseName) {
|
|
EXPECT_EQ(getOpenMPClauseName(OMPC_unknown), "unknown");
|
|
|
|
EXPECT_EQ(getOpenMPClauseName(OMPC_schedule), "schedule");
|
|
EXPECT_EQ(getOpenMPClauseName(OMPC_if), "if");
|
|
}
|
|
|
|
TEST(OpenMPParsingTest, isAllowedClauseForDirective) {
|
|
EXPECT_TRUE(isAllowedClauseForDirective(OMPD_for, OMPC_schedule, 30));
|
|
EXPECT_FALSE(isAllowedClauseForDirective(OMPD_for, OMPC_num_teams, 30));
|
|
|
|
EXPECT_FALSE(isAllowedClauseForDirective(OMPD_for, OMPC_order, 30));
|
|
EXPECT_FALSE(isAllowedClauseForDirective(OMPD_for, OMPC_order, 45));
|
|
EXPECT_TRUE(isAllowedClauseForDirective(OMPD_for, OMPC_order, 50));
|
|
EXPECT_TRUE(isAllowedClauseForDirective(OMPD_for, OMPC_order, 51));
|
|
}
|
|
|
|
TEST(OpenMPParsingTest, getOrderKind) {
|
|
EXPECT_EQ(getOrderKind("foobar"), OMP_ORDER_concurrent);
|
|
EXPECT_EQ(getOrderKind("default"), OMP_ORDER_concurrent);
|
|
}
|
|
|
|
TEST(OpenMPParsingTest, getProcBindKind) {
|
|
EXPECT_EQ(getProcBindKind("foobar"), OMP_PROC_BIND_unknown);
|
|
|
|
EXPECT_EQ(getProcBindKind("master"), OMP_PROC_BIND_master);
|
|
EXPECT_EQ(getProcBindKind("close"), OMP_PROC_BIND_close);
|
|
EXPECT_EQ(getProcBindKind("spread"), OMP_PROC_BIND_spread);
|
|
EXPECT_EQ(getProcBindKind("default"), OMP_PROC_BIND_default);
|
|
EXPECT_EQ(getProcBindKind("unknown"), OMP_PROC_BIND_unknown);
|
|
}
|
|
|
|
TEST(OpenMPParsingTest, getScheduleKind) {
|
|
EXPECT_EQ(getScheduleKind("foobar"), OMP_SCHEDULE_Default);
|
|
|
|
// FIXME: Why are these not lower case?
|
|
EXPECT_EQ(getScheduleKind("Static"), OMP_SCHEDULE_Static);
|
|
EXPECT_EQ(getScheduleKind("Dynamic"), OMP_SCHEDULE_Dynamic);
|
|
EXPECT_EQ(getScheduleKind("Guided"), OMP_SCHEDULE_Guided);
|
|
EXPECT_EQ(getScheduleKind("Auto"), OMP_SCHEDULE_Auto);
|
|
EXPECT_EQ(getScheduleKind("Runtime"), OMP_SCHEDULE_Runtime);
|
|
EXPECT_EQ(getScheduleKind("Default"), OMP_SCHEDULE_Default);
|
|
}
|
|
|
|
} // namespace
|