Skip to content

Commit c30b530

Browse files
authored
fix prototypes of ctest and itest for INTERFACE64
1 parent 2b865da commit c30b530

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

ctest/c_cblat1c.c

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -437,9 +437,9 @@ static real c_b43 = (float)1.;
437437

438438
/* Local variables */
439439
static integer i__;
440-
extern /* Subroutine */ int ctest_(int*, complex*, complex*, complex*, real*);
440+
extern /* Subroutine */ int ctest_(integer*, complex*, complex*, complex*, real*);
441441
static complex mwpcs[5], mwpct[5];
442-
extern /* Subroutine */ int itest1_(int*, int*), stest1_(real*,real*,real*,real*);
442+
extern /* Subroutine */ int itest1_(integer*, integer*), stest1_(real*,real*,real*,real*);
443443
static complex cx[8];
444444
extern real scnrm2test_(int*, complex*, int*);
445445
static integer np1;
@@ -734,7 +734,7 @@ static real c_b43 = (float)1.;
734734
static complex cdot[1];
735735
static integer lenx, leny, i__;
736736
static complex ctemp;
737-
extern /* Subroutine */ int ctest_(int*, complex*, complex*, complex*, real*);
737+
extern /* Subroutine */ int ctest_(integer*, complex*, complex*, complex*, real*);
738738
static integer ksize;
739739
extern /* Subroutine */ int cdotctest_(int*, complex*, int*, complex*, int*,complex*), ccopytest_(int*, complex*, int*, complex*, int*), cdotutest_(int*, complex*, int*, complex*, int*, complex*),
740740
cswaptest_(int*, complex*, int*, complex*, int*), caxpytest_(int*, complex*, complex*, int*, complex*, int*);
@@ -939,7 +939,7 @@ doublereal sdiff_(real* sa, real* sb)
939939
/* Local variables */
940940
static integer i__;
941941
static real scomp[20], ssize[20], strue[20];
942-
extern /* Subroutine */ int stest_(int*, real*,real*,real*,real*);
942+
extern /* Subroutine */ int stest_(integer*, real*,real*,real*,real*);
943943

944944
/* **************************** CTEST ***************************** */
945945

0 commit comments

Comments
 (0)