X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fstats%2Fexamine.q;h=e2bd897a5200f20838959727368e74c691cda686;hb=5e89e0049bd55f22412f547d8d7bfefc69443e98;hp=aad3baa10fd4380e68b0faddede7d834480b6966;hpb=8444d8d47de5e5f8d076b6f43f73c2c29494031e;p=pspp-builds.git diff --git a/src/language/stats/examine.q b/src/language/stats/examine.q index aad3baa1..e2bd897a 100644 --- a/src/language/stats/examine.q +++ b/src/language/stats/examine.q @@ -19,33 +19,36 @@ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */ #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 -#include -#include +#include #include #include #include #include #include +#include +#include #include "gettext.h" #define _(msgid) gettext (msgid) @@ -148,7 +151,8 @@ void box_plot_variables(const struct factor *fctr, /* Per Split function */ -static bool run_examine(const struct casefile *cf, void *cmd_); +static bool run_examine(const struct ccase *, + const struct casefile *cf, void *cmd_); static void output_examine(void); @@ -285,12 +289,13 @@ output_examine(void) { if ( cmd.cmp == XMN_GROUPS ) { - box_plot_group(0, dependent_vars, n_dependent_vars, - cmd.v_id); + box_plot_group (0, (const struct variable **) dependent_vars, + n_dependent_vars, cmd.v_id); } else - box_plot_variables(0, dependent_vars, n_dependent_vars, - cmd.v_id); + box_plot_variables (0, + (const struct variable **) dependent_vars, + n_dependent_vars, cmd.v_id); } if ( cmd.a_plot[XMN_PLT_HISTOGRAM] ) @@ -342,11 +347,13 @@ output_examine(void) if ( cmd.a_plot[XMN_PLT_BOXPLOT] ) { if ( cmd.cmp == XMN_VARIABLES ) - box_plot_variables(fctr, dependent_vars, n_dependent_vars, - cmd.v_id); + box_plot_variables (fctr, + (const struct variable **) dependent_vars, + n_dependent_vars, cmd.v_id); else - box_plot_group(fctr, dependent_vars, n_dependent_vars, - cmd.v_id); + box_plot_group (fctr, + (const struct variable **) dependent_vars, + n_dependent_vars, cmd.v_id); } for ( v = 0 ; v < n_dependent_vars; ++v ) @@ -671,7 +678,7 @@ factor_calc(struct ccase *c, int case_no, double weight, int case_missing) } static bool -run_examine(const struct casefile *cf, void *cmd_ ) +run_examine(const struct ccase *first, const struct casefile *cf, void *cmd_ ) { struct casereader *r; struct ccase c; @@ -679,9 +686,13 @@ run_examine(const struct casefile *cf, void *cmd_ ) const struct cmd_examine *cmd = (struct cmd_examine *) cmd_; + struct factor *fctr; + + output_split_file_values (first); + /* Make sure we haven't got rubbish left over from a previous split */ - struct factor *fctr = factors; + fctr = factors; while (fctr) { struct factor *next = fctr->next;