remove-openmp-warning
authorDebian Science Team <debian-science-maintainers@lists.alioth.debian.org>
Fri, 7 Sep 2018 14:32:43 +0000 (15:32 +0100)
committerSébastien Villemot <sebastien@debian.org>
Fri, 7 Sep 2018 14:32:43 +0000 (15:32 +0100)
Gbp-Pq: Name remove-openmp-warning.patch

driver/others/blas_server.c

index 1d7f570d89766212940e296d12e9dc54437a3560..d8f66bc6728df67a0485593426beabc318b670f3 100644 (file)
@@ -796,16 +796,6 @@ int exec_blas(BLASLONG num, blas_queue_t *queue){
   fprintf(STDERR, "Exec_blas is called. Number of executing threads : %ld\n", num);
 #endif
 
-#ifdef __ELF__
-  if (omp_in_parallel && (num > 1)) {
-    if (omp_in_parallel() > 0) {
-      fprintf(stderr,
-             "OpenBLAS Warning : Detect OpenMP Loop and this application may hang. "
-             "Please rebuild the library with USE_OPENMP=1 option.\n");
-    }
-  }
-#endif
-
   if ((num > 1) && queue -> next) exec_blas_async(1, queue -> next);
 
 #ifdef TIMING_DEBUG