return d;
}
-
-
void
expr_evaluate_str (struct expression *e, const struct ccase *c, int case_idx,
char *dst, size_t dst_size)
case_data_rw (c, v->fv)->f = lex_tokval (lexer);
else
memcpy (case_data_rw (c, v->fv)->s, ds_data (lex_tokstr (lexer)),
- v->width);
+ var_get_width (v));
lex_get (lexer);
if (!lex_force_match (lexer, ')'))
}
break;
case OP_variable:
- fprintf (stderr, "v<%s>", op->variable->name);
+ fprintf (stderr, "v<%s>", var_get_name (op->variable));
break;
case OP_vector:
fprintf (stderr, "vec<%s>", op->vector->name);