floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Rename OPENBLAS_FAILED

This commit is contained in:
xoviat 2018-01-26 15:10:27 -06:00
parent 1a1573ebd7
commit 623a9f45e7
2 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ctest/c_xerbla.c
View File

@ -81,7 +81,7 @@ void cblas_xerbla(blasint info, char *rout, char *form, ...)
printf("***** XERBLA WAS CALLED WITH INFO = %d INSTEAD OF %d in %s *******\n",info, cblas_info, rout); printf("***** XERBLA WAS CALLED WITH INFO = %d INSTEAD OF %d in %s *******\n",info, cblas_info, rout);
cblas_lerr = PASSED; cblas_lerr = PASSED;
cblas_ok = FALSE; cblas_ok = FALSE;
} else cblas_lerr = FAILED; } else cblas_lerr = OPENBLAS_FAILED;
} }
#ifdef F77_Char #ifdef F77_Char

4
ctest/cblas_test.h
View File

@ -15,7 +15,9 @@
#define TEST_ROW_MJR 1 #define TEST_ROW_MJR 1
#define FALSE 0 #define FALSE 0
#define FAILED 0
/* Needed because failed is already defined on MSVC */
#define OPENBLAS_FAILED 0
#define TEST_COL_MJR 0 #define TEST_COL_MJR 0
#define INVALID -1 #define INVALID -1