From: julie <julielangou@users.noreply.github.com>
Date: Fri, 30 Jan 2015 07:29:56 +0000 (+0000)
Subject: Ed Anderson Bug Fix - Jan 26 2015
X-Git-Tag: submit/tizen/20180313.231549~392
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=b1ebc7d44e19995ed50619030bf57ed9138b485e;p=platform%2Fupstream%2Flapack.git

Ed Anderson Bug Fix - Jan 26 2015

In TESTING/LIN/schkrq.f and schklq.f (only those, not the other precisions), the loop to look for test failures runs from 1 to NTESTS, it should be 1 to NT.
---

diff --git a/TESTING/LIN/schklq.f b/TESTING/LIN/schklq.f
index 77a94bf5..5dadb953 100644
--- a/TESTING/LIN/schklq.f
+++ b/TESTING/LIN/schklq.f
@@ -411,7 +411,7 @@
 *                    Print information about the tests that did not
 *                    pass the threshold.
 *
-                     DO 20 I = 1, NTESTS
+                     DO 20 I = 1, NT
                         IF( RESULT( I ).GE.THRESH ) THEN
                            IF( NFAIL.EQ.0 .AND. NERRS.EQ.0 )
      $                        CALL ALAHD( NOUT, PATH )
diff --git a/TESTING/LIN/schkrq.f b/TESTING/LIN/schkrq.f
index 0131a7b5..f2380446 100644
--- a/TESTING/LIN/schkrq.f
+++ b/TESTING/LIN/schkrq.f
@@ -416,7 +416,7 @@
 *                    Print information about the tests that did not
 *                    pass the threshold.
 *
-                     DO 20 I = 1, NTESTS
+                     DO 20 I = 1, NT
                         IF( RESULT( I ).GE.THRESH ) THEN
                            IF( NFAIL.EQ.0 .AND. NERRS.EQ.0 )
      $                        CALL ALAHD( NOUT, PATH )