X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fdescriptives.c;h=958c00d89ea90beaba3013834137ff4a96702f3d;hb=92f198d13c9214c0d75b936f0ea0dc2684ea914b;hp=62c0ede0d9a12cd0111bebbeae0cd6fcabf75ff3;hpb=83141cdd4ab281da80d5dfeda05073f0cb354eab;p=pspp diff --git a/src/language/stats/descriptives.c b/src/language/stats/descriptives.c index 62c0ede0d9..958c00d89e 100644 --- a/src/language/stats/descriptives.c +++ b/src/language/stats/descriptives.c @@ -20,25 +20,29 @@ /* FIXME: Many possible optimizations. */ #include -#include + #include #include #include -#include -#include + #include #include -#include -#include #include +#include +#include +#include +#include +#include #include -#include +#include +#include +#include +#include #include +#include #include #include #include -#include -#include #include "gettext.h" #define _(msgid) gettext (msgid) @@ -175,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. */ @@ -693,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];