fix prototype

This commit is contained in:
Martin Kroeker 2023-10-08 13:38:39 +02:00 committed by GitHub
parent 769a58e9d1
commit d8126c76e7
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions

View File

@ -887,7 +887,7 @@ L40:
/* Subroutine */ int stest1_(real* scomp1, real* strue1, real* ssize, real* sfac)
{
static real scomp[1], strue[1];
extern /* Subroutine */ int stest_(int*, real*, real*, real*, real*);
extern /* Subroutine */ int stest_(integer*, real*, real*, real*, real*);
/* ************************* STEST1 ***************************** */