From 79a82ba7f1a6803946ae11fe892c4f4688018182 Mon Sep 17 00:00:00 2001 From: wernsaar Date: Sat, 10 May 2014 22:09:49 +0200 Subject: [PATCH] checked that axpy is OK --- interface/axpy.c | 6 +++--- interface/zaxpy.c | 6 +++--- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/interface/axpy.c b/interface/axpy.c index b8a96c94e..82b0ee234 100644 --- a/interface/axpy.c +++ b/interface/axpy.c @@ -57,7 +57,7 @@ void CNAME(blasint n, FLOAT alpha, FLOAT *x, blasint incx, FLOAT *y, blasint inc #endif -#ifdef SMPTEST +#ifdef SMP int mode, nthreads; #endif @@ -78,7 +78,7 @@ void CNAME(blasint n, FLOAT alpha, FLOAT *x, blasint incx, FLOAT *y, blasint inc if (incx < 0) x -= (n - 1) * incx; if (incy < 0) y -= (n - 1) * incy; -#ifdef SMPTEST +#ifdef SMP nthreads = num_cpu_avail(1); //disable multi-thread when incx==0 or incy==0 @@ -95,7 +95,7 @@ void CNAME(blasint n, FLOAT alpha, FLOAT *x, blasint incx, FLOAT *y, blasint inc AXPYU_K(n, 0, 0, alpha, x, incx, y, incy, NULL, 0); -#ifdef SMPTEST +#ifdef SMP } else { #ifdef XDOUBLE diff --git a/interface/zaxpy.c b/interface/zaxpy.c index 5ae39552b..9ed72efb9 100644 --- a/interface/zaxpy.c +++ b/interface/zaxpy.c @@ -59,7 +59,7 @@ void CNAME(blasint n, FLOAT *ALPHA, FLOAT *x, blasint incx, FLOAT *y, blasint in FLOAT alpha_r = *(ALPHA + 0); FLOAT alpha_i = *(ALPHA + 1); -#ifdef SMPTEST +#ifdef SMP int mode, nthreads; #endif @@ -80,7 +80,7 @@ void CNAME(blasint n, FLOAT *ALPHA, FLOAT *x, blasint incx, FLOAT *y, blasint in if (incx < 0) x -= (n - 1) * incx * 2; if (incy < 0) y -= (n - 1) * incy * 2; -#ifdef SMPTEST +#ifdef SMP nthreads = num_cpu_avail(1); //disable multi-thread when incx==0 or incy==0 @@ -97,7 +97,7 @@ void CNAME(blasint n, FLOAT *ALPHA, FLOAT *x, blasint incx, FLOAT *y, blasint in AXPYC_K(n, 0, 0, alpha_r, alpha_i, x, incx, y, incy, NULL, 0); #endif -#ifdef SMPTEST +#ifdef SMP } else { #ifdef XDOUBLE