projects
/
pspp-builds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Continue reforming procedure execution. In this phase, get rid of the
[pspp-builds.git]
/
src
/
language
/
stats
/
examine.q
diff --git
a/src/language/stats/examine.q
b/src/language/stats/examine.q
index bf2c3fd17f96fac51778adcbc04604dcce86e17e..e2bd897a5200f20838959727368e74c691cda686 100644
(file)
--- a/
src/language/stats/examine.q
+++ b/
src/language/stats/examine.q
@@
-33,6
+33,7
@@
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
#include <data/value-labels.h>
#include <data/variable.h>
#include <language/command.h>
#include <data/value-labels.h>
#include <data/variable.h>
#include <language/command.h>
+#include <language/dictionary/split-file.h>
#include <language/lexer/lexer.h>
#include <libpspp/alloc.h>
#include <libpspp/compiler.h>
#include <language/lexer/lexer.h>
#include <libpspp/alloc.h>
#include <libpspp/compiler.h>
@@
-150,7
+151,8
@@
void box_plot_variables(const struct factor *fctr,
/* Per Split function */
/* 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);
static void output_examine(void);
@@
-676,7
+678,7
@@
factor_calc(struct ccase *c, int case_no, double weight, int case_missing)
}
static bool
}
static bool
-run_examine(const struct casefile *cf, void *cmd_ )
+run_examine(const struct c
case *first, const struct c
asefile *cf, void *cmd_ )
{
struct casereader *r;
struct ccase c;
{
struct casereader *r;
struct ccase c;
@@
-684,9
+686,13
@@
run_examine(const struct casefile *cf, void *cmd_ )
const struct cmd_examine *cmd = (struct cmd_examine *) 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 */
/* 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;
while (fctr)
{
struct factor *next = fctr->next;