1
0
mirror of https://github.com/RPCS3/llvm-mirror.git synced 2024-11-23 03:02:36 +01:00
llvm-mirror/unittests/Frontend/OpenMPParsingTest.cpp
Michael Kruse 550f4597b1 [LLVMFronted][tests] Add basic OpenMP parsing tests.
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
2020-11-17 15:45:19 -06:00

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