lexer: Use lex_is_string() more consistently.

[pspp] / src / language / utilities / host.c

diff --git a/src/language/utilities/host.c b/src/language/utilities/host.c
index ae344367252bc053a1945480513c5f9ccc102395..ac09145451609c52d7236849631a38a0138bd34f 100644 (file)
--- a/src/language/utilities/host.c
+++ b/src/language/utilities/host.c
@@ -141,7 +141,7 @@ cmd_host (struct lexer *lexer, struct dataset *ds UNUSED)
         return CMD_FAILURE;
 
       ds_init_empty (&command);
-      while (lex_token (lexer) == T_STRING)
+      while (lex_is_string (lexer))
         {
           if (!ds_is_empty (&command))
             ds_put_char (&command, '\n');