DBM: Add extra brackets to make icc happy

cp2k · Aug 17, 2022 · 8bb6afe · 8bb6afe
1 parent 260e8c7
commit 8bb6afe
Showing 1 changed file with 6 additions and 3 deletions.
diff --git a/src/dbm/dbm_multiply_comm.c b/src/dbm/dbm_multiply_comm.c
@@ -440,10 +440,13 @@ static dbm_packed_matrix_t pack_matrix(const bool trans_matrix,
 
     // Add data_recv_displ to recveived block offsets.
 #pragma omp parallel
-    for (int irank = 0; irank < nranks; irank++) {
+    { // Extra brackets needed to prevent deadlock with Intel compiler.
+      for (int irank = 0; irank < nranks; irank++) {
 #pragma omp for
-      for (int i = 0; i < blks_recv_count[irank]; i++) {
-        blks_recv[blks_recv_displ[irank] + i].offset += data_recv_displ[irank];
+        for (int i = 0; i < blks_recv_count[irank]; i++) {
+          blks_recv[blks_recv_displ[irank] + i].offset +=
+              data_recv_displ[irank];
+        }
       }
     }