X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Flanguage%2Fstats%2Fdescriptives.c;h=958c00d89ea90beaba3013834137ff4a96702f3d;hb=eba3cf1b8a2fcfee20eabc51aa8f91b1f276f2f7;hp=4c5b7ff0a836ed268dc2843c5305d03a2dd01624;hpb=81fff61a96bece351e381ad3fef8ab1248a952ba;p=pspp diff --git a/src/language/stats/descriptives.c b/src/language/stats/descriptives.c index 4c5b7ff0a8..958c00d89e 100644 --- a/src/language/stats/descriptives.c +++ b/src/language/stats/descriptives.c @@ -32,7 +32,9 @@ #include #include #include +#include #include +#include #include #include #include @@ -177,7 +179,8 @@ static void dump_z_table (struct dsc_proc *); static void setup_z_trns (struct dsc_proc *); /* Procedure execution functions. */ -static bool calc_descriptives (const struct casefile *, void *dsc_); +static bool calc_descriptives (const struct ccase *first, + const struct casefile *, void *dsc_); static void display (struct dsc_proc *dsc); /* Parser and outline. */ @@ -695,13 +698,16 @@ static int listwise_missing (struct dsc_proc *dsc, const struct ccase *c); /* Calculates and displays descriptive statistics for the cases in CF. */ static bool -calc_descriptives (const struct casefile *cf, void *dsc_) +calc_descriptives (const struct ccase *first, + const struct casefile *cf, void *dsc_) { struct dsc_proc *dsc = dsc_; struct casereader *reader; struct ccase c; size_t i; + output_split_file_values (first); + for (i = 0; i < dsc->var_cnt; i++) { struct dsc_var *dv = &dsc->vars[i];