The last active KSMP preprocessor flag is replaced by USEOMP.

exciting · Jul 18, 2014 · 9391ed7 · 9391ed7
1 parent 99b2530
commit 9391ed7
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/bandstr.f90 b/src/bandstr.f90
@@ -149,7 +149,7 @@ Subroutine bandstr
   splittfile = .True.
   Do ik = firstk (rank), lastk (rank)
 #endif
-#ifdef KSMP
+#ifdef USEOMP
      !$OMP PARALLEL DEFAULT(SHARED) &
      !$OMP PRIVATE(evalfv,evecfv,evecsv) &
      !$OMP PRIVATE(dmat,apwalm) &
@@ -224,7 +224,7 @@ Subroutine bandstr
      Call MPI_barrier(MPI_COMM_WORLD, ierr)
 #endif
 
-#ifdef KSMP
+#ifdef USEOMP
      !$OMP END DO
      !$OMP END PARALLEL
 #endif