X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Frecode.c;h=0a0aa61aa93ad48db79d487ac1430373ef4871b7;hb=4255c7e5a693e09a97dc7a3cca0634bb2adaba2d;hp=089caba12fcb02353c1ecd920b03525335bacf9b;hpb=06f9ee45954e5e71fa7f6262dbf37defa1dbf996;p=pspp

diff --git a/src/recode.c b/src/recode.c
index 089caba12f..0a0aa61aa9 100644
--- a/src/recode.c
+++ b/src/recode.c
@@ -25,6 +25,7 @@
 #include "alloc.h"
 #include "case.h"
 #include "command.h"
+#include "dictionary.h"
 #include "error.h"
 #include "lexer.h"
 #include "magic.h"
@@ -444,7 +445,7 @@ parse_dest_spec (struct rcd_var * rcd, union value * v, size_t *max_dst_width)
 
   v->c = NULL;
 
-  if (token == T_NUM)
+  if (lex_is_number ())
     {
       v->f = tokval;
       lex_get ();
@@ -539,7 +540,7 @@ parse_src_spec (struct rcd_var * rcd, int type, size_t max_src_width)
 		    return 0;
 		  if (lex_match_id ("HI") || lex_match_id ("HIGHEST"))
 		    c->type = RCD_ELSE;
-		  else if (token == T_NUM)
+		  else if (lex_is_number ())
 		    {
 		      c->type = RCD_LOW;
 		      c->f1.f = tokval;
@@ -567,7 +568,7 @@ parse_src_spec (struct rcd_var * rcd, int type, size_t max_src_width)
 		  return 0;
 		}
 	    }
-	  else if (token == T_NUM)
+	  else if (lex_is_number ())
 	    {
 	      c->f1.f = tokval;
 	      lex_get ();
@@ -575,7 +576,7 @@ parse_src_spec (struct rcd_var * rcd, int type, size_t max_src_width)
 		{
 		  if (lex_match_id ("HI") || lex_match_id ("HIGHEST"))
 		    c->type = RCD_HIGH;
-		  else if (token == T_NUM)
+		  else if (lex_is_number ())
 		    {
 		      c->type = RCD_RANGE;
 		      c->f2.f = tokval;