From e2334d02180c5bc24592ab4fe65aa109da19179b Mon Sep 17 00:00:00 2001
From: Chip Kerchner <chip.kerchner@ibm.com>
Date: Thu, 1 Aug 2024 14:44:40 -0500
Subject: [PATCH] Remove GEMV hack.

---
 interface/gemm.c | 17 -----------------
 1 file changed, 17 deletions(-)

diff --git a/interface/gemm.c b/interface/gemm.c
index e31e22d24..4537b6a78 100644
--- a/interface/gemm.c
+++ b/interface/gemm.c
@@ -47,29 +47,22 @@
 #define SMP_THRESHOLD_MIN 65536.0
 #ifdef XDOUBLE
 #define ERROR_NAME "QGEMM "
-#define GEMV BLASFUNC(qgemv)
 #elif defined(DOUBLE)
 #define ERROR_NAME "DGEMM "
-#define GEMV BLASFUNC(dgemv)
 #elif defined(BFLOAT16)
 #define ERROR_NAME "SBGEMM "
-#define GEMV BLASFUNC(sbgemv)
 #else
 #define ERROR_NAME "SGEMM "
-#define GEMV BLASFUNC(sgemv)
 #endif
 #else
 #define SMP_THRESHOLD_MIN 8192.0
 #ifndef GEMM3M
 #ifdef XDOUBLE
 #define ERROR_NAME "XGEMM "
-#define GEMV BLASFUNC(xgemv)
 #elif defined(DOUBLE)
 #define ERROR_NAME "ZGEMM "
-#define GEMV BLASFUNC(zgemv)
 #else
 #define ERROR_NAME "CGEMM "
-#define GEMV BLASFUNC(cgemv)
 #endif
 #else
 #ifdef XDOUBLE
@@ -197,16 +190,6 @@ void NAME(char *TRANSA, char *TRANSB,
   IFLOAT *buffer;
   IFLOAT *sa, *sb;
 
-#if !defined(COMPLEX) && !defined(DOUBLE) && !defined(BFLOAT16)
-#if 1
-  if (*N == 1) {
-      GEMV(TRANSA, K, M, alpha, a, ldA, b, N, beta, c, N);
-//SUBROUTINE SGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
-      return;
-  }
-#endif
-#endif
-
 #ifdef SMP
   double MNK;
 #if defined(USE_SIMPLE_THREADED_LEVEL3) || !defined(NO_AFFINITY)