fix prototype

martin-frbg · Oct 8, 2023 · d8126c7 · d8126c7
1 parent 769a58e
commit d8126c7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/ctest/c_cblat1c.c b/ctest/c_cblat1c.c
@@ -887,7 +887,7 @@ static real c_b43 = (float)1.;
 /* 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 ***************************** */