From c8788208c8bb135bb9b5b8af2476f296987b7cf5 Mon Sep 17 00:00:00 2001
From: Chip Kerchner <chip.kerchner@ibm.com>
Date: Fri, 27 Sep 2024 13:27:03 -0500
Subject: [PATCH] Fixing block issue with transpose version.

---
 kernel/power/sbgemv_n.c | 4 +---
 kernel/power/sbgemv_t.c | 1 +
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/kernel/power/sbgemv_n.c b/kernel/power/sbgemv_n.c
index 4768be31f..eab0b4e33 100644
--- a/kernel/power/sbgemv_n.c
+++ b/kernel/power/sbgemv_n.c
@@ -202,10 +202,8 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT alpha, IFLOAT *a, BLASLONG lda, IFLOAT *
     a += NB;
     if (inc_y != 1) {
       move_y(NB, ybuffer, y_ptr, inc_y);
-      y_ptr += (NB * inc_y);
-    } else {
-      y_ptr += NB;
     }
+    y_ptr += (NB * inc_y);
   }
 
   return 0;
diff --git a/kernel/power/sbgemv_t.c b/kernel/power/sbgemv_t.c
index 4cc8f060e..c6fdb6b1a 100644
--- a/kernel/power/sbgemv_t.c
+++ b/kernel/power/sbgemv_t.c
@@ -124,6 +124,7 @@ int CNAME(BLASLONG m, BLASLONG n, FLOAT alpha, IFLOAT *a, BLASLONG lda, IFLOAT *
 
     a += NB;
     x += NB * inc_x;
+    beta = (FLOAT)1;
   }
 
   return 0;