floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix prototype of itest1 for INTERFACE64

This commit is contained in:
Martin Kroeker 2023-10-08 11:36:06 +02:00 committed by GitHub
parent 1806cfecbc
commit 65bfe1a06d
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ctest/c_sblat1c.c
View File

@ -437,7 +437,7 @@ L40:
static real stemp[1], strue[8]; static real stemp[1], strue[8];
extern /* Subroutine */ int stest_(int*, real*,real*,real*,real*), sscaltest_(int*,real*,real*,int*); extern /* Subroutine */ int stest_(int*, real*,real*,real*,real*), sscaltest_(int*,real*,real*,int*);
extern real sasumtest_(int*,real*,int*); extern real sasumtest_(int*,real*,int*);
extern /* Subroutine */ int itest1_(int*,int*), stest1_(real*,real*,real*,real*); extern /* Subroutine */ int itest1_(integer*,integer*), stest1_(real*,real*,real*,real*);
static real sx[8]; static real sx[8];
static integer np1; static integer np1;
extern integer isamaxtest_(int*,real*,int*); extern integer isamaxtest_(int*,real*,int*);