/[pspp]/pspp/src/aggregate.c
ViewVC logotype

Diff of /pspp/src/aggregate.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.31 by blp, Tue Apr 5 05:29:58 2005 UTC revision 1.32 by jmd, Wed Apr 13 10:09:59 2005 UTC
# Line 213  cmd_aggregate (void) Line 213  cmd_aggregate (void)
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    
# Line 276  cmd_aggregate (void) Line 278  cmd_aggregate (void)
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                
# Line 396  parse_aggregate_functions (struct agr_pr Line 398  parse_aggregate_functions (struct agr_pr
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          {          {
# Line 540  parse_aggregate_functions (struct agr_pr Line 542  parse_aggregate_functions (struct agr_pr
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                    {                    {

Legend:
Removed from v.1.31  
changed lines
  Added in v.1.32

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26