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,7 +654,7 @@ f"> */
/* > \ingroup complex16OTHERauxiliary */
/* ===================================================================== */
/* Subroutine */ int zlagtm_(char *trans, integer *n, integer *nrhs,
/* Subroutine */ void zlagtm_(char *trans, integer *n, integer *nrhs,
doublereal *alpha, doublecomplex *dl, doublecomplex *d__,
doublecomplex *du, doublecomplex *x, integer *ldx, doublereal *beta,
doublecomplex *b, integer *ldb)
@@ -691,7 +691,7 @@ f"> */
/* Function Body */
if (*n == 0) {
return 0;
return;
}
/* Multiply B by BETA if BETA.NE.1. */
@@ -1161,7 +1161,7 @@ f"> */
}
}
}
return 0;
return;
/* End of ZLAGTM */