I tried porting this package to GCC 14, but I'm stuck on this error:


In file included from /builddir/build/BUILD/ATLAS/x86_64_base/..//src/testing/ATL_f77gelqf.c:31:
/builddir/build/BUILD/ATLAS/x86_64_base/..//src/testing/ATL_f77gelqf.c: In function ‘ATL_df77gelqf’:
/builddir/build/BUILD/ATLAS/x86_64_base/..//include/atlas_misc.h:127:16: error: implicit declaration of function ‘dgelqf_’
  127 |    #define PRE d
      |                ^
/builddir/build/BUILD/ATLAS/x86_64_base/..//include/atlas_misc.h:74:27: note: in definition of macro ‘my_join’
   74 | #define my_join(pre, nam) pre ## nam
      |                           ^~~
/builddir/build/BUILD/ATLAS/x86_64_base/..//src/testing/ATL_f77gelqf.c:40:21: note: in expansion of macro ‘Mjoin’
   40 |    #define F77GELQF Mjoin(PRE,gelqf_)
      |                     ^~~~~
/builddir/build/BUILD/ATLAS/x86_64_base/..//src/testing/ATL_f77gelqf.c:40:27: note: in expansion of macro ‘PRE’
   40 |    #define F77GELQF Mjoin(PRE,gelqf_)
      |                           ^~~
/builddir/build/BUILD/ATLAS/x86_64_base/..//src/testing/ATL_f77gelqf.c:58:4: note: in expansion of macro ‘F77GELQF’
   58 |    F77GELQF(&F77M, &F77N, A, &F77lda, tau, work, &F77lwork, &F77info);
      |    ^~~~~~~~

This requires creating a C prototype for a Fortran routine:

      SUBROUTINE DGELQF( M, N, A, LDA, TAU, WORK, LWORK, INFO )
      INTEGER            INFO, LDA, LWORK, M, N
      DOUBLE PRECISION A( LDA, * ), TAU( * ), WORK( * )

(ATLAS/interfaces/lapack/F77/src/dgelqf.f) I don't know enough Fortran to fix this.

I suppose we can add a build flags exemptions for this package.

Reproducible: Always