Am 06.10.19 um 17:26 schrieb Thomas Koenig:
This
also restores Lapack compilation without warning.

Well, up to an error in the testing routines, at least.

TESTING/LIN/sdrvls.f has

      REAL, ALLOCATABLE :: WORK (:)
...

      REAL               RESULT( NTESTS ), WQ

and calls

                              CALL SGELS( TRANS, M, N, NRHS, A, LDA,
     $                                    B, LDB, WQ, -1, INFO )

[...]

                              CALL SGELS( TRANS, M, N, NRHS, A, LDA, B,
     $                                    LDB, WORK, LWORK, INFO )

so that one really is illegal and should be flagged.

Reply via email to