Provide iaxpy and cblas_iaxpy for integer vectors. make INTEGER_PRECISION=1

This commit is contained in:
Zhang Xianyi
2015-07-01 03:11:27 +08:00
parent 3f1b57668e
commit 034ffa93fa
14 changed files with 150 additions and 4 deletions

View File

@@ -189,6 +189,20 @@ static void legacy_exec(void *func, int mode, blas_arg_t *args, void *sb){
args -> b, args -> ldb,
args -> c, args -> ldc, sb);
} else
#endif
#ifdef INTEGER_PRECISION
if (mode & BLAS_INTEGER){
/* REAL / Extended Double */
void (*afunc)(BLASLONG, BLASLONG, BLASLONG, int,
int *, BLASLONG, int *, BLASLONG,
int *, BLASLONG, void *) = func;
afunc(args -> m, args -> n, args -> k,
((int *)args -> alpha)[0],
args -> a, args -> lda,
args -> b, args -> ldb,
args -> c, args -> ldc, sb);
} else
#endif
if (mode & BLAS_DOUBLE){
/* REAL / Double */