From: Jason H Stover <jhs@franz.gcsu.edu>
Date: Sun, 25 Jul 2010 16:34:46 +0000 (-0400)
Subject: Fix upper bound for subscript in ordered_cols.
X-Git-Tag: sav-api~146
X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=afa714cc8f7d7d8a71b3148eb8034ee4f3717d0b;p=pspp

Fix upper bound for subscript in ordered_cols.
---

diff --git a/lib/linreg/sweep.c b/lib/linreg/sweep.c
index 7d7dfc917f..0dfa71fb6a 100644
--- a/lib/linreg/sweep.c
+++ b/lib/linreg/sweep.c
@@ -88,7 +88,7 @@ reg_sweep (gsl_matrix * A, int last_col)
 	    {
 	      ordered_cols[i] = i;
 	    }
-	  for (i = last_col + 1; i < A->size1 - 1; i++)
+	  for (i = last_col + 1; i < A->size1; i++)
 	    {
 	      ordered_cols[i - 1] = i;
 	    }