phynexis-deps/lapack
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

CBLAS: Fix the expected routine name in xerbla tests for extended API builds

Browse Source
This commit is contained in:
Simon Maertens
2026-07-30 16:59:48 +02:00
parent fb9b904cc2
commit 92dd179c2b
1 changed files with 8 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
CBLAS/testing/c_xerbla.c
+8 -3
View File
@@ -36,15 +36,20 @@ void API_SUFFIX(cblas_xerbla)(CBLAS_INT info, const char *rout,
if (link_xerbla) return;
/* The name is checked and reported as the user would see it, suffix and
* all, while the remapping below keys off the unsuffixed \p rout.
* all, while the remapping below keys off the unsuffixed \p rout. The
* expected name goes through the same normalisation, since the testers
* spell it without the extended API suffix.
*/
char reported[CBLAS_XERBLA_ROUT_BUFFER_SIZE];
cblas_xerbla_apply_api_suffix(reported, sizeof(reported), rout);
if (cblas_rout != NULL && strcmp(cblas_rout, reported) != 0) {
char expected[CBLAS_XERBLA_ROUT_BUFFER_SIZE];
cblas_xerbla_apply_api_suffix(expected, sizeof(expected), cblas_rout);
if (cblas_rout != NULL && strcmp(expected, reported) != 0) {
printf(
"***** XERBLA WAS CALLED WITH SRNAME = <%s> INSTEAD OF <%s> *******\n",
reported, cblas_rout);
reported, expected);
cblas_ok = FALSE;
cblas_xbad = 1;
}