floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Refs #671. the return of i?max cannot larger than N.

This commit is contained in:
Zhang Xianyi 2015-10-24 01:16:34 +08:00
parent 1ce054fcb3
commit 5a291606ad
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
interface/imax.c
View File

@ -136,6 +136,8 @@ blasint NAME(blasint *N, FLOAT *x, blasint *INCX){
ret = (blasint)MAX_K(n, x, incx);
if(ret > n) ret=n;
FUNCTION_PROFILE_END(COMPSIZE, n, 0);
IDEBUG_END;
@ -159,6 +161,8 @@ CBLAS_INDEX CNAME(blasint n, FLOAT *x, blasint incx){
ret = MAX_K(n, x, incx);
if (ret > n) ret=n;
if (ret) ret --;
FUNCTION_PROFILE_END(COMPSIZE, n, 0);