X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Freliability.q;h=25aff211dd739b8d63f8af886a565cadafdde11d;hb=cc57a28ef6796ae9a64ef80d453f72126956d49d;hp=8384bb350312100214e33cfcff1b1f5057d70703;hpb=9bf1c33953f7feff2a24a06293f6fe96b75cc41a;p=pspp-builds.git

diff --git a/src/language/stats/reliability.q b/src/language/stats/reliability.q
index 8384bb35..25aff211 100644
--- a/src/language/stats/reliability.q
+++ b/src/language/stats/reliability.q
@@ -1,5 +1,5 @@
 /* PSPP - a program for statistical analysis.
-   Copyright (C) 2008 Free Software Foundation, Inc.
+   Copyright (C) 2008, 2009 Free Software Foundation, Inc.
 
    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
@@ -304,7 +304,7 @@ run_reliability (struct casereader *input, struct dataset *ds UNUSED,
 {
   int i;
   int si;
-  struct ccase c;
+  struct ccase *c;
   casenumber n_missing ;
   casenumber n_valid = 0;
 
@@ -338,7 +338,7 @@ run_reliability (struct casereader *input, struct dataset *ds UNUSED,
 					  s, NULL);
     }
 
-  for (; casereader_read (input, &c); case_destroy (&c))
+  for (; (c = casereader_read (input)) != NULL; case_unref (c))
     {
       double weight = 1.0;
       n_valid ++;
@@ -348,9 +348,9 @@ run_reliability (struct casereader *input, struct dataset *ds UNUSED,
 	  struct cronbach *s = &rel->sc[si];
 
 	  for (i = 0 ; i < s->n_items ; ++i )
-	    moments1_add (s->m[i], case_data (&c, s->items[i])->f, weight);
+	    moments1_add (s->m[i], case_data (c, s->items[i])->f, weight);
 
-	  moments1_add (s->total, case_data_idx (&c, s->totals_idx)->f, weight);
+	  moments1_add (s->total, case_data_idx (c, s->totals_idx)->f, weight);
 	}
     }
   casereader_destroy (input);