/[pspp]/pspp/src/val-labs.c
ViewVC logotype

Diff of /pspp/src/val-labs.c

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

revision 1.10 by jmd, Wed Jan 5 00:32:16 2005 UTC revision 1.11 by blp, Mon Mar 7 03:04:50 2005 UTC
# Line 158  get_label (struct variable **vars, int v Line 158  get_label (struct variable **vars, int v
158          }          }
159        else        else
160          {          {
161            if (token != T_NUM)            if (!lex_is_number ())
162              {              {
163                lex_error (_("expecting integer"));                lex_error (_("expecting integer"));
164                return 0;                return 0;
165              }              }
166            if (!lex_integer_p ())            if (!lex_is_integer ())
167              msg (SW, _("Value label `%g' is not integer."), tokval);              msg (SW, _("Value label `%g' is not integer."), tokval);
168            value.f = tokval;            value.f = tokval;
169          }          }

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

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