diff --git a/driver/level2/gbmv_k.c b/driver/level2/gbmv_k.c
index 4b29d70d1..498f5fef7 100644
--- a/driver/level2/gbmv_k.c
+++ b/driver/level2/gbmv_k.c
@@ -62,13 +62,13 @@ void CNAME(BLASLONG m, BLASLONG n, BLASLONG ku, BLASLONG kl, FLOAT alpha,
   if (incy != 1) {
     Y = bufferY;
     bufferX    = (FLOAT *)(((BLASLONG)bufferY + M * sizeof(FLOAT) + 4095) & ~4095);
-    gemvbuffer = bufferX;
+    // gemvbuffer = bufferX;
     COPY_K(M, y, incy, Y, 1);
   }
 
   if (incx != 1) {
     X = bufferX;
-    gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + N * sizeof(FLOAT) + 4095) & ~4095);
+    // gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + N * sizeof(FLOAT) + 4095) & ~4095);
     COPY_K(N, x, incx, X, 1);
   }
 
diff --git a/driver/level2/sbmv_k.c b/driver/level2/sbmv_k.c
index ef7fa378c..58f57df8b 100644
--- a/driver/level2/sbmv_k.c
+++ b/driver/level2/sbmv_k.c
@@ -55,13 +55,13 @@ int CNAME(BLASLONG n, BLASLONG k, FLOAT alpha,
   if (incy != 1) {
     Y = bufferY;
     bufferX    = (FLOAT *)(((BLASLONG)bufferY + n * sizeof(FLOAT) + 4095) & ~4095);
-    sbmvbuffer = bufferX;
+    // sbmvbuffer = bufferX;
     COPY_K(n, y, incy, Y, 1);
   }
 
   if (incx != 1) {
     X = bufferX;
-    sbmvbuffer = (FLOAT *)(((BLASLONG)bufferX + n * sizeof(FLOAT) + 4095) & ~4095);
+    // sbmvbuffer = (FLOAT *)(((BLASLONG)bufferX + n * sizeof(FLOAT) + 4095) & ~4095);
     COPY_K(n, x, incx, X, 1);
   }
 
diff --git a/driver/level2/spmv_k.c b/driver/level2/spmv_k.c
index 8ce0abdf7..e48b8b3f1 100644
--- a/driver/level2/spmv_k.c
+++ b/driver/level2/spmv_k.c
@@ -53,13 +53,13 @@ int CNAME(BLASLONG m, FLOAT alpha, FLOAT *a,
   if (incy != 1) {
     Y = bufferY;
     bufferX    = (FLOAT *)(((BLASLONG)bufferY + m * sizeof(FLOAT) + 4095) & ~4095);
-    gemvbuffer = bufferX;
+    // gemvbuffer = bufferX;
     COPY_K(m, y, incy, Y, 1);
   }
 
   if (incx != 1) {
     X = bufferX;
-    gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + m * sizeof(FLOAT) + 4095) & ~4095);
+    // gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + m * sizeof(FLOAT) + 4095) & ~4095);
     COPY_K(m, x, incx, X, 1);
   }
 
diff --git a/driver/level2/zgbmv_k.c b/driver/level2/zgbmv_k.c
index d89932e33..b143e2545 100644
--- a/driver/level2/zgbmv_k.c
+++ b/driver/level2/zgbmv_k.c
@@ -83,13 +83,13 @@ void CNAME(BLASLONG m, BLASLONG n, BLASLONG ku, BLASLONG kl, FLOAT alpha_r, FLOA
   if (incy != 1) {
     Y = bufferY;
     bufferX    = (FLOAT *)(((BLASLONG)bufferY + M * sizeof(FLOAT) * 2 + 4095) & ~4095);
-    gemvbuffer = bufferX;
+    // gemvbuffer = bufferX;
     COPY_K(M, y, incy, Y, 1);
   }
 
   if (incx != 1) {
     X = bufferX;
-    gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + N * sizeof(FLOAT) * 2 + 4095) & ~4095);
+    // gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + N * sizeof(FLOAT) * 2 + 4095) & ~4095);
     COPY_K(N, x, incx, X, 1);
   }
 
diff --git a/driver/level2/zhbmv_k.c b/driver/level2/zhbmv_k.c
index 33f70d2c5..a164ed1fb 100644
--- a/driver/level2/zhbmv_k.c
+++ b/driver/level2/zhbmv_k.c
@@ -61,13 +61,13 @@ int CNAME(BLASLONG n, BLASLONG k, FLOAT alpha_r, FLOAT alpha_i,
   if (incy != 1) {
     Y = bufferY;
     bufferX    = (FLOAT *)(((BLASLONG)bufferY + n * sizeof(FLOAT) * COMPSIZE + 4095) & ~4095);
-    sbmvbuffer = bufferX;
+    // sbmvbuffer = bufferX;
     COPY_K(n, y, incy, Y, 1);
   }
 
   if (incx != 1) {
     X = bufferX;
-    sbmvbuffer = (FLOAT *)(((BLASLONG)bufferX + n * sizeof(FLOAT) * COMPSIZE + 4095) & ~4095);
+    // sbmvbuffer = (FLOAT *)(((BLASLONG)bufferX + n * sizeof(FLOAT) * COMPSIZE + 4095) & ~4095);
     COPY_K(n, x, incx, X, 1);
   }
 
diff --git a/driver/level2/zhpmv_k.c b/driver/level2/zhpmv_k.c
index 9e7ed7b0e..d92740c18 100644
--- a/driver/level2/zhpmv_k.c
+++ b/driver/level2/zhpmv_k.c
@@ -56,13 +56,13 @@ int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i,
   if (incy != 1) {
     Y = bufferY;
     bufferX    = (FLOAT *)(((BLASLONG)bufferY + m * sizeof(FLOAT) * 2 + 4095) & ~4095);
-    gemvbuffer = bufferX;
+    // gemvbuffer = bufferX;
     COPY_K(m, y, incy, Y, 1);
   }
 
   if (incx != 1) {
     X = bufferX;
-    gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + m * sizeof(FLOAT) * 2 + 4095) & ~4095);
+    // gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + m * sizeof(FLOAT) * 2 + 4095) & ~4095);
     COPY_K(m, x, incx, X, 1);
   }
 
diff --git a/driver/level2/zsbmv_k.c b/driver/level2/zsbmv_k.c
index 3ae74ce80..f4b7c5579 100644
--- a/driver/level2/zsbmv_k.c
+++ b/driver/level2/zsbmv_k.c
@@ -60,13 +60,13 @@ int CNAME(BLASLONG n, BLASLONG k, FLOAT alpha_r, FLOAT alpha_i,
   if (incy != 1) {
     Y = bufferY;
     bufferX    = (FLOAT *)(((BLASLONG)bufferY + n * sizeof(FLOAT) * COMPSIZE + 4095) & ~4095);
-    sbmvbuffer = bufferX;
+    // sbmvbuffer = bufferX;
     COPY_K(n, y, incy, Y, 1);
   }
 
   if (incx != 1) {
     X = bufferX;
-    sbmvbuffer = (FLOAT *)(((BLASLONG)bufferX + n * sizeof(FLOAT) * COMPSIZE + 4095) & ~4095);
+    // sbmvbuffer = (FLOAT *)(((BLASLONG)bufferX + n * sizeof(FLOAT) * COMPSIZE + 4095) & ~4095);
     COPY_K(n, x, incx, X, 1);
   }
 
diff --git a/driver/level2/zspmv_k.c b/driver/level2/zspmv_k.c
index 432205e83..3989714e9 100644
--- a/driver/level2/zspmv_k.c
+++ b/driver/level2/zspmv_k.c
@@ -55,13 +55,13 @@ int CNAME(BLASLONG m, FLOAT alpha_r, FLOAT alpha_i,
   if (incy != 1) {
     Y = bufferY;
     bufferX    = (FLOAT *)(((BLASLONG)bufferY + m * sizeof(FLOAT) * 2 + 4095) & ~4095);
-    gemvbuffer = bufferX;
+    // gemvbuffer = bufferX;
     COPY_K(m, y, incy, Y, 1);
   }
 
   if (incx != 1) {
     X = bufferX;
-    gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + m * sizeof(FLOAT) * 2 + 4095) & ~4095);
+    // gemvbuffer = (FLOAT *)(((BLASLONG)bufferX + m * sizeof(FLOAT) * 2 + 4095) & ~4095);
     COPY_K(m, x, incx, X, 1);
   }
 
diff --git a/driver/level3/level3.c b/driver/level3/level3.c
index 0ee189af4..fbed14339 100644
--- a/driver/level3/level3.c
+++ b/driver/level3/level3.c
@@ -293,7 +293,7 @@ int CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n,
       min_l = k - ls;
 
       if (min_l >= GEMM_Q * 2) {
-	gemm_p = GEMM_P;
+	// gemm_p = GEMM_P;
 	min_l  = GEMM_Q;
       } else {
 	if (min_l > GEMM_Q) {
diff --git a/driver/others/memory.c b/driver/others/memory.c
index a4d26b0e1..e4caa093a 100644
--- a/driver/others/memory.c
+++ b/driver/others/memory.c
@@ -348,7 +348,7 @@ int blas_get_cpu_number(void){
   max_num = get_num_procs();
 #endif
 
-  blas_goto_num = 0;
+  // blas_goto_num = 0;
 #ifndef USE_OPENMP
   blas_goto_num=openblas_num_threads_env();
   if (blas_goto_num < 0) blas_goto_num = 0;
@@ -360,7 +360,7 @@ int blas_get_cpu_number(void){
 
 #endif
 
-  blas_omp_num = 0;
+  // blas_omp_num = 0;
   blas_omp_num=openblas_omp_num_threads_env();
   if (blas_omp_num < 0) blas_omp_num = 0;
 
diff --git a/interface/trmv.c b/interface/trmv.c
index 7d17dc67b..7c40ae976 100644
--- a/interface/trmv.c
+++ b/interface/trmv.c
@@ -218,9 +218,9 @@ void CNAME(enum CBLAS_ORDER order, enum CBLAS_UPLO Uplo,
   buffer = (FLOAT *)blas_memory_alloc(1);
 
 #ifdef SMP
-  nthreads = num_cpu_avail(2);
+/*  nthreads = num_cpu_avail(2);
 
-/*FIXME trmv_thread was found to be broken, see issue 1332 */
+FIXME trmv_thread was found to be broken, see issue 1332 */
   nthreads = 1;
   
   if (nthreads == 1) {
diff --git a/kernel/generic/ztrmm_uncopy_2.c b/kernel/generic/ztrmm_uncopy_2.c
index 5cb0ffc54..7eb433df9 100644
--- a/kernel/generic/ztrmm_uncopy_2.c
+++ b/kernel/generic/ztrmm_uncopy_2.c
@@ -113,8 +113,8 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG posX, BLASLON
 #else
 	      data01 = *(ao1 + 0);
 	      data02 = *(ao1 + 1);
-	      data03 = *(ao1 + 2);
-	      data04 = *(ao1 + 3);
+	      /* data03 = *(ao1 + 2);
+	      data04 = *(ao1 + 3); */
 	      data05 = *(ao2 + 0);
 	      data06 = *(ao2 + 1);
 	      data07 = *(ao2 + 2);
diff --git a/kernel/generic/ztrsm_lncopy_1.c b/kernel/generic/ztrsm_lncopy_1.c
index 8dab45144..c1d62ead2 100644
--- a/kernel/generic/ztrsm_lncopy_1.c
+++ b/kernel/generic/ztrsm_lncopy_1.c
@@ -43,7 +43,7 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02;
+  FLOAT data01 = 0.0, data02 = 0.0;
   FLOAT *a1;
 
   lda *= 2;
diff --git a/kernel/generic/ztrsm_lncopy_2.c b/kernel/generic/ztrsm_lncopy_2.c
index 1e76af707..a98bbb54e 100644
--- a/kernel/generic/ztrsm_lncopy_2.c
+++ b/kernel/generic/ztrsm_lncopy_2.c
@@ -43,8 +43,8 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02, data03, data04;
-  FLOAT data05, data06, data07, data08;
+  FLOAT data01 = 0.0, data02 = 0.0, data03, data04;
+  FLOAT data05, data06, data07 = 0.0, data08 = 0.0;
   FLOAT *a1, *a2;
 
   lda *= 2;
diff --git a/kernel/generic/ztrsm_lncopy_4.c b/kernel/generic/ztrsm_lncopy_4.c
index 2a1302e53..f44127282 100644
--- a/kernel/generic/ztrsm_lncopy_4.c
+++ b/kernel/generic/ztrsm_lncopy_4.c
@@ -43,9 +43,9 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02, data03, data04;
+  FLOAT data01 = 0.0, data02 = 0.0, data03, data04;
   FLOAT data05, data06, data07, data08;
-  FLOAT data09, data10, data11, data12;
+  FLOAT data09, data10, data11 = 0.0, data12 = 0.0;
   FLOAT data13, data14, data15, data16;
   FLOAT data17, data18, data19, data20;
   FLOAT data21, data22, data23, data24;
diff --git a/kernel/generic/ztrsm_ltcopy_1.c b/kernel/generic/ztrsm_ltcopy_1.c
index af4ac127d..f24cec863 100644
--- a/kernel/generic/ztrsm_ltcopy_1.c
+++ b/kernel/generic/ztrsm_ltcopy_1.c
@@ -43,7 +43,7 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02;
+  FLOAT data01 = 0.0, data02 = 0.0;
   FLOAT *a1;
 
   lda *= 2;
diff --git a/kernel/generic/ztrsm_ltcopy_2.c b/kernel/generic/ztrsm_ltcopy_2.c
index 21bd0fa1f..93a32bf04 100644
--- a/kernel/generic/ztrsm_ltcopy_2.c
+++ b/kernel/generic/ztrsm_ltcopy_2.c
@@ -43,8 +43,8 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02, data03, data04;
-  FLOAT data05, data06, data07, data08;
+  FLOAT data01 = 0.0, data02 = 0.0, data03, data04;
+  FLOAT data05, data06, data07 = 0.0, data08 = 0.0;
   FLOAT *a1, *a2;
 
   lda *= 2;
diff --git a/kernel/generic/ztrsm_ltcopy_4.c b/kernel/generic/ztrsm_ltcopy_4.c
index be28ba646..5a8f138d6 100644
--- a/kernel/generic/ztrsm_ltcopy_4.c
+++ b/kernel/generic/ztrsm_ltcopy_4.c
@@ -43,9 +43,9 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02, data03, data04;
+  FLOAT data01 = 0.0, data02 = 0.0, data03, data04;
   FLOAT data05, data06, data07, data08;
-  FLOAT data09, data10, data11, data12;
+  FLOAT data09, data10, data11 = 0.0, data12 = 0.0;
   FLOAT data13, data14, data15, data16;
   FLOAT data17, data18, data19, data20;
   FLOAT data21, data22, data23, data24;
diff --git a/kernel/generic/ztrsm_uncopy_1.c b/kernel/generic/ztrsm_uncopy_1.c
index dc9157bdc..be1aac5e2 100644
--- a/kernel/generic/ztrsm_uncopy_1.c
+++ b/kernel/generic/ztrsm_uncopy_1.c
@@ -43,7 +43,7 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02;
+  FLOAT data01 = 0.0, data02 = 0.0;
   FLOAT *a1;
 
   lda *= 2;
diff --git a/kernel/generic/ztrsm_uncopy_2.c b/kernel/generic/ztrsm_uncopy_2.c
index fecab88e7..91051b148 100644
--- a/kernel/generic/ztrsm_uncopy_2.c
+++ b/kernel/generic/ztrsm_uncopy_2.c
@@ -43,8 +43,8 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02, data03, data04;
-  FLOAT data05, data06, data07, data08;
+  FLOAT data01 = 0.0, data02 = 0.0, data03, data04;
+  FLOAT data05, data06, data07 = 0.0, data08 = 0.0;
   FLOAT *a1, *a2;
 
   lda *= 2;
diff --git a/kernel/generic/ztrsm_uncopy_4.c b/kernel/generic/ztrsm_uncopy_4.c
index fe33e41c7..cb6ed0101 100644
--- a/kernel/generic/ztrsm_uncopy_4.c
+++ b/kernel/generic/ztrsm_uncopy_4.c
@@ -43,9 +43,9 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02, data03, data04;
+  FLOAT data01 = 0.0, data02 = 0.0, data03, data04;
   FLOAT data05, data06, data07, data08;
-  FLOAT data09, data10, data11, data12;
+  FLOAT data09, data10, data11 = 0.0, data12 = 0.0;
   FLOAT data13, data14, data15, data16;
   FLOAT data17, data18, data19, data20;
   FLOAT data21, data22, data23, data24;
diff --git a/kernel/generic/ztrsm_utcopy_1.c b/kernel/generic/ztrsm_utcopy_1.c
index 08f85e891..0e33a7d18 100644
--- a/kernel/generic/ztrsm_utcopy_1.c
+++ b/kernel/generic/ztrsm_utcopy_1.c
@@ -43,7 +43,7 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02;
+  FLOAT data01 = 0.0, data02 = 0.0;
   FLOAT *a1;
 
   lda *= 2;
diff --git a/kernel/generic/ztrsm_utcopy_2.c b/kernel/generic/ztrsm_utcopy_2.c
index 387bb2532..c34d741ee 100644
--- a/kernel/generic/ztrsm_utcopy_2.c
+++ b/kernel/generic/ztrsm_utcopy_2.c
@@ -43,8 +43,8 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02, data03, data04;
-  FLOAT data05, data06, data07, data08;
+  FLOAT data01 = 0.0, data02 = 0.0, data03, data04;
+  FLOAT data05, data06, data07 = 0.0, data08 = 0.0;
   FLOAT *a1, *a2;
 
   lda *= 2;
diff --git a/kernel/generic/ztrsm_utcopy_4.c b/kernel/generic/ztrsm_utcopy_4.c
index b419f6b90..9617fc192 100644
--- a/kernel/generic/ztrsm_utcopy_4.c
+++ b/kernel/generic/ztrsm_utcopy_4.c
@@ -43,9 +43,9 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT *a, BLASLONG lda, BLASLONG offset, FLOAT
 
   BLASLONG i, ii, j, jj;
 
-  FLOAT data01, data02, data03, data04;
+  FLOAT data01 = 0.0, data02 = 0.0, data03, data04;
   FLOAT data05, data06, data07, data08;
-  FLOAT data09, data10, data11, data12;
+  FLOAT data09, data10, data11 = 0.0, data12 = 0.0;
   FLOAT data13, data14, data15, data16;
   FLOAT data17, data18, data19, data20;
   FLOAT data21, data22, data23, data24;