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
2020-03-10 13:37:41 +01:00
parent 9c22170f52
commit b25ae1fc60
1 changed files with 3 additions and 2 deletions
@@ -282,7 +282,8 @@
     $                   NPLUSONE
 *     ..
 *     .. External Subroutines ..
-      EXTERNAL           SCOPY, SLAORHR_COL_GETRFNP, SSCAL, STRSM, XERBLA
+      EXTERNAL           SCOPY, SLAORHR_COL_GETRFNP, SSCAL, STRSM,
+     $XERBLA
 *     ..
 *     .. Intrinsic Functions ..
      INTRINSIC          MAX, MIN
@@ -436,4 +437,4 @@
 *
 *     End of SORHR_COL
 *
-      END
+      END