X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fregression.q;h=2b31158d5418c8009f2fbab38fad2c75dd216af3;hb=7e20fcdcb76eeb8a3f3ddc67da0000ff73d9e8ed;hp=abb3bd353aebea6814d55c7b7c00ab0be926f95a;hpb=74469ec6a0f6b5b33c4afaace173710adac46634;p=pspp-builds.git

diff --git a/src/language/stats/regression.q b/src/language/stats/regression.q
index abb3bd35..2b31158d 100644
--- a/src/language/stats/regression.q
+++ b/src/language/stats/regression.q
@@ -821,22 +821,17 @@ fill_covariance (gsl_matrix *cov, struct covariance *all_cov,
   
   for (i = 0; i < n_all_vars; i++)
     {
-      for (j = k; j < n_vars; j++)
+      for (j = 0; j < n_vars; j++)
 	{
 	  if (vars[j] == all_vars[i])
 	    {
-	      if (vars[j] != dep_var)
-		{
-		  rows[j] = i;
-		}
-	      else
-		{
-		  dep_subscript = i;
-		}
-	      k++;
-	      break;
+	      rows[j] = i;
 	    }
 	}
+      if (all_vars[i] == dep_var)
+	{
+	  dep_subscript = i;
+	}
     }
   for (i = 0; i < cov->size1 - 1; i++)
     {