Skip to content

Commit 869a169

Browse files
authored
Fix ZAXPYTEST prototype
1 parent 4850275 commit 869a169

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

ctest/c_zblat1c.c

+2-2
Original file line numberDiff line numberDiff line change
@@ -380,7 +380,7 @@ static doublereal c_b43 = 1.;
380380
static integer i__;
381381
extern /* Subroutine */ int ctest_(integer*, doublecomplex*, doublecomplex*, doublecomplex*, doublereal*);
382382
static doublecomplex mwpcs[5], mwpct[5];
383-
extern /* Subroutine */ int zscaltest_(integer*, doublereal*, doublecomplex*, integer*), itest1_(integer*, integer*), stest1_(doublereal*, doublereal*, doublereal*, doublereal*);
383+
extern /* Subroutine */ int zscaltest_(integer*, doublecomplex*, doublecomplex*, integer*), itest1_(integer*, integer*), stest1_(doublereal*, doublereal*, doublereal*, doublereal*);
384384
static doublecomplex cx[8];
385385
extern doublereal dznrm2test_(integer*, doublecomplex*, integer*);
386386
static integer np1;
@@ -595,7 +595,7 @@ static doublereal c_b43 = 1.;
595595
static integer ki;
596596
extern /* Subroutine */ int zdotutest_(integer*, doublecomplex*, integer*, doublecomplex*, integer*, doublecomplex*), zswaptest_(integer*, doublecomplex*, integer*, doublecomplex*, integer*);
597597
static integer kn;
598-
extern /* Subroutine */ int zaxpytest_(integer*, doublereal*, doublecomplex*, integer*, doublecomplex*, integer*);
598+
extern /* Subroutine */ int zaxpytest_(integer*, doublecomplex*, doublecomplex*, integer*, doublecomplex*, integer*);
599599
static doublecomplex cx[7], cy[7];
600600
static integer mx, my;
601601

0 commit comments

Comments
 (0)