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

Diff of /pspp/src/flip.c

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

revision 1.26 by blp, Sun Jul 31 21:42:46 2005 UTC revision 1.27 by blp, Mon Oct 24 02:51:32 2005 UTC
# Line 57  struct flip_pgm Line 57  struct flip_pgm
57    {    {
58      struct variable **var;      /* Variables to transpose. */      struct variable **var;      /* Variables to transpose. */
59      int *idx_to_fv;             /* var[]->index to compacted sink case fv. */      int *idx_to_fv;             /* var[]->index to compacted sink case fv. */
60      int var_cnt;                /* Number of elements in `var'. */      size_t var_cnt;             /* Number of elements in `var'. */
61      int case_cnt;               /* Pre-flip case count. */      int case_cnt;               /* Pre-flip case count. */
62      size_t case_size;           /* Post-flip bytes per case. */      size_t case_size;           /* Post-flip bytes per case. */
63    
# Line 124  cmd_flip (void) Line 124  cmd_flip (void)
124    
125    if (flip->new_names)    if (flip->new_names)
126      {      {
127        int i;        size_t i;
128                
129        for (i = 0; i < flip->var_cnt; i++)        for (i = 0; i < flip->var_cnt; i++)
130          if (flip->var[i] == flip->new_names)          if (flip->var[i] == flip->new_names)
# Line 282  static struct case_sink * Line 282  static struct case_sink *
282  flip_sink_create (struct flip_pgm *flip)  flip_sink_create (struct flip_pgm *flip)
283  {  {
284    struct flip_sink_info *info = xmalloc (sizeof *info);    struct flip_sink_info *info = xmalloc (sizeof *info);
285    int i;    size_t i;
286    
287    info->flip = flip;    info->flip = flip;
288    info->output_buf = xmalloc (sizeof *info->output_buf * flip->var_cnt);    info->output_buf = xmalloc (sizeof *info->output_buf * flip->var_cnt);
# Line 310  flip_sink_write (struct case_sink *sink, Line 310  flip_sink_write (struct case_sink *sink,
310  {  {
311    struct flip_sink_info *info = sink->aux;    struct flip_sink_info *info = sink->aux;
312    struct flip_pgm *flip = info->flip;    struct flip_pgm *flip = info->flip;
313    int i;    size_t i;
314        
315    flip->case_cnt++;    flip->case_cnt++;
316    
# Line 416  flip_file (struct flip_pgm *flip) Line 416  flip_file (struct flip_pgm *flip)
416      {      {
417        unsigned long read_cases = min (flip->case_cnt - case_idx,        unsigned long read_cases = min (flip->case_cnt - case_idx,
418                                        case_capacity);                                        case_capacity);
419        int i;        size_t i;
420    
421        if (read_cases != fread (input_buf, case_bytes, read_cases, input_file))        if (read_cases != fread (input_buf, case_bytes, read_cases, input_file))
422          msg (FE, _("Error reading FLIP file: %s."), strerror (errno));          msg (FE, _("Error reading FLIP file: %s."), strerror (errno));
# Line 497  flip_source_read (struct case_source *so Line 497  flip_source_read (struct case_source *so
497  {  {
498    struct flip_pgm *flip = source->aux;    struct flip_pgm *flip = source->aux;
499    union value *input_buf;    union value *input_buf;
500    int i;    size_t i;
501    
502    input_buf = xmalloc (sizeof *input_buf * flip->case_cnt);    input_buf = xmalloc (sizeof *input_buf * flip->case_cnt);
503    for (i = 0; i < flip->var_cnt; i++)    for (i = 0; i < flip->var_cnt; i++)

Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27

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