diff options
author | Jonathan Peyton <jonathan.l.peyton@intel.com> | 2017-11-13 17:44:48 +0000 |
---|---|---|
committer | Jonathan Peyton <jonathan.l.peyton@intel.com> | 2017-11-13 17:44:48 +0000 |
commit | f902e467b75671d06d1e9ad3663b8aa9366bc14b (patch) | |
tree | d6de4407663a1054506cd8b97d8a047f411e8cd8 /openmp/testsuite/c/omp_for_schedule_static.c | |
parent | 9e3d8f4b39e29e4616e8addb1240530dbdfab2c4 (diff) | |
download | bcm5719-llvm-f902e467b75671d06d1e9ad3663b8aa9366bc14b.tar.gz bcm5719-llvm-f902e467b75671d06d1e9ad3663b8aa9366bc14b.zip |
[OpenMP] Remove the unused testsuite/ directory
The testsuite directory is not used or updated and confuses new users to the
OpenMP project. These tests were rewritten using the lit format and put under
the runtime/test directory. This patch removes the entire testsuite/ directory.
Differential Revision: https://reviews.llvm.org/D39767
llvm-svn: 318056
Diffstat (limited to 'openmp/testsuite/c/omp_for_schedule_static.c')
-rw-r--r-- | openmp/testsuite/c/omp_for_schedule_static.c | 165 |
1 files changed, 0 insertions, 165 deletions
diff --git a/openmp/testsuite/c/omp_for_schedule_static.c b/openmp/testsuite/c/omp_for_schedule_static.c deleted file mode 100644 index d71d7d43930..00000000000 --- a/openmp/testsuite/c/omp_for_schedule_static.c +++ /dev/null @@ -1,165 +0,0 @@ -<ompts:test> -<ompts:testdescription>Test which checks the static option of the omp for schedule directive.</ompts:testdescription> -<ompts:ompversion>2.0</ompts:ompversion> -<ompts:directive>omp for schedule(static)</ompts:directive> -<ompts:dependences>omp for nowait,omp flush,omp critical,omp single</ompts:dependences> -<ompts:testcode> -#include <stdio.h> -#include <unistd.h> -#include <stdlib.h> - -#include "omp_testsuite.h" -#include "omp_my_sleep.h" - -#define NUMBER_OF_THREADS 10 -#define CFSMAX_SIZE 1000 -#define MAX_TIME 0.01 - -#ifdef SLEEPTIME -#undef SLEEPTIME -#define SLEEPTIME 0.0005 -#endif - - -int <ompts:testcode:functionname>omp_for_schedule_static</ompts:testcode:functionname> (FILE * logFile) -{ - int threads; - int i,lasttid; - <ompts:orphan:vars> - int * tids; - int notout; - int maxiter; - int chunk_size; - </ompts:orphan:vars> - int counter = 0; - int tmp_count=1; - int lastthreadsstarttid = -1; - int result = 1; - chunk_size = 7; - - tids = (int *) malloc (sizeof (int) * (CFSMAX_SIZE + 1)); - notout = 1; - maxiter = 0; - -#pragma omp parallel shared(tids,counter) - { /* begin of parallel*/ -#pragma omp single - { - threads = omp_get_num_threads (); - } /* end of single */ - } /* end of parallel */ - - if (threads < 2) - { - printf ("This test only works with at least two threads"); - fprintf (logFile,"This test only works with at least two threads"); - return 0; - } - else - { - fprintf (logFile,"Using an internal count of %d\nUsing a specified chunksize of %d\n", CFSMAX_SIZE, chunk_size); - tids[CFSMAX_SIZE] = -1; /* setting endflag */ -#pragma omp parallel shared(tids) - { /* begin of parallel */ - <ompts:orphan> - double count; - int tid; - int j; - - tid = omp_get_thread_num (); - -#pragma omp for nowait <ompts:check>schedule(static,chunk_size)</ompts:check> - for(j = 0; j < CFSMAX_SIZE; ++j) - { - count = 0.; -#pragma omp flush(maxiter) - if (j > maxiter) - { -#pragma omp critical - { - maxiter = j; - } /* end of critical */ - } - /*printf ("thread %d sleeping\n", tid);*/ - while (notout && (count < MAX_TIME) && (maxiter == j)) - { -#pragma omp flush(maxiter,notout) - my_sleep (SLEEPTIME); - count += SLEEPTIME; - printf("."); - } -#ifdef VERBOSE - if (count > 0.) printf(" waited %lf s\n", count); -#endif - /*printf ("thread %d awake\n", tid);*/ - tids[j] = tid; -#ifdef VERBOSE - printf("%d finished by %d\n",j,tid); -#endif - } /* end of for */ - - notout = 0; -#pragma omp flush(maxiter,notout) - </ompts:orphan> - } /* end of parallel */ - - /**** analysing the data in array tids ****/ - - lasttid = tids[0]; - tmp_count = 0; - - for (i = 0; i < CFSMAX_SIZE + 1; ++i) - { - /* If the work was done by the same thread increase tmp_count by one. */ - if (tids[i] == lasttid) { - tmp_count++; -#ifdef VERBOSE - fprintf (logFile, "%d: %d \n", i, tids[i]); -#endif - continue; - } - - /* Check if the next thread had has the right thread number. When finding - * threadnumber -1 the end should be reached. - */ - if (tids[i] == (lasttid + 1) % threads || tids[i] == -1) { - /* checking for the right chunk size */ - if (tmp_count == chunk_size) { - tmp_count = 1; - lasttid = tids[i]; -#ifdef VERBOSE - fprintf (logFile, "OK\n"); -#endif - } - /* If the chunk size was wrong, check if the end was reached */ - else { - if (tids[i] == -1) { - if (i == CFSMAX_SIZE) { - fprintf (logFile, "Last thread had chunk size %d\n", tmp_count); - break; - } - else { - fprintf (logFile, "ERROR: Last thread (thread with number -1) was found before the end.\n"); - result = 0; - } - } - else { - fprintf (logFile, "ERROR: chunk size was %d. (assigned was %d)\n", tmp_count, chunk_size); - result = 0; - } - } - } - else { - fprintf(logFile, "ERROR: Found thread with number %d (should be inbetween 0 and %d).", tids[i], threads - 1); - result = 0; - } -#ifdef VERBOSE - fprintf (logFile, "%d: %d \n", i, tids[i]); -#endif - } - } - - return result; -} -</ompts:testcode> -</ompts:test> |