work on crash

[pspp] / src / language / stats / cochran.c

diff --git a/src/language/stats/cochran.c b/src/language/stats/cochran.c
index 4b881f393c7318e06c41501bc4038d74b6992082..9b03296f19a730e0d45b0c86754302d4a25894de 100644 (file)
--- a/src/language/stats/cochran.c
+++ b/src/language/stats/cochran.c
@@ -80,13 +80,13 @@ cochran_execute (const struct dataset *ds,
   for (; (c = casereader_read (input)); case_unref (c))
     {
       double case_hits = 0.0;
-      const double w = weight ? case_data (c, weight)->f: 1.0;
+      const double w = weight ? case_num (c, weight) : 1.0;
       for (v = 0; v < ct->n_vars; ++v)
        {
          const struct variable *var = ct->vars[v];
          const union value *val = case_data (c, var);
 
-         if (var_is_value_missing (var, val, exclude))
+         if (var_is_value_missing (var, val) & exclude)
            continue;
 
          if (ch.success == SYSMIS)