X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fnumeric.c;h=26961289d5afd7eebd278b591823613afea63a75;hb=9b4b94c6d3b5fd98bf396e23d015380b87d2d296;hp=b97410a51bc234ffb826e06d6705f339ea56e6eb;hpb=18febf84744dc7ab4248542c2f88d91c01ef3fa1;p=pspp-builds.git diff --git a/src/numeric.c b/src/numeric.c index b97410a5..26961289 100644 --- a/src/numeric.c +++ b/src/numeric.c @@ -18,7 +18,7 @@ 02111-1307, USA. */ #include -#include +#include "error.h" #include #include "command.h" #include "error.h" @@ -42,7 +42,6 @@ cmd_numeric (void) be used. */ struct fmt_spec f; - lex_match_id ("NUMERIC"); do { if (!parse_DATA_LIST_vars (&v, &nv, PV_NONE)) @@ -116,7 +115,6 @@ cmd_string (void) /* Width of variables to create. */ int width; - lex_match_id ("STRING"); do { if (!parse_DATA_LIST_vars (&v, &nv, PV_NONE)) @@ -148,6 +146,7 @@ cmd_string (void) break; default: assert (0); + abort (); } /* Create each variable. */ @@ -188,7 +187,6 @@ cmd_leave (void) int i; - lex_match_id ("LEAVE"); if (!parse_variables (default_dict, &v, &nv, PV_NONE)) return CMD_FAILURE; for (i = 0; i < nv; i++)