Fix signatures of external functions in the f2c-generated C sources

This commit is contained in:
martin-frbg
2022-12-14 14:06:55 +01:00
parent 48f4151373
commit 8df791e513
1949 changed files with 14669 additions and 14041 deletions

View File

@@ -654,11 +654,11 @@ real clanhb_(char *norm, char *uplo, integer *n, integer *k, complex *ab,
/* Local variables */
real absa;
extern /* Subroutine */ int scombssq_(real *, real *);
extern /* Subroutine */ void scombssq_(real *, real *);
integer i__, j, l;
extern logical lsame_(char *, char *);
real value;
extern /* Subroutine */ int classq_(integer *, complex *, integer *, real
extern /* Subroutine */ void classq_(integer *, complex *, integer *, real
*, real *);
extern logical sisnan_(real *);
real colssq[2], sum, ssq[2];