Merge pull request Reference-LAPACK#380 from martin-frbg/openmp4

Allow compilation with OpenMP 3.x
chrwarm · Apr 15, 2021 · 2614d23 · 2614d23
2 parents f97e867 + 3e5c803
commit 2614d23
Show file tree

Hide file tree

Showing 4 changed files with 5 additions and 4 deletions.
diff --git a/SRC/chetrd_hb2st.F b/SRC/chetrd_hb2st.F
@@ -509,7 +509,7 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB,
 *
 *                         Call the kernel
 *                             
-#if defined(_OPENMP)
+#if defined(_OPENMP) && _OPENMP >= 201307
                           IF( TTYPE.NE.1 ) THEN      
 !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1))
 !$OMP$     DEPEND(in:WORK(MYID-1))

diff --git a/SRC/dsytrd_sb2st.F b/SRC/dsytrd_sb2st.F
@@ -478,7 +478,7 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB,
 *
 *                         Call the kernel
 *                             
-#if defined(_OPENMP)
+#if defined(_OPENMP) &&  _OPENMP >= 201307
                           IF( TTYPE.NE.1 ) THEN      
 !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1))
 !$OMP$     DEPEND(in:WORK(MYID-1))

diff --git a/SRC/ssytrd_sb2st.F b/SRC/ssytrd_sb2st.F
@@ -478,7 +478,7 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB,
 *
 *                         Call the kernel
 *                             
-#if defined(_OPENMP)
+#if defined(_OPENMP) && _OPENMP >= 201307
                           IF( TTYPE.NE.1 ) THEN      
 !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1))
 !$OMP$     DEPEND(in:WORK(MYID-1))

diff --git a/SRC/zhetrd_hb2st.F b/SRC/zhetrd_hb2st.F
@@ -509,7 +509,8 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB,
 *
 *                         Call the kernel
 *                             
-#if defined(_OPENMP)
+#if defined(_OPENMP) &&  _OPENMP >= 201307
+
                           IF( TTYPE.NE.1 ) THEN      
 !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1))
 !$OMP$     DEPEND(in:WORK(MYID-1))