213 |
for (i = 0; i < agr.break_var_cnt; i++) |
for (i = 0; i < agr.break_var_cnt; i++) |
214 |
{ |
{ |
215 |
struct variable *v = dict_clone_var (agr.dict, agr.break_vars[i], |
struct variable *v = dict_clone_var (agr.dict, agr.break_vars[i], |
216 |
agr.break_vars[i]->name); |
agr.break_vars[i]->name, |
217 |
|
agr.break_vars[i]->longname |
218 |
|
); |
219 |
assert (v != NULL); |
assert (v != NULL); |
220 |
} |
} |
221 |
|
|
278 |
} |
} |
279 |
else |
else |
280 |
{ |
{ |
281 |
agr.writer = sfm_open_writer (out_file, agr.dict, get_scompression ()); |
agr.writer = sfm_open_writer (out_file, agr.dict, get_scompression (), 0); |
282 |
if (agr.writer == NULL) |
if (agr.writer == NULL) |
283 |
goto error; |
goto error; |
284 |
|
|
398 |
} |
} |
399 |
|
|
400 |
for (function = agr_func_tab; function->name; function++) |
for (function = agr_func_tab; function->name; function++) |
401 |
if (!strcmp (function->name, tokid)) |
if (!strcasecmp (function->name, tokid)) |
402 |
break; |
break; |
403 |
if (NULL == function->name) |
if (NULL == function->name) |
404 |
{ |
{ |
542 |
} |
} |
543 |
|
|
544 |
if (function->alpha_type == ALPHA) |
if (function->alpha_type == ALPHA) |
545 |
destvar = dict_clone_var (agr->dict, v->src, dest[i]); |
destvar = dict_clone_var (agr->dict, v->src, 0, dest[i] ); |
546 |
else if (v->src->type == NUMERIC |
else if (v->src->type == NUMERIC |
547 |
|| function->alpha_type == NUMERIC) |
|| function->alpha_type == NUMERIC) |
548 |
{ |
{ |