Fix signatures of external functions in the f2c-generated C sources
This commit is contained in:
@@ -666,12 +666,12 @@ real cla_hercond_c_(char *uplo, integer *n, complex *a, integer *lda,
|
||||
integer isave[3];
|
||||
real anorm;
|
||||
logical upper;
|
||||
extern /* Subroutine */ int clacn2_(integer *, complex *, complex *, real
|
||||
extern /* Subroutine */ void clacn2_(integer *, complex *, complex *, real
|
||||
*, integer *, integer *);
|
||||
logical up;
|
||||
extern /* Subroutine */ int xerbla_(char *, integer *, ftnlen);
|
||||
real ainvnm;
|
||||
extern /* Subroutine */ int chetrs_(char *, integer *, integer *, complex
|
||||
extern /* Subroutine */ void chetrs_(char *, integer *, integer *, complex
|
||||
*, integer *, integer *, complex *, integer *, integer *);
|
||||
real tmp;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user