X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Flevene.c;h=acb1cebfc0a1b07c2cfdebb9f0108d15395429ee;hb=48baf40c86d10eac3525d4199c9bb0ecc94c9d4d;hp=f5ed0568f1721558204c63f230103ff3d5bd51b0;hpb=f43378497b8400e9c22a3485c534693dc1bc9554;p=pspp diff --git a/src/math/levene.c b/src/math/levene.c index f5ed0568f1..acb1cebfc0 100644 --- a/src/math/levene.c +++ b/src/math/levene.c @@ -2,7 +2,6 @@ Computes Levene test statistic. Copyright (C) 2004 Free Software Foundation, Inc. - Written by John Darrington This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as @@ -187,7 +186,7 @@ levene_calc (const struct dictionary *dict, const struct ccase *c, { size_t i; bool warn = false; - const union value *gv = case_data (c, l->v_indep->fv); + const union value *gv = case_data (c, l->v_indep); struct group_statistics key; double weight = dict_get_case_weight (dict, c, &warn); @@ -198,7 +197,7 @@ levene_calc (const struct dictionary *dict, const struct ccase *c, struct variable *var = l->v_dep[i]; struct group_proc *gp = group_proc_get (var); double levene_z; - const union value *v = case_data (c, var->fv); + const union value *v = case_data (c, var); struct group_statistics *gs; gs = hsh_find(gp->group_hash,(void *) &key ); @@ -278,7 +277,7 @@ levene2_calc (const struct dictionary *dict, const struct ccase *c, double weight = dict_get_case_weight (dict, c, &warn); - const union value *gv = case_data (c, l->v_indep->fv); + const union value *gv = case_data (c, l->v_indep); struct group_statistics key; key.id = *gv; @@ -287,7 +286,7 @@ levene2_calc (const struct dictionary *dict, const struct ccase *c, { double levene_z; struct variable *var = l->v_dep[i] ; - const union value *v = case_data (c, var->fv); + const union value *v = case_data (c, var); struct group_statistics *gs; gs = hsh_find(group_proc_get (var)->group_hash,(void *) &key );