moved declaration of istat and errorMessage outside #ifdef WITH_OPENMP because...

moved declaration of istat and errorMessage outside #ifdef WITH_OPENMP because otherwise it doesn't compile

moved declaration of istat and errorMessage outside #ifdef WITH_OPENMP because...
moved declaration of istat and errorMessage outside #ifdef WITH_OPENMP because otherwise it doesn't compile
c0930af0 · Angerer, Christoph (cangerer) · bb63bd9e · c0930af0
Commit c0930af0 authored Feb 26, 2016 by Angerer, Christoph (cangerer)
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

src/elpa1_compute.F90 src/elpa1_compute.F90 +2 -2

No files found.
--- a/src/elpa1_compute.F90
+++ b/src/elpa1_compute.F90
@@ -2866,11 +2866,11 @@ module ELPA1_compute

      logical, intent(in)           :: wantDebug
      logical, intent(out)          :: success
+      integer(kind=ik)              :: istat
+      character(200)                :: errorMessage
 #ifdef WITH_OPENMP
      integer(kind=ik)              :: max_threads, my_thread
      integer(kind=ik)              :: omp_get_max_threads, omp_get_thread_num
-      integer(kind=ik)              :: istat
-      character(200)                :: errorMessage

      max_threads = omp_get_max_threads()