| @@ -42,14 +42,20 @@ | |||||
| #include "functable.h" | #include "functable.h" | ||||
| #endif | #endif | ||||
| #ifndef CBLAS | |||||
| void NAME(blasint *N, FLOAT *x, blasint *INCX, FLOAT *y, blasint *INCY, FLOAT *C, FLOAT *S){ | void NAME(blasint *N, FLOAT *x, blasint *INCX, FLOAT *y, blasint *INCY, FLOAT *C, FLOAT *S){ | ||||
| BLASLONG n = *N; | BLASLONG n = *N; | ||||
| BLASLONG incx = *INCX; | BLASLONG incx = *INCX; | ||||
| BLASLONG incy = *INCY; | BLASLONG incy = *INCY; | ||||
| FLOAT c = *C; | FLOAT c = *C; | ||||
| FLOAT s = *S; | FLOAT s = *S; | ||||
| #else | |||||
| void CNAME(blasint n, void *VX, blasint incx, void *VY, blasint incy, FLOAT c, FLOAT s) { | |||||
| FLOAT *x = (FLOAT*) VX; | |||||
| FLOAT *y = (FLOAT*) VY; | |||||
| #endif /* CBLAS */ | |||||
| PRINT_DEBUG_NAME; | PRINT_DEBUG_NAME; | ||||
| if (n <= 0) return; | if (n <= 0) return; | ||||
| @@ -4,8 +4,16 @@ | |||||
| #include "functable.h" | #include "functable.h" | ||||
| #endif | #endif | ||||
| #ifndef CBLAS | |||||
| void NAME(FLOAT *DA, FLOAT *DB, FLOAT *C, FLOAT *S){ | void NAME(FLOAT *DA, FLOAT *DB, FLOAT *C, FLOAT *S){ | ||||
| #else | |||||
| void CNAME(void *VDA, void *VDB, FLOAT *C, void *VS) { | |||||
| FLOAT *DA = (FLOAT*) VDA; | |||||
| FLOAT *DB = (FLOAT*) VDB; | |||||
| FLOAT *S = (FLOAT*) VS; | |||||
| #endif /* CBLAS */ | |||||
| #if defined(__i386__) || defined(__x86_64__) || defined(__ia64__) || defined(_M_X64) || defined(_M_IX86) | #if defined(__i386__) || defined(__x86_64__) || defined(__ia64__) || defined(_M_X64) || defined(_M_IX86) | ||||
| long double da_r = *(DA + 0); | long double da_r = *(DA + 0); | ||||