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

Fix declarations

This commit is contained in:
Martin Kroeker 2018-02-16 08:57:44 +01:00 committed by GitHub
parent df06c59ee4
commit 63ba1aa8b7
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
utest/test_dotu.c
View File

@ -41,8 +41,8 @@ CTEST( zdotu,zdotu_n_1)
double y1[]={1.0,2.0}; double y1[]={1.0,2.0};
double x2[]={1.0,1.0}; double x2[]={1.0,1.0};
double y2[]={1.0,2.0}; double y2[]={1.0,2.0};
double _Complex result1=0.0; _Complex result1=0.0;
double _Complex result2={-1.0000+3.0000*I}; _Complex result2={-1.0000+3.0000*I};
//OpenBLAS //OpenBLAS
result1=BLASFUNC(zdotu)(&N,x1,&incX,y1,&incY); result1=BLASFUNC(zdotu)(&N,x1,&incX,y1,&incY);
@ -59,8 +59,8 @@ CTEST(zdotu, zdotu_offset_1)
double y1[]={5.0,6.0,7.0,8.0}; double y1[]={5.0,6.0,7.0,8.0};
double x2[]={1.0,2.0,3.0,4.0}; double x2[]={1.0,2.0,3.0,4.0};
double y2[]={5.0,6.0,7.0,8.0}; double y2[]={5.0,6.0,7.0,8.0};
double _Complex result1=0.0; _Complex result1=0.0;
double _Complex result2={-9.0000+32.0000*I}; _Complex result2={-9.0000+32.0000*I};
//OpenBLAS //OpenBLAS
result1=BLASFUNC(zdotu)(&N,x1+1,&incX,y1+1,&incY); result1=BLASFUNC(zdotu)(&N,x1+1,&incX,y1+1,&incY);

4
utest/test_dsdot.c
View File

@ -35,8 +35,8 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
CTEST(dsdot,dsdot_n_1) CTEST(dsdot,dsdot_n_1)
{ {
float x= 0.172555164; float x= 0.172555164F;
float y= -0.0138700781; float y= -0.0138700781F;
int incx=1; int incx=1;
int incy=1; int incy=1;
int n=1; int n=1;

12
utest/utest_main2.c
View File

@ -268,8 +268,8 @@ CTEST( zdotu,zdotu_n_1)
double y1[]={1.0,2.0}; double y1[]={1.0,2.0};
double x2[]={1.0,1.0}; double x2[]={1.0,1.0};
double y2[]={1.0,2.0}; double y2[]={1.0,2.0};
double _Complex result1=0.0; _Complex result1=0.0;
double _Complex result2={-1.0000+3.0000*I}; _Complex result2={-1.0000+3.0000*I};
//OpenBLAS //OpenBLAS
result1=BLASFUNC(zdotu)(&N,x1,&incX,y1,&incY); result1=BLASFUNC(zdotu)(&N,x1,&incX,y1,&incY);
@ -285,8 +285,8 @@ CTEST(zdotu, zdotu_offset_1)
double y1[]={5.0,6.0,7.0,8.0}; double y1[]={5.0,6.0,7.0,8.0};
double x2[]={1.0,2.0,3.0,4.0}; double x2[]={1.0,2.0,3.0,4.0};
double y2[]={5.0,6.0,7.0,8.0}; double y2[]={5.0,6.0,7.0,8.0};
double _Complex result1=0.0; _Complex result1=0.0;
double _Complex result2={-9.0000+32.0000*I}; _Complex result2={-9.0000+32.0000*I};
//OpenBLAS //OpenBLAS
result1=BLASFUNC(zdotu)(&N,x1+1,&incX,y1+1,&incY); result1=BLASFUNC(zdotu)(&N,x1+1,&incX,y1+1,&incY);
@ -297,8 +297,8 @@ CTEST(zdotu, zdotu_offset_1)
CTEST(dsdot,dsdot_n_1) CTEST(dsdot,dsdot_n_1)
{ {
float x= 0.172555164; float x= 0.172555164F;
float y= -0.0138700781; float y= -0.0138700781F;
int incx=1; int incx=1;
int incy=1; int incy=1;
int n=1; int n=1;