From f0e7345fb8513afea09a7b848508f4800a225a9a Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Wed, 26 May 2021 22:02:34 +0200
Subject: [PATCH] Add shortcut for small-size gemv_n with increments of one

---
 interface/gemv.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/interface/gemv.c b/interface/gemv.c
index d5d739fb1..b6c2e6095 100644
--- a/interface/gemv.c
+++ b/interface/gemv.c
@@ -202,6 +202,11 @@ void CNAME(enum CBLAS_ORDER order,
 
   if (alpha == ZERO) return;
 
+  if (trans == 0 && incx == 1 && incy == 1 && m*n < 2304 *GEMM_MULTITHREAD_THRESHOLD) {
+    GEMV_N(m, n, 0, alpha, a, lda, x, incx, y, incy, buffer);
+    return;
+  }    
+
   IDEBUG_START;
 
   FUNCTION_PROFILE_START();