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_ordered.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_ordered.c')
-rw-r--r-- | openmp/testsuite/c/omp_for_ordered.c | 60 |
1 files changed, 0 insertions, 60 deletions
diff --git a/openmp/testsuite/c/omp_for_ordered.c b/openmp/testsuite/c/omp_for_ordered.c deleted file mode 100644 index 6297d04a5e5..00000000000 --- a/openmp/testsuite/c/omp_for_ordered.c +++ /dev/null @@ -1,60 +0,0 @@ -<ompts:test> -<ompts:testdescription>Test which checks the omp ordered directive by counting up an variable in an parallelized loop and watching each iteration if the sumand is larger as the last one.</ompts:testdescription> -<ompts:ompversion>2.0</ompts:ompversion> -<ompts:directive>omp for ordered</ompts:directive> -<ompts:dependences>omp critical,omp for schedule</ompts:dependences> -<ompts:testcode> -#include <stdio.h> -#include <math.h> - -#include "omp_testsuite.h" - -static int last_i = 0; - -/* Utility function to check that i is increasing monotonically - with each call */ -static int check_i_islarger (int i) -{ - int islarger; - islarger = (i > last_i); - last_i = i; - return (islarger); -} - -int <ompts:testcode:functionname>omp_for_ordered</ompts:testcode:functionname> (FILE * logFile) -{ - <ompts:orphan:vars> - int sum; - int is_larger = 1; - </ompts:orphan:vars> - int known_sum; - - last_i = 0; - sum = 0; - -#pragma omp parallel - { - <ompts:orphan> - int i; - int my_islarger = 1; -#pragma omp for schedule(static,1) ordered - for (i = 1; i < 100; i++) - { - <ompts:check>#pragma omp ordered</ompts:check> - { - my_islarger = check_i_islarger(i) && my_islarger; - sum = sum + i; - } /* end of ordered */ - } /* end of for */ -#pragma omp critical - { - is_larger = is_larger && my_islarger; - } /* end of critical */ - </ompts:orphan> - } - - known_sum=(99 * 100) / 2; - return ((known_sum == sum) && is_larger); -} -</ompts:testcode> -</ompts:test> |