Modify complex CBLAS functions to take void pointers
Modify complex CBLAS functions to take void pointers instead of float or double arguments (to bring the prototypes in line with netlib and other implementations' cblas.h)
This commit is contained in:
+9
-4
@@ -117,10 +117,15 @@ void NAME(char *UPLO, blasint *N, FLOAT *ALPHA,
|
||||
void CNAME(enum CBLAS_ORDER order,
|
||||
enum CBLAS_UPLO Uplo,
|
||||
blasint n,
|
||||
FLOAT *ALPHA,
|
||||
FLOAT *x, blasint incx,
|
||||
FLOAT *y, blasint incy,
|
||||
FLOAT *a) {
|
||||
void *VALPHA,
|
||||
void *vx, blasint incx,
|
||||
void *vy, blasint incy,
|
||||
void *va) {
|
||||
|
||||
FLOAT* ALPHA = (FLOAT*) VALPHA;
|
||||
FLOAT* x = (FLOAT*) vx;
|
||||
FLOAT* y = (FLOAT*) vy;
|
||||
FLOAT* a = (FLOAT*) va;
|
||||
|
||||
FLOAT alpha_r = ALPHA[0];
|
||||
FLOAT alpha_i = ALPHA[1];
|
||||
|
||||
Reference in New Issue
Block a user