Restore outer loop of blas_buffer_inuse setup

martin-frbg · Mar 24, 2024 · 88b5330 · 88b5330
1 parent 52b71a1
commit 88b5330
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/driver/others/blas_server_omp.c b/driver/others/blas_server_omp.c
@@ -407,6 +407,7 @@ int exec_blas(BLASLONG num, blas_queue_t *queue){
   }
 #endif
 
+while (true) {
     for(i=0; i < MAX_PARALLEL_NUMBER; i++) {
 #ifdef HAVE_C11
       _Bool inuse = false;
@@ -419,7 +420,9 @@ int exec_blas(BLASLONG num, blas_queue_t *queue){
         break;
       }
     }
-
+    if (i != MAX_PARALLEL_NUMBER)
+	    break;
+}
 if (openblas_omp_adaptive_env() != 0) {
 #pragma omp parallel for num_threads(num) schedule(OMP_SCHED)
   for (i = 0; i < num; i ++) {