Skip to content

Commit f66e6d3

Browse files
martin-frbgmartin-frbg
authored
Merge pull request #4953 from NickelWenzel/fix_trtrs_return_types
fix: return types of *trtrs routines
2 parents a8bb105 + 79f4bbd commit f66e6d3

File tree

20 files changed

+23
-23
lines changed

20 files changed

+23
-23
lines changed

‎lapack-netlib/LAPACKE/include/lapack.h‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -22379,7 +22379,7 @@ lapack_int LAPACK_ztrtri_base(
2237922379
#endif
2238022380

2238122381
#define LAPACK_ctrtrs_base LAPACK_GLOBAL(ctrtrs,CTRTRS)
22382-
lapack_int LAPACK_ctrtrs_base(
22382+
void LAPACK_ctrtrs_base(
2238322383
char const* uplo, char const* trans, char const* diag,
2238422384
lapack_int const* n, lapack_int const* nrhs,
2238522385
lapack_complex_float const* A, lapack_int const* lda,
@@ -22396,7 +22396,7 @@ lapack_int LAPACK_ctrtrs_base(
2239622396
#endif
2239722397

2239822398
#define LAPACK_dtrtrs_base LAPACK_GLOBAL(dtrtrs,DTRTRS)
22399-
lapack_int LAPACK_dtrtrs_base(
22399+
void LAPACK_dtrtrs_base(
2240022400
char const* uplo, char const* trans, char const* diag,
2240122401
lapack_int const* n, lapack_int const* nrhs,
2240222402
double const* A, lapack_int const* lda,
@@ -22413,7 +22413,7 @@ lapack_int LAPACK_dtrtrs_base(
2241322413
#endif
2241422414

2241522415
#define LAPACK_strtrs_base LAPACK_GLOBAL(strtrs,STRTRS)
22416-
lapack_int LAPACK_strtrs_base(
22416+
void LAPACK_strtrs_base(
2241722417
char const* uplo, char const* trans, char const* diag,
2241822418
lapack_int const* n, lapack_int const* nrhs,
2241922419
float const* A, lapack_int const* lda,
@@ -22430,7 +22430,7 @@ lapack_int LAPACK_strtrs_base(
2243022430
#endif
2243122431

2243222432
#define LAPACK_ztrtrs_base LAPACK_GLOBAL(ztrtrs,ZTRTRS)
22433-
lapack_int LAPACK_ztrtrs_base(
22433+
void LAPACK_ztrtrs_base(
2243422434
char const* uplo, char const* trans, char const* diag,
2243522435
lapack_int const* n, lapack_int const* nrhs,
2243622436
lapack_complex_double const* A, lapack_int const* lda,

‎lapack-netlib/SRC/cgels.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -739,7 +739,7 @@ static integer c__0 = 0;
739739
complex *, complex *, integer *, complex *, integer *, integer *);
740740
real smlnum;
741741
logical lquery;
742-
extern /* Subroutine */ int ctrtrs_(char *, char *, char *, integer *,
742+
extern /* Subroutine */ void ctrtrs_(char *, char *, char *, integer *,
743743
integer *, complex *, integer *, complex *, integer *, integer *);
744744

745745

‎lapack-netlib/SRC/cgelst.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -748,7 +748,7 @@ f"> */
748748
integer mnnrhs;
749749
real smlnum;
750750
logical lquery;
751-
extern /* Subroutine */ int ctrtrs_(char *, char *, char *, integer *,
751+
extern /* Subroutine */ void ctrtrs_(char *, char *, char *, integer *,
752752
integer *, complex *, integer *, complex *, integer *, integer *);
753753
extern void cgemlqt_(char *, char *, integer *,
754754
integer *, integer *, integer *, complex *, integer *, complex *,

‎lapack-netlib/SRC/cgetsls.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -713,7 +713,7 @@ static integer c__0 = 0;
713713
real bignum, smlnum;
714714
integer wsizem, wsizeo;
715715
logical lquery;
716-
extern /* Subroutine */ int ctrtrs_(char *, char *, char *, integer *,
716+
extern /* Subroutine */ void ctrtrs_(char *, char *, char *, integer *,
717717
integer *, complex *, integer *, complex *, integer *, integer *);
718718
integer lw1, lw2, mnk;
719719
real dum[1];

‎lapack-netlib/SRC/cggglm.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -728,7 +728,7 @@ f"> */
728728
complex *, complex *, integer *, complex *, integer *, integer *);
729729
integer lwkopt;
730730
logical lquery;
731-
extern /* Subroutine */ int ctrtrs_(char *, char *, char *, integer *,
731+
extern /* Subroutine */ void ctrtrs_(char *, char *, char *, integer *,
732732
integer *, complex *, integer *, complex *, integer *, integer *);
733733

734734

‎lapack-netlib/SRC/cgglse.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -725,7 +725,7 @@ f"> */
725725
complex *, complex *, integer *, complex *, integer *, integer *);
726726
integer lwkopt;
727727
logical lquery;
728-
extern /* Subroutine */ int ctrtrs_(char *, char *, char *, integer *,
728+
extern /* Subroutine */ void ctrtrs_(char *, char *, char *, integer *,
729729
integer *, complex *, integer *, complex *, integer *, integer *);
730730

731731

‎lapack-netlib/SRC/dgels.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -739,7 +739,7 @@ static integer c__0 = 0;
739739
doublereal *, integer *, integer *);
740740
doublereal smlnum;
741741
logical lquery;
742-
extern /* Subroutine */ int dtrtrs_(char *, char *, char *, integer *,
742+
extern /* Subroutine */ void dtrtrs_(char *, char *, char *, integer *,
743743
integer *, doublereal *, integer *, doublereal *, integer *,
744744
integer *);
745745

‎lapack-netlib/SRC/dgelst.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -747,7 +747,7 @@ f"> */
747747
integer mnnrhs;
748748
doublereal smlnum;
749749
logical lquery;
750-
extern /* Subroutine */ int dtrtrs_(char *, char *, char *, integer *,
750+
extern /* Subroutine */ void dtrtrs_(char *, char *, char *, integer *,
751751
integer *, doublereal *, integer *, doublereal *, integer *,
752752
integer *);
753753
extern void dgemlqt_(char *, char *,

‎lapack-netlib/SRC/dgetsls.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -713,7 +713,7 @@ static integer c__0 = 0;
713713
doublereal bignum, smlnum;
714714
integer wsizem, wsizeo;
715715
logical lquery;
716-
extern /* Subroutine */ int dtrtrs_(char *, char *, char *, integer *,
716+
extern /* Subroutine */ void dtrtrs_(char *, char *, char *, integer *,
717717
integer *, doublereal *, integer *, doublereal *, integer *,
718718
integer *);
719719
integer lw1, lw2, mnk, lwm, lwo;

‎lapack-netlib/SRC/dggglm.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -730,7 +730,7 @@ f"> */
730730
doublereal *, integer *, integer *);
731731
integer lwkopt;
732732
logical lquery;
733-
extern /* Subroutine */ int dtrtrs_(char *, char *, char *, integer *,
733+
extern /* Subroutine */ void dtrtrs_(char *, char *, char *, integer *,
734734
integer *, doublereal *, integer *, doublereal *, integer *,
735735
integer *);
736736

0 commit comments

Comments
 (0)