X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Fcoefficient.c;h=51c1a9077cd6404efb195bb8ca8bc9583b4ac941;hb=a1fa03b1638263a959df0b2943478a0a4ca4b11a;hp=f59c3645212d2774be8d1b49b536c5b5ca5978bb;hpb=888d0f91d57e0c3c5a4206c30ac71eb87bf44227;p=pspp-builds.git diff --git a/src/math/coefficient.c b/src/math/coefficient.c index f59c3645..51c1a907 100644 --- a/src/math/coefficient.c +++ b/src/math/coefficient.c @@ -21,6 +21,7 @@ /* Accessor functions for matching coefficients and variables. */ +#include #include #include #include "src/math/design-matrix.h" @@ -68,8 +69,7 @@ pspp_coeff_init (struct pspp_coeff ** c, const struct design_matrix *X) */ c[i]->v_info = xnmalloc (c[i]->n_vars, sizeof (*c[i]->v_info)); assert (c[i]->v_info != NULL); - c[i]->v_info->v = - (const struct variable *) design_matrix_col_to_var (X, i); + c[i]->v_info->v = design_matrix_col_to_var (X, i); if (var_is_alpha (c[i]->v_info->v)) { @@ -78,7 +78,7 @@ pspp_coeff_init (struct pspp_coeff ** c, const struct design_matrix *X) assert (k <= i); k = i - k; c[i]->v_info->val = - cat_subscript_to_value (k, (struct variable *) c[i]->v_info->v); + cat_subscript_to_value (k, c[i]->v_info->v); } } } @@ -169,7 +169,7 @@ pspp_coeff_get_value (struct pspp_coeff *c, while (i < c->n_vars) { candidate = pspp_coeff_get_var (c, i); - if (v->index == candidate->index) + if (v == candidate) { return (c->v_info + i)->val; } @@ -201,7 +201,7 @@ pspp_linreg_get_coeff (const pspp_linreg_cache * c, result = c->coeff[i]; tmp = pspp_coeff_get_var (result, 0); - while (tmp->index != v->index && i < c->n_coeffs) + while (tmp != v && i < c->n_coeffs) { result = c->coeff[i]; tmp = pspp_coeff_get_var (result, 0); @@ -221,7 +221,7 @@ pspp_linreg_get_coeff (const pspp_linreg_cache * c, If v is categorical, we need to ensure the coefficient matches the VAL. */ - while (tmp->index != v->index && i < c->n_coeffs + while (tmp != v && i < c->n_coeffs && compare_values (pspp_coeff_get_value (result, tmp), val, var_get_width (v))) { /* FIX THIS */