Correct length of name string in xerbla call

2019-04-27 22:49:04 +02:00
parent 32c7063cb0
commit 0bd956fd21
1 changed files with 1 additions and 1 deletions
--- 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;
  }