Browse Source

Restore outer loop of blas_buffer_inuse setup

tags/v0.3.27
Martin Kroeker GitHub 1 year ago
parent
commit
88b5330ae7
No known key found for this signature in database GPG Key ID: B5690EEEBB952194
1 changed files with 4 additions and 1 deletions
  1. +4
    -1
      driver/others/blas_server_omp.c

+ 4
- 1
driver/others/blas_server_omp.c View File

@@ -407,6 +407,7 @@ int exec_blas(BLASLONG num, blas_queue_t *queue){
} }
#endif #endif


while (true) {
for(i=0; i < MAX_PARALLEL_NUMBER; i++) { for(i=0; i < MAX_PARALLEL_NUMBER; i++) {
#ifdef HAVE_C11 #ifdef HAVE_C11
_Bool inuse = false; _Bool inuse = false;
@@ -419,7 +420,9 @@ int exec_blas(BLASLONG num, blas_queue_t *queue){
break; break;
} }
} }

if (i != MAX_PARALLEL_NUMBER)
break;
}
if (openblas_omp_adaptive_env() != 0) { if (openblas_omp_adaptive_env() != 0) {
#pragma omp parallel for num_threads(num) schedule(OMP_SCHED) #pragma omp parallel for num_threads(num) schedule(OMP_SCHED)
for (i = 0; i < num; i ++) { for (i = 0; i < num; i ++) {


Loading…
Cancel
Save