bugfix for sdsdot

This commit is contained in:
wernsaar
2014-02-28 14:59:36 +01:00
parent 692b14cecd
commit 9db0fb8b02
3 changed files with 6 additions and 6 deletions

View File

@@ -52,8 +52,8 @@ FLOATRET NAME(blasint *N, FLOAT *a, FLOAT *x, blasint *INCX, FLOAT *y, blasint *
FLOATRET ret;
PRINT_DEBUG_NAME;
if (n <= 0) return 0.;
if (n <= 0) return(*a) ;
IDEBUG_START;
@@ -80,7 +80,7 @@ FLOAT CNAME(blasint n, FLOAT alpha, FLOAT *x, blasint incx, FLOAT *y, blasint in
PRINT_DEBUG_CNAME;
if (n <= 0) return 0.;
if (n <= 0) return (alpha);
IDEBUG_START;