Fix missing comma

Reference-LAPACK · Aug 22, 2023 · 91c7f9e · 91c7f9e
1 parent 650c432
commit 91c7f9e
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/BLAS/TESTING/cblat3.f b/BLAS/TESTING/cblat3.f
@@ -3846,7 +3846,7 @@ SUBROUTINE CCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
 *                          Call the subroutine.
 *
                            IF( TRACE )
-     $                        WRITE( NTRA, FMT = 9995 )NC, SNAME, UPLO
+     $                        WRITE( NTRA, FMT = 9995 )NC, SNAME, UPLO,
      $                        TRANSA, TRANSB, N, K, ALPHA, LDA, LDB,
      $                        BETA, LDC
                            IF( REWI )

diff --git a/BLAS/TESTING/zblat3.f b/BLAS/TESTING/zblat3.f
@@ -3860,7 +3860,7 @@ SUBROUTINE ZCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
 *                          Call the subroutine.
 *
                            IF( TRACE )
-     $                        WRITE( NTRA, FMT = 9995 )NC, SNAME, UPLO
+     $                        WRITE( NTRA, FMT = 9995 )NC, SNAME, UPLO,
      $                        TRANSA, TRANSB, N, K, ALPHA, LDA, LDB,
      $                        BETA, LDC
                            IF( REWI )