struct ccase *c;
for (; (c = casereader_read (group)); case_unref (c))
{
- const double w = weight ? case_data (c, weight)->f: 1.0;
+ const double w = weight ? case_num (c, weight) : 1.0;
const union value *val = case_data (c, var);
- if (var_is_value_missing (var, val, exclude))
+ if (var_is_value_missing (var, val) & exclude)
continue;
x = val->f;
cc += w;
for (; (c = casereader_read (reader));)
{
const union value *val = case_data (c, var);
- const double w = weight ? case_data (c, weight)->f: 1.0;
- if (var_is_value_missing (var, val, exclude))
+ const double w = weight ? case_num (c, weight) : 1.0;
+ if (var_is_value_missing (var, val) & exclude)
{
case_unref (c);
continue;
cc += w;
casewriter_write (writer, c);
}
- subcase_destroy (&sc);
+ subcase_uninit (&sc);
casereader_destroy (reader);
reader = casewriter_make_reader (writer);
struct casereader *reader = casereader_clone (input);
for (; (c = casereader_read (reader)); case_unref (c))
{
- const double w = weight ? case_data (c, weight)->f: 1.0;
+ const double w = weight ? case_num (c, weight) : 1.0;
for (v = 0; v < otp->n_vars; ++v)
{
const struct variable *var = otp->vars[v];
const double x = val->f;
struct run_state *run = &rs[v];
- if (var_is_value_missing (var, val, exclude))
+ if (var_is_value_missing (var, val) & exclude)
continue;
run->cutpoint += x * w;
for (; (c = casereader_read (input)); case_unref (c))
{
- const double w = weight ? case_data (c, weight)->f: 1.0;
+ const double w = weight ? case_num (c, weight) : 1.0;
for (v = 0; v < otp->n_vars; ++v)
{
double d = x - run->cutpoint;
short sign = 0;
- if (var_is_value_missing (var, val, exclude))
+ if (var_is_value_missing (var, val) & exclude)
continue;
if (d >= 0)