Apply fix for Reference-LAPACK issue 394
reference to XERBLA extending beyond column 72, breaking builds with compilers that default to traditional punch card format
This commit is contained in:
parent
9c22170f52
commit
b25ae1fc60
|
@ -282,7 +282,8 @@
|
||||||
$ NPLUSONE
|
$ NPLUSONE
|
||||||
* ..
|
* ..
|
||||||
* .. External Subroutines ..
|
* .. External Subroutines ..
|
||||||
EXTERNAL SCOPY, SLAORHR_COL_GETRFNP, SSCAL, STRSM, XERBLA
|
EXTERNAL SCOPY, SLAORHR_COL_GETRFNP, SSCAL, STRSM,
|
||||||
|
$XERBLA
|
||||||
* ..
|
* ..
|
||||||
* .. Intrinsic Functions ..
|
* .. Intrinsic Functions ..
|
||||||
INTRINSIC MAX, MIN
|
INTRINSIC MAX, MIN
|
||||||
|
@ -436,4 +437,4 @@
|
||||||
*
|
*
|
||||||
* End of SORHR_COL
|
* End of SORHR_COL
|
||||||
*
|
*
|
||||||
END
|
END
|
||||||
|
|
Loading…
Reference in New Issue