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

fix compilation on Windows

This commit is contained in:
Martin Kroeker 2024-05-13 09:36:55 +02:00 committed by GitHub
parent 744db840b9
commit 18a0efc9b8
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
utest/test_extensions/test_cgemv_t.c
View File

@ -74,7 +74,11 @@ static void matrix_vector_product(blasint n, blasint m, blasint lda, blasint inc
for (i = 0; i < n * inc_x; i+= inc_x) for (i = 0; i < n * inc_x; i+= inc_x)
{ {
#ifdef RETURN_BY_STACK
BLASFUNC(cdotu)(&result, &lda, a_ptr, &one, x_ptr, &inc_x);
#else
result = BLASFUNC(cdotu)(&lda, a_ptr, &one, x_ptr, &inc_x); result = BLASFUNC(cdotu)(&lda, a_ptr, &one, x_ptr, &inc_x);
#endif
x_res[0] = CREAL(result); x_res[0] = CREAL(result);
x_res[1] = CIMAG(result); x_res[1] = CIMAG(result);
a_ptr += lda * 2; a_ptr += lda * 2;