X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Fnp.c;h=b631820903e6ebf4e41a536ebe7ea964924af918;hb=97f9b8ad137e333af9b3c767556d28dfda93a461;hp=d36acc2a6192c7b7f81b4884ebc299bc95ca2b1f;hpb=b46b794dfb9f0758aafec83f50993d1930894099;p=pspp diff --git a/src/math/np.c b/src/math/np.c index d36acc2a61..b631820903 100644 --- a/src/math/np.c +++ b/src/math/np.c @@ -24,6 +24,7 @@ #include #include #include +#include #include #include @@ -32,8 +33,8 @@ static void destroy (struct statistic *stat) { - struct order_stats *os = (struct order_stats *) stat; - free (os); + struct np *np = UP_CAST (stat, struct np, parent.parent); + free (np); } @@ -42,7 +43,7 @@ acc (struct statistic *s, const struct ccase *cx UNUSED, double c, double cc, double y) { struct ccase *cp; - struct np *np = (struct np *) s; + struct np *np = UP_CAST (s, struct np, parent.parent); double rank = np->prev_cc + (c + 1) / 2.0; double ns = gsl_cdf_ugaussian_Pinv (rank / ( np->n + 1 ));