[Openmp-commits] [openmp] r258719 - Merging r258695:

[Hans Wennborg via Openmp-commits]

Author: hans
Date: Mon Jan 25 15:09:33 2016
New Revision: 258719

URL: http://llvm.org/viewvc/llvm-project?rev=258719&view=rev
Log:
Merging r258695:
------------------------------------------------------------------------
r258695 | achurbanov | 2016-01-25 08:52:10 -0800 (Mon, 25 Jan 2016) | 1 line

omp_barrier.c test fixed in order to reliably and faster run on any number of processors
------------------------------------------------------------------------

Modified:
    openmp/branches/release_38/   (props changed)
    openmp/branches/release_38/runtime/test/barrier/omp_barrier.c

Propchange: openmp/branches/release_38/
------------------------------------------------------------------------------
--- svn:mergeinfo (original)
+++ svn:mergeinfo Mon Jan 25 15:09:33 2016
@@ -1 +1 @@
-/openmp/trunk:257833,258169,258528
+/openmp/trunk:257833,258169,258528,258695

Modified: openmp/branches/release_38/runtime/test/barrier/omp_barrier.c
URL: http://llvm.org/viewvc/llvm-project/openmp/branches/release_38/runtime/test/barrier/omp_barrier.c?rev=258719&r1=258718&r2=258719&view=diff
==============================================================================
--- openmp/branches/release_38/runtime/test/barrier/omp_barrier.c (original)
+++ openmp/branches/release_38/runtime/test/barrier/omp_barrier.c Mon Jan 25 15:09:33 2016
@@ -15,7 +15,7 @@ int test_omp_barrier()
     int rank;
     rank = omp_get_thread_num ();
     if (rank ==1) {
-      my_sleep(SLEEPTIME);
+      my_sleep(((double)SLEEPTIME)/REPETITIONS); // give 1 sec to whole test
       result2 = 3;
     }
     #pragma omp barrier
@@ -31,10 +31,14 @@ int main()
   int i;
   int num_failed=0;
 
+#ifdef _OPENMP
+  omp_set_dynamic(0); // prevent runtime to change number of threads
+  omp_set_num_threads(4); // the test expects at least 3 threads
   for(i = 0; i < REPETITIONS; i++) {
     if(!test_omp_barrier()) {
       num_failed++;
     }
   }
+#endif
   return num_failed;
 }