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

CTEST_ADD tests and change complex double again

This commit is contained in:
Martin Kroeker 2018-02-17 16:17:02 +01:00 committed by GitHub
parent 9309d570f7
commit 77312a5c41
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 23 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
utest/utest_main2.c
View File

@ -266,8 +266,8 @@ CTEST( zdotu,zdotu_n_1)
blasint N=1,incX=1,incY=1; blasint N=1,incX=1,incY=1;
double x1[]={1.0,1.0}; double x1[]={1.0,1.0};
double y1[]={1.0,2.0}; double y1[]={1.0,2.0};
_Dcomplex result1=openblas_make_complex_double(0.0,0.0); openblas_complex_double result1=openblas_make_complex_double(0.0,0.0);
_Dcomplex result2=openblas_make_complex_double(-1.0,3.0); openblas_complex_double result2=openblas_make_complex_double(-1.0,3.0);
//OpenBLAS //OpenBLAS
BLASFUNC(zdotu)(&result1,&N,x1,&incX,y1,&incY); BLASFUNC(zdotu)(&result1,&N,x1,&incX,y1,&incY);
@ -281,8 +281,8 @@ CTEST(zdotu, zdotu_offset_1)
blasint N=1,incX=1,incY=1; blasint N=1,incX=1,incY=1;
double x1[]={1.0,2.0,3.0,4.0}; double x1[]={1.0,2.0,3.0,4.0};
double y1[]={5.0,6.0,7.0,8.0}; double y1[]={5.0,6.0,7.0,8.0};
_Dcomplex result1=openblas_make_complex_double(0.0,0.0); openblas_complex_double result1=openblas_make_complex_double(0.0,0.0);
_Dcomplex result2=openblas_make_complex_double(-9.0,32.0); openblas_complex_double result2=openblas_make_complex_double(-9.0,32.0);
//OpenBLAS //OpenBLAS
BLASFUNC(zdotu)(&result1,&N,x1+1,&incX,y1+1,&incY); BLASFUNC(zdotu)(&result1,&N,x1+1,&incX,y1+1,&incY);
@ -460,6 +460,25 @@ CTEST(swap,cswap_inc_0)
int main(int argc, const char ** argv){ int main(int argc, const char ** argv){
CTEST_ADD(amax, samax); CTEST_ADD(amax, samax);
CTEST_ADD (drotmg,rotmg);
CTEST_ADD (drotmg,rotmg_issue1452);
CTEST_ADD (drotmg, rotmg_D1eqD2_X1eqX2);
CTEST_ADD (axpy,daxpy_inc_0);
CTEST_ADD (axpy,zaxpy_inc_0);
CTEST_ADD (axpy,saxpy_inc_0);
CTEST_ADD (axpy,caxpy_inc_0);
CTEST_ADD (zdotu,zdotu_n_1);
CTEST_ADD (zdotu, zdotu_offset_1);
CTEST_ADD (dsdot,dsdot_n_1);
CTEST_ADD (rot,drot_inc_0);
CTEST_ADD (rot,zdrot_inc_0);
CTEST_ADD (rot,srot_inc_0);
CTEST_ADD (rot, csrot_inc_0);
CTEST_ADD (swap,dswap_inc_0);
CTEST_ADD (swap,zswap_inc_0);
CTEST_ADD (swap,sswap_inc_0);
CTEST:ADD (swap,cswap_inc_0);
int num_fail=0; int num_fail=0;
num_fail=ctest_main(argc, argv); num_fail=ctest_main(argc, argv);