614c7ef81c
This change introduces a check-libomp target which is based upon llvm's lit test infrastructure. Each test (generated from the University of Houston's OpenMP testsuite) is compiled and then run. For each test, an exit status of 0 indicates success and non-zero indicates failure. This way, FileCheck is not needed. I've added a bit of logic to generate symlinks (libiomp5 and libgomp) in the build tree so that gcc can be tested as well. When building out-of- tree builds, the user will have to provide llvm-lit either by specifying -DLIBOMP_LLVM_LIT_EXECUTABLE or having llvm-lit in their PATH. Differential Revision: http://reviews.llvm.org/D11821 llvm-svn: 248211
54 lines
1.1 KiB
C
54 lines
1.1 KiB
C
// RUN: %libomp-compile-and-run
|
|
#include <stdio.h>
|
|
#include <math.h>
|
|
#include "omp_testsuite.h"
|
|
|
|
/* Utility function do spend some time in a loop */
|
|
int test_omp_task_private()
|
|
{
|
|
int i;
|
|
int known_sum;
|
|
int sum = 0;
|
|
int result = 0; /* counts the wrong sums from tasks */
|
|
|
|
known_sum = (LOOPCOUNT * (LOOPCOUNT + 1)) / 2;
|
|
|
|
#pragma omp parallel
|
|
{
|
|
#pragma omp single
|
|
{
|
|
for (i = 0; i < NUM_TASKS; i++) {
|
|
#pragma omp task private(sum) shared(result, known_sum)
|
|
{
|
|
int j;
|
|
//if sum is private, initialize to 0
|
|
sum = 0;
|
|
for (j = 0; j <= LOOPCOUNT; j++) {
|
|
#pragma omp flush
|
|
sum += j;
|
|
}
|
|
/* check if calculated sum was right */
|
|
if (sum != known_sum) {
|
|
#pragma omp critical
|
|
result++;
|
|
}
|
|
} /* end of omp task */
|
|
} /* end of for */
|
|
} /* end of single */
|
|
} /* end of parallel*/
|
|
return (result == 0);
|
|
}
|
|
|
|
int main()
|
|
{
|
|
int i;
|
|
int num_failed=0;
|
|
|
|
for(i = 0; i < REPETITIONS; i++) {
|
|
if(!test_omp_task_private()) {
|
|
num_failed++;
|
|
}
|
|
}
|
|
return num_failed;
|
|
}
|