diff --git a/LAPACKE/utils/lapacke_ctz_trans.c b/LAPACKE/utils/lapacke_ctz_trans.c
index 8910aee7da..0abe03d283 100644
--- a/LAPACKE/utils/lapacke_ctz_trans.c
+++ b/LAPACKE/utils/lapacke_ctz_trans.c
@@ -147,7 +147,7 @@ void LAPACKE_ctz_trans( int matrix_layout, char direct, char uplo,
     }
 
     /* Copy & transpose triangular part */
-    return LAPACKE_ctr_trans( matrix_layout, uplo, diag, tri_n,
-                              &in[tri_in_offset], ldin,
-                              &out[tri_out_offset], ldout );
+    LAPACKE_ctr_trans( matrix_layout, uplo, diag, tri_n,
+                       &in[tri_in_offset], ldin,
+                       &out[tri_out_offset], ldout );
 }
diff --git a/LAPACKE/utils/lapacke_dtz_trans.c b/LAPACKE/utils/lapacke_dtz_trans.c
index 80d94ead90..f53e03adcf 100644
--- a/LAPACKE/utils/lapacke_dtz_trans.c
+++ b/LAPACKE/utils/lapacke_dtz_trans.c
@@ -147,7 +147,7 @@ void LAPACKE_dtz_trans( int matrix_layout, char direct, char uplo,
     }
 
     /* Copy & transpose triangular part */
-    return LAPACKE_dtr_trans( matrix_layout, uplo, diag, tri_n,
-                              &in[tri_in_offset], ldin,
-                              &out[tri_out_offset], ldout );
+    LAPACKE_dtr_trans( matrix_layout, uplo, diag, tri_n,
+                       &in[tri_in_offset], ldin,
+                       &out[tri_out_offset], ldout );
 }
diff --git a/LAPACKE/utils/lapacke_stz_trans.c b/LAPACKE/utils/lapacke_stz_trans.c
index 793f3833d4..bdb4279572 100644
--- a/LAPACKE/utils/lapacke_stz_trans.c
+++ b/LAPACKE/utils/lapacke_stz_trans.c
@@ -147,7 +147,7 @@ void LAPACKE_stz_trans( int matrix_layout, char direct, char uplo,
     }
 
     /* Copy & transpose triangular part */
-    return LAPACKE_str_trans( matrix_layout, uplo, diag, tri_n,
-                              &in[tri_in_offset], ldin,
-                              &out[tri_out_offset], ldout );
+    LAPACKE_str_trans( matrix_layout, uplo, diag, tri_n,
+                       &in[tri_in_offset], ldin,
+                       &out[tri_out_offset], ldout );
 }
diff --git a/LAPACKE/utils/lapacke_ztz_trans.c b/LAPACKE/utils/lapacke_ztz_trans.c
index 881052331e..fa4bb94c5f 100644
--- a/LAPACKE/utils/lapacke_ztz_trans.c
+++ b/LAPACKE/utils/lapacke_ztz_trans.c
@@ -147,7 +147,7 @@ void LAPACKE_ztz_trans( int matrix_layout, char direct, char uplo,
     }
 
     /* Copy & transpose triangular part */
-    return LAPACKE_ztr_trans( matrix_layout, uplo, diag, tri_n,
-                              &in[tri_in_offset], ldin,
-                              &out[tri_out_offset], ldout );
+    LAPACKE_ztr_trans( matrix_layout, uplo, diag, tri_n,
+                       &in[tri_in_offset], ldin,
+                       &out[tri_out_offset], ldout );
 }
diff --git a/TESTING/EIG/derred.f b/TESTING/EIG/derred.f
index 6df5178253..11a9320526 100644
--- a/TESTING/EIG/derred.f
+++ b/TESTING/EIG/derred.f
@@ -99,7 +99,7 @@ SUBROUTINE DERRED( PATH, NUNIT )
 *     ..
 *     .. External Subroutines ..
       EXTERNAL           CHKXER, DGEES, DGEESX, DGEEV, DGEEVX, DGEJSV,
-     $                   DGESDD, DGESVD, DGESVDX, DGESVQ
+     $                   DGESDD, DGESVD, DGESVDX, DGESVDQ
 *     ..
 *     .. External Functions ..
       LOGICAL            DSLECT, LSAMEN
diff --git a/TESTING/EIG/zerred.f b/TESTING/EIG/zerred.f
index d1219c02b9..1876c1f1d7 100644
--- a/TESTING/EIG/zerred.f
+++ b/TESTING/EIG/zerred.f
@@ -100,7 +100,7 @@ SUBROUTINE ZERRED( PATH, NUNIT )
 *     ..
 *     .. External Subroutines ..
       EXTERNAL           CHKXER, ZGEES, ZGEESX, ZGEEV, ZGEEVX, ZGESVJ,
-     $                   ZGESDD, ZGESVD, ZGESVDX, ZGESVQ
+     $                   ZGESDD, ZGESVD, ZGESVDX, ZGESVDQ
 *     ..
 *     .. External Functions ..
       LOGICAL            LSAMEN, ZSLECT