assert (width >= 0 && width < 256);
- assert (var_is_valid_name(name,0));
+ assert (var_is_plausible_name(name,0));
/* Make sure there's not already a variable by that name. */
if (dict_lookup_var (d, name) != NULL)
v->width = width;
v->fv = d->next_value_idx;
v->nv = width == 0 ? 1 : DIV_RND_UP (width, 8);
- v->init = 1;
- v->reinit = dict_class_from_id (v->name) != DC_SCRATCH;
+ v->leave = dict_class_from_id (v->name) == DC_SCRATCH;
v->index = d->var_cnt;
mv_init (&v->miss, width);
if (v->type == NUMERIC)
short_name[] is intentionally not copied, because there is
no reason to give a new variable with potentially a new name
the same short name. */
- nv->init = 1;
- nv->reinit = ov->reinit;
+ nv->leave = ov->leave;
mv_copy (&nv->miss, &ov->miss);
nv->print = ov->print;
nv->write = ov->write;
assert (d != NULL);
assert (v != NULL);
assert (new_name != NULL);
- assert (var_is_valid_name (new_name, false));
+ assert (var_is_plausible_name (new_name, false));
assert (dict_contains_var (d, v));
assert (!compare_var_names (v->name, new_name, NULL)
|| dict_lookup_var (d, new_name) == NULL);
for (i = 0; i < count; i++)
{
assert (d->var[vars[i]->index] == vars[i]);
- assert (var_is_valid_name (new_names[i], false));
+ assert (var_is_plausible_name (new_names[i], false));
hsh_force_delete (d->name_tab, vars[i]);
old_names[i] = xstrdup (vars[i]->name);
strcpy (vars[i]->name, new_names[i]);
assert (d != NULL);
assert (name != NULL);
- assert (var_is_valid_name (name, false));
+ assert (var_is_plausible_name (name, false));
assert (var != NULL);
assert (cnt > 0);