From 794ff8b91257f8e4dd3d2e0e7ee6f68f0e77c7f6 Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Sun, 18 Apr 2021 12:16:14 +0200
Subject: [PATCH] Update gemv.c

---
 interface/gemv.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/interface/gemv.c b/interface/gemv.c
index e31b7c515..002470732 100644
--- a/interface/gemv.c
+++ b/interface/gemv.c
@@ -189,7 +189,7 @@ fprintf(stderr,"interface for CBLAS_?GEMV starting, order=%d trans=%d m=%ld n=%l
 	
   if (info >= 0) {
 	  fprintf(stderr,"CBLAS_?GEMV trying to call XERBLA\n");
-    BLASFUNC(xerbla)(ERROR_NAME, &info, sizeof(ERROR_NAME));
+    //BLASFUNC(xerbla)(ERROR_NAME, &info, sizeof(ERROR_NAME));
 	  fprintf(stderr,"after xerbla, SCAL_K is %x SSCAL_K %x DSCAL_K %x CSCAL_K %x ZSCAL_K %x\n",SCAL_K,SSCAL_K,DSCAL_K,CSCAL_K, ZSCAL_K);
     return;
   }