X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Ftrimmed-mean.c;h=dff256c0d3319cd4bd0892adbcf250219a0e7505;hb=2ad9fc0f13133346ba6b153bf38a2fc06bf0be51;hp=d75b539a6692cb1c1ab5e299ab6538cf6968811d;hpb=96994a54e60e9c95b8bba54c2281acf7059b1203;p=pspp diff --git a/src/math/trimmed-mean.c b/src/math/trimmed-mean.c index d75b539a66..dff256c0d3 100644 --- a/src/math/trimmed-mean.c +++ b/src/math/trimmed-mean.c @@ -44,38 +44,34 @@ static void destroy (struct statistic *s) { struct trimmed_mean *tm = UP_CAST (s, struct trimmed_mean, parent.parent); - struct order_stats *os = &tm->parent; - free (os->k); free (tm); } struct trimmed_mean * trimmed_mean_create (double W, double tail) { - struct trimmed_mean *tm = xzalloc (sizeof (*tm)); - struct order_stats *os = &tm->parent; - struct statistic *stat = &os->parent; - - os->n_k = 2; - os->k = xcalloc (2, sizeof (*os->k)); - assert (tail >= 0); assert (tail <= 1); - os->k[0].tc = tail * W; - os->k[1].tc = W * (1 - tail); - - stat->accumulate = acc; - stat->destroy = destroy; - - tm->cyk1p1 = SYSMIS; - tm->w = W; - tm->tail = tail; - + struct trimmed_mean *tm = xmalloc (sizeof *tm); + *tm = (struct trimmed_mean) { + .parent = { + .parent = { + .destroy = destroy, + }, + .accumulate = acc, + .k = tm->k, + .n_k = 2, + }, + .k[0] = { .tc = tail * W }, + .k[1] = { .tc = W * (1 - tail) }, + .cyk1p1 = SYSMIS, + .w = W, + .tail = tail, + }; return tm; } - double trimmed_mean_calculate (const struct trimmed_mean *tm) {