From 0bd956fd21cb1af79ac0c3dfb963bbb1dd8ce384 Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Sat, 27 Apr 2019 22:49:04 +0200
Subject: [PATCH] Correct length of name string in xerbla call

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

diff --git a/interface/trsm.c b/interface/trsm.c
index f2da285de..715c83a1f 100644
--- a/interface/trsm.c
+++ b/interface/trsm.c
@@ -204,7 +204,7 @@ void NAME(char *SIDE, char *UPLO, char *TRANS, char *DIAG,
   if (side  < 0)                info =  1;
 
   if (info != 0) {
-    BLASFUNC(xerbla)(ERROR_NAME, &info, sizeof(ERROR_NAME));
+    BLASFUNC(xerbla)(ERROR_NAME, &info, sizeof(ERROR_NAME)-1);
     return;
   }