matrix: Avoid gsl_linalg_LU_invx() because it was new in GSL 2.6.

[pspp] / src / language / stats / mann-whitney.c

diff --git a/src/language/stats/mann-whitney.c b/src/language/stats/mann-whitney.c
index eced71f9114da17644b05e134503495cfdfb545d..2301cd13c53ed207643e4314408c19fc4cb88171 100644 (file)
--- a/src/language/stats/mann-whitney.c
+++ b/src/language/stats/mann-whitney.c
@@ -94,7 +94,7 @@ mann_whitney_execute (const struct dataset *ds,
   const struct caseproto *proto = casereader_get_proto (input);
   size_t rank_idx = caseproto_get_n_widths (proto);
 
-  struct mw *mw = xcalloc (nst->n_vars, sizeof *mw);
+  struct mw *mw = XCALLOC (nst->n_vars,  struct mw);
 
   for (i = 0; i < nst->n_vars; ++i)
     {
@@ -127,7 +127,7 @@ mann_whitney_execute (const struct dataset *ds,
        {
          const union value *group = case_data (c, nst->indep_var);
          const size_t group_var_width = var_get_width (nst->indep_var);
-         const double rank = case_data_idx (c, rank_idx)->f;
+         const double rank = case_num_idx (c, rank_idx);
 
          if (value_equal (group, &nst->val1, group_var_width))
            {