diff --git a/compute/zgeadd.c b/compute/zgeadd.c
index 3c7dafbf3ec4c7edd0cfec9ef76ce91551155c07..6e8f1e5af8c6e0c624ab7958b8efd85c62e5c842 100644
--- a/compute/zgeadd.c
+++ b/compute/zgeadd.c
@@ -98,7 +98,8 @@ int MORSE_zgeadd(MORSE_enum trans, int M, int N,
int NB;
int Am, An;
int status;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/zgelqs.c b/compute/zgelqs.c
index f8ebd9b44c68c0e2fb8d1a04a18525eab7762399..d39b9e64f0cfd7b9810d0faa47b169b5db3b10e8 100644
--- a/compute/zgelqs.c
+++ b/compute/zgelqs.c
@@ -91,7 +91,8 @@ int MORSE_zgelqs(int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgelqs_param.c b/compute/zgelqs_param.c
index 09442f051c39c57a7c4040bfc992d4b91e350af1..5b6e5e755490b5b661c5c9cc567ee2de62e3f047 100644
--- a/compute/zgelqs_param.c
+++ b/compute/zgelqs_param.c
@@ -93,7 +93,8 @@ int MORSE_zgelqs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgels.c b/compute/zgels.c
index 9e1fd48d7a0da24e5b7bfe216244b6354824a7c6..680702bb283405c3c29cb890bd1160fa2971563c 100644
--- a/compute/zgels.c
+++ b/compute/zgels.c
@@ -118,7 +118,8 @@ int MORSE_zgels(MORSE_enum trans, int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgels_param.c b/compute/zgels_param.c
index 898ee28e37b8dcc744c0104c468b41fde7665bbf..f1346cc27238c9204f3d844ce27405a8b2a8599b 100644
--- a/compute/zgels_param.c
+++ b/compute/zgels_param.c
@@ -120,7 +120,8 @@ int MORSE_zgels_param(const libhqr_tree_t *qrtree, MORSE_enum trans, int M, int
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgemm.c b/compute/zgemm.c
index c2ec27e98614a168e9d98c06ec8c878832d9d72d..aec4e1f72b27e94603f624f1aa31d7c4011e0fa8 100644
--- a/compute/zgemm.c
+++ b/compute/zgemm.c
@@ -138,7 +138,9 @@ int MORSE_zgemm(MORSE_enum transA, MORSE_enum transB, int M, int N, int K,
int NB;
int Am, An, Bm, Bn;
int status;
- MORSE_desc_t descA, descB, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
+ MORSE_desc_t descC;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/zgeqrs.c b/compute/zgeqrs.c
index 1f97f7e57159feffa2fe006e0b80d27a53cd70e8..93bac6e456dbd6f70b90c8ca9ab8a19cc59095d3 100644
--- a/compute/zgeqrs.c
+++ b/compute/zgeqrs.c
@@ -91,7 +91,8 @@ int MORSE_zgeqrs(int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgeqrs_param.c b/compute/zgeqrs_param.c
index 369c2ac9e11d0753f326b93c37bb1d77cb41962c..7e4b30b47fa3e10a6a4d7a9059593dbb9118cb84 100644
--- a/compute/zgeqrs_param.c
+++ b/compute/zgeqrs_param.c
@@ -86,7 +86,8 @@ int MORSE_zgeqrs_param(const libhqr_tree_t *qrtree, int M, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgesv_incpiv.c b/compute/zgesv_incpiv.c
index ff2e4c5b10f19432b8a92a2fdbba7e41e9d5d739..e73fc2601f576d936bc01dd529d3f1e77e019e1b 100644
--- a/compute/zgesv_incpiv.c
+++ b/compute/zgesv_incpiv.c
@@ -96,7 +96,8 @@ int MORSE_zgesv_incpiv(int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgesv_nopiv.c b/compute/zgesv_nopiv.c
index 32e6f05e8387f70effd47fd06e96e4cceadcb378..a1261cb2688157f83a41ea2c21b5f51486896280 100644
--- a/compute/zgesv_nopiv.c
+++ b/compute/zgesv_nopiv.c
@@ -95,7 +95,8 @@ int MORSE_zgesv_nopiv(int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgesvd.c b/compute/zgesvd.c
index fa32a92d6b6cdddb3b9a81b095fcb1e6516a32fa..cf9f34ae95c1d58574e2427e3b0d70b17dcf48e6 100644
--- a/compute/zgesvd.c
+++ b/compute/zgesvd.c
@@ -402,7 +402,8 @@ int MORSE_zgesvd_Tile_Async(MORSE_enum jobu, MORSE_enum jobvt,
{
MORSE_desc_t descA;
MORSE_desc_t descT;
- MORSE_desc_t descU, descVT;
+ MORSE_desc_t descU;
+ MORSE_desc_t descVT;
MORSE_desc_t descAB;
MORSE_desc_t D, *Dptr = NULL;
MORSE_desc_t *subA, *subT, *subUVT;
diff --git a/compute/zgetrs_incpiv.c b/compute/zgetrs_incpiv.c
index a16d6d435b3b8482ef74bcd37cf0874f8eb867d8..1f40b11010a8e763bce9e4a798d2e99762caa4a7 100644
--- a/compute/zgetrs_incpiv.c
+++ b/compute/zgetrs_incpiv.c
@@ -98,7 +98,8 @@ int MORSE_zgetrs_incpiv(MORSE_enum trans, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zgetrs_nopiv.c b/compute/zgetrs_nopiv.c
index b567fe9ef6d33c80a80e7cd01af3decdff22dc8d..a03b5ee67b53e27683755db5b7e9d054d6c87931 100644
--- a/compute/zgetrs_nopiv.c
+++ b/compute/zgetrs_nopiv.c
@@ -92,7 +92,8 @@ int MORSE_zgetrs_nopiv(MORSE_enum trans, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zheevd.c b/compute/zheevd.c
index 027a4944f844faae8f47caa0d97202330c16f9b1..c1b0b78c86fad6b3940bd261f773395a9b431291 100644
--- a/compute/zheevd.c
+++ b/compute/zheevd.c
@@ -343,7 +343,8 @@ int MORSE_zheevd_Tile_Async(MORSE_enum jobz, MORSE_enum uplo,
int N, NB, status;
double *E;
MORSE_Complex64_t *V;
- MORSE_desc_t descQ2, descV;
+ MORSE_desc_t descQ2;
+ MORSE_desc_t descV;
MORSE_desc_t *subA, *subQ, *subT;
morse = morse_context_self();
diff --git a/compute/zhemm.c b/compute/zhemm.c
index 16baf4d96e9f3b6e213687009abfe2f1509f5e90..24f24bb1f24006d4d77f2c31f33ee91ef836f11b 100644
--- a/compute/zhemm.c
+++ b/compute/zhemm.c
@@ -114,7 +114,9 @@ int MORSE_zhemm(MORSE_enum side, MORSE_enum uplo, int M, int N,
int NB;
int Am;
int status;
- MORSE_desc_t descA, descB, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
+ MORSE_desc_t descC;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/zher2k.c b/compute/zher2k.c
index f79f6d1224aadb498f5f01501fe97ad3c603f85a..453d618180e492c5e051a8221574cd13a6cf3e9b 100644
--- a/compute/zher2k.c
+++ b/compute/zher2k.c
@@ -115,7 +115,9 @@ int MORSE_zher2k(MORSE_enum uplo, MORSE_enum trans, int N, int K,
int NB;
int Am, An;
int status;
- MORSE_desc_t descA, descB, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
+ MORSE_desc_t descC;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/zherk.c b/compute/zherk.c
index d82dfa74474eba55246d05619268586535b88351..9ec4f82a9537696cb604a8732b5395bc938a426f 100644
--- a/compute/zherk.c
+++ b/compute/zherk.c
@@ -105,7 +105,8 @@ int MORSE_zherk(MORSE_enum uplo, MORSE_enum trans, int N, int K,
int NB;
int Am, An;
int status;
- MORSE_desc_t descA, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descC;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/zlacpy.c b/compute/zlacpy.c
index e4830ebc4e8da2dba70a8536ac77af44938beb40..b51de41d370e975bb2f6ee1c1b87ad5eb69468ab 100644
--- a/compute/zlacpy.c
+++ b/compute/zlacpy.c
@@ -83,7 +83,8 @@ int MORSE_zlacpy(MORSE_enum uplo, int M, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zposv.c b/compute/zposv.c
index eff74e0c2d260c8cb878882f1093a0a4940279fc..0ed24aaec1715354669e9d971302236117fe70b6 100644
--- a/compute/zposv.c
+++ b/compute/zposv.c
@@ -104,7 +104,8 @@ int MORSE_zposv(MORSE_enum uplo, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zpotrf.c b/compute/zpotrf.c
index 5e87c910b57d1adcd7f45a8e7c0de82c0cd8a330..3da636bdd285a7dbb6ad6e22e9142ae2c9cd2cf5 100644
--- a/compute/zpotrf.c
+++ b/compute/zpotrf.c
@@ -91,7 +91,8 @@ int MORSE_zpotrf(MORSE_enum uplo, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descAt, descAl;
+ MORSE_desc_t descAt;
+ MORSE_desc_t descAl;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zpotrimm.c b/compute/zpotrimm.c
index 56d74fef7a5454cdec18982b31bea699c9915b8d..150a5ca1994f97e5c72916235e4c4ed1481a8280 100644
--- a/compute/zpotrimm.c
+++ b/compute/zpotrimm.c
@@ -84,7 +84,9 @@ int MORSE_zpotrimm(MORSE_enum uplo, int N,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
+ MORSE_desc_t descC;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zpotrs.c b/compute/zpotrs.c
index 8db0de89dd6e1f24bc430abf9af176035b169981..4b4653dfb64a7f9d2985dfb7804a755356e67e5a 100644
--- a/compute/zpotrs.c
+++ b/compute/zpotrs.c
@@ -89,7 +89,8 @@ int MORSE_zpotrs(MORSE_enum uplo, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zsymm.c b/compute/zsymm.c
index 8281f618962cb34f26e2fce3f390d551bb8443ab..81f9dc3fc1d6d855aced218a9c12617cdb3c0c72 100644
--- a/compute/zsymm.c
+++ b/compute/zsymm.c
@@ -114,7 +114,9 @@ int MORSE_zsymm(MORSE_enum side, MORSE_enum uplo, int M, int N,
int NB;
int Am;
int status;
- MORSE_desc_t descA, descB, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
+ MORSE_desc_t descC;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/zsyr2k.c b/compute/zsyr2k.c
index 294fe436a5eb14ad68ae0b7ea8802d1ef6130087..6b1125fac4aa832c5256d7463c05a04747619fac 100644
--- a/compute/zsyr2k.c
+++ b/compute/zsyr2k.c
@@ -115,7 +115,9 @@ int MORSE_zsyr2k(MORSE_enum uplo, MORSE_enum trans, int N, int K,
int NB;
int Am, An;
int status;
- MORSE_desc_t descA, descB, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
+ MORSE_desc_t descC;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/zsyrk.c b/compute/zsyrk.c
index ecad67b9234f147c2507529abfb2796a498ca015..273bc1e2ea0063c48849d8c040eedd0951e0a644 100644
--- a/compute/zsyrk.c
+++ b/compute/zsyrk.c
@@ -105,7 +105,8 @@ int MORSE_zsyrk(MORSE_enum uplo, MORSE_enum trans, int N, int K,
int NB;
int Am, An;
int status;
- MORSE_desc_t descA, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descC;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/zsysv.c b/compute/zsysv.c
index bf341cc7b3fbbef403db059f16e1a2c6504000a4..d263aa3c8ad102cd43593635955fb7afa7e5a098 100644
--- a/compute/zsysv.c
+++ b/compute/zsysv.c
@@ -101,7 +101,8 @@ int MORSE_zsysv(MORSE_enum uplo, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zsytrs.c b/compute/zsytrs.c
index 7a7ee0e217c42d52c7bf2fdfb8fe9389719ff0ca..36e650f02fdf630b0bcbcd294d0a59a6e66e966a 100644
--- a/compute/zsytrs.c
+++ b/compute/zsytrs.c
@@ -88,7 +88,8 @@ int MORSE_zsytrs(MORSE_enum uplo, int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/ztpgqrt.c b/compute/ztpgqrt.c
index e1508230b3106e752b189a04d1a95dd79a329816..cf85533b084d823de87b96c51e0e227b209580c6 100644
--- a/compute/ztpgqrt.c
+++ b/compute/ztpgqrt.c
@@ -144,7 +144,10 @@ int MORSE_ztpgqrt( int M, int N, int K, int L,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descQ1, descQ2, descV1, descV2;
+ MORSE_desc_t descQ1;
+ MORSE_desc_t descQ2;
+ MORSE_desc_t descV1;
+ MORSE_desc_t descV2;
int minMK = chameleon_min( M, K );
morse = morse_context_self();
diff --git a/compute/ztpqrt.c b/compute/ztpqrt.c
index 91b0bd92acb9e9315e8446e8e3f4357cffd4254d..852de0ce2aa14cb63d00a4dce1f000eb9ccd1e53 100644
--- a/compute/ztpqrt.c
+++ b/compute/ztpqrt.c
@@ -138,7 +138,8 @@ int MORSE_ztpqrt( int M, int N, int L,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
int minMN = chameleon_min( M, N );
morse = morse_context_self();
diff --git a/compute/ztradd.c b/compute/ztradd.c
index f8eddd8fcd1115b7828c1f26dbf526bcdc2a1afd..b55fe3e44f9733d7429aa9d09f27120ba751df68 100644
--- a/compute/ztradd.c
+++ b/compute/ztradd.c
@@ -104,7 +104,8 @@ int MORSE_ztradd(MORSE_enum uplo, MORSE_enum trans, int M, int N,
int NB;
int Am, An;
int status;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
diff --git a/compute/ztrmm.c b/compute/ztrmm.c
index a1341399711abd1fbce9e5e2d5c21c12c84528a4..b56caa75bdf8ba0fdf64a4e960cf2d4f32cd7e2b 100644
--- a/compute/ztrmm.c
+++ b/compute/ztrmm.c
@@ -111,7 +111,8 @@ int MORSE_ztrmm(MORSE_enum side, MORSE_enum uplo,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/ztrsm.c b/compute/ztrsm.c
index b0d987b52dda98157b5347f61055a9d7414ec537..24bde3d9c456ccf958b348912d1a548da6a01cff 100644
--- a/compute/ztrsm.c
+++ b/compute/ztrsm.c
@@ -112,7 +112,8 @@ int MORSE_ztrsm(MORSE_enum side, MORSE_enum uplo,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/ztrsmpl.c b/compute/ztrsmpl.c
index cdc18667abb29b6ab8b887d47103d0f09a814fbc..9242c9f872d511a92adf69f9b956c4b714abfd08 100644
--- a/compute/ztrsmpl.c
+++ b/compute/ztrsmpl.c
@@ -90,7 +90,8 @@ int MORSE_ztrsmpl(int N, int NRHS,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descB;
+ MORSE_desc_t descA;
+ MORSE_desc_t descB;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zunglq.c b/compute/zunglq.c
index f83d468cdeeee021d4c67ef9cb95bf21eb20eec4..1119c9b48bfe4ee95e12e35951614e22642626a2 100644
--- a/compute/zunglq.c
+++ b/compute/zunglq.c
@@ -91,7 +91,8 @@ int MORSE_zunglq(int M, int N, int K,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descQ;
+ MORSE_desc_t descA;
+ MORSE_desc_t descQ;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zunglq_param.c b/compute/zunglq_param.c
index d8842b761a30a8f5592b1efcb43be8db1cd60e3e..910d778482f0f328ac4eb4c112c6326958e8c574 100644
--- a/compute/zunglq_param.c
+++ b/compute/zunglq_param.c
@@ -88,7 +88,8 @@ int MORSE_zunglq_param(const libhqr_tree_t *qrtree, int M, int N, int K,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descQ;
+ MORSE_desc_t descA;
+ MORSE_desc_t descQ;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zungqr.c b/compute/zungqr.c
index b168ce1690cdbc2b385fe67e56b18a97f5db4ee1..c9a790b032d03cc0ed948bb6703d2bbbca662f00 100644
--- a/compute/zungqr.c
+++ b/compute/zungqr.c
@@ -91,7 +91,8 @@ int MORSE_zungqr(int M, int N, int K,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descQ;
+ MORSE_desc_t descA;
+ MORSE_desc_t descQ;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zungqr_param.c b/compute/zungqr_param.c
index 5a9a1017a430e3ce0b1359ca3ee80d9a63a25ed8..25a9a831a683d49f60b5ce04dd377ac4e95e80c6 100644
--- a/compute/zungqr_param.c
+++ b/compute/zungqr_param.c
@@ -90,7 +90,8 @@ int MORSE_zungqr_param(const libhqr_tree_t *qrtree,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descQ;
+ MORSE_desc_t descA;
+ MORSE_desc_t descQ;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zunmlq.c b/compute/zunmlq.c
index e69c5426a19b7bc960a55b6eb05749a3779f3f4a..d29598bfb0ced503df840bdde6570bc302e13666 100644
--- a/compute/zunmlq.c
+++ b/compute/zunmlq.c
@@ -115,7 +115,8 @@ int MORSE_zunmlq(MORSE_enum side, MORSE_enum trans, int M, int N, int K,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descC;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zunmlq_param.c b/compute/zunmlq_param.c
index 5c89da5bf2bc49d8f60f1fd92f961dc2435463c0..356d4b20c6473af982ac165eb90d5b7dd3a58a05 100644
--- a/compute/zunmlq_param.c
+++ b/compute/zunmlq_param.c
@@ -114,7 +114,8 @@ int MORSE_zunmlq_param(const libhqr_tree_t *qrtree, MORSE_enum side, MORSE_enum
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descC;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zunmqr.c b/compute/zunmqr.c
index ce4b541f73bd1a0d7712278e086594720c7560c5..245708e6afa2e543093a37393e3eeaa438066d5e 100644
--- a/compute/zunmqr.c
+++ b/compute/zunmqr.c
@@ -117,7 +117,8 @@ int MORSE_zunmqr(MORSE_enum side, MORSE_enum trans, int M, int N, int K,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descC;
morse = morse_context_self();
if (morse == NULL) {
diff --git a/compute/zunmqr_param.c b/compute/zunmqr_param.c
index dfa4fa77370ff12b86a3d672583863c0e8720306..a3a30faf84210833cbd9c824fc468ff4bbd27dc5 100644
--- a/compute/zunmqr_param.c
+++ b/compute/zunmqr_param.c
@@ -118,7 +118,8 @@ int MORSE_zunmqr_param(const libhqr_tree_t *qrtree,
MORSE_context_t *morse;
MORSE_sequence_t *sequence = NULL;
MORSE_request_t request = MORSE_REQUEST_INITIALIZER;
- MORSE_desc_t descA, descC;
+ MORSE_desc_t descA;
+ MORSE_desc_t descC;
morse = morse_context_self();
if (morse == NULL) {