/[pspp]/pspp/src/data-list.c
ViewVC logotype

Diff of /pspp/src/data-list.c

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

revision 1.31 by jmd, Fri Apr 29 01:02:13 2005 UTC revision 1.32 by blp, Mon May 2 06:21:20 2005 UTC
# Line 65  struct dls_var_spec Line 65  struct dls_var_spec
65      int fc, lc;                 /* Column numbers in record. */      int fc, lc;                 /* Column numbers in record. */
66    
67      /* Free format only. */      /* Free format only. */
68      char name[SHORT_NAME_LEN + 1];              /* Name of variable. */      char name[LONG_NAME_LEN + 1]; /* Name of variable. */
69    };    };
70    
71  /* Constants for DATA LIST type. */  /* Constants for DATA LIST type. */
# Line 383  parse_fixed (struct data_list_pgm *dls) Line 383  parse_fixed (struct data_list_pgm *dls)
383        else        else
384          {          {
385            msg (SE, _("SPSS-like or FORTRAN-like format "            msg (SE, _("SPSS-like or FORTRAN-like format "
386                 "specification expected after variable names."));                       "specification expected after variable names."));
387            goto fail;            goto fail;
388          }          }
389    
# Line 889  parse_free (struct dls_var_spec **first, Line 889  parse_free (struct dls_var_spec **first,
889            spec->input = input;            spec->input = input;
890            spec->v = v;            spec->v = v;
891            spec->fv = v->fv;            spec->fv = v->fv;
892            strcpy (spec->name, v->name);            st_trim_copy (spec->name, v->name, sizeof spec->name);
893            append_var_spec (first, last, spec);            append_var_spec (first, last, spec);
894          }          }
895        for (i = 0; i < name_cnt; i++)        for (i = 0; i < name_cnt; i++)

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