X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Flexer%2Fq2c.c;h=cf8e53ee5cb881529ead693e0328f66e520a300b;hb=c8e5d526ba80aaf842336f47ff5c00f8703a3022;hp=1a95d08091936461b083a35b3d27531d3795151e;hpb=c75794cffb05769b71a346af8513a3e8dde55f94;p=pspp

diff --git a/src/language/lexer/q2c.c b/src/language/lexer/q2c.c
index 1a95d08091..cf8e53ee5c 100644
--- a/src/language/lexer/q2c.c
+++ b/src/language/lexer/q2c.c
@@ -1534,7 +1534,7 @@ dump_specifier_parse (const specifier *spec, const subcommand *sbc)
           else if (s->value == VAL_STRING)
             {
               dump (1, "if (lex_token (lexer) != T_ID "
-                    "&& lex_token (lexer) != T_STRING)");
+                    "&& !lex_is_string (lexer))");
               dump (1, "{");
               dump (0, "msg (SE, _(\"%s specifier of %s subcommand "
                     "requires a string argument.\"));",