X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fdictionary%2Frename-variables.c;h=4fc5bada85df3cc3f716bfb816767173660329b2;hb=da1bf03a84fa10f04e8c5438f22b523f0480dd7d;hp=82fc1d96c8117a1c6823c4a4a8be057570a2d3a0;hpb=f7e9711f020ba507719f1f21cac04ae1199a4ac0;p=pspp diff --git a/src/language/dictionary/rename-variables.c b/src/language/dictionary/rename-variables.c index 82fc1d96c8..4fc5bada85 100644 --- a/src/language/dictionary/rename-variables.c +++ b/src/language/dictionary/rename-variables.c @@ -53,19 +53,13 @@ cmd_rename_variables (struct lexer *lexer, struct dataset *ds) size_t prev_nv_1 = rename_cnt; size_t prev_nv_2 = rename_cnt; - if (!lex_match (lexer, T_LPAREN)) - { - msg (SE, _("`(' expected.")); - goto lossage; - } + if (!lex_force_match (lexer, T_LPAREN)) + goto lossage; if (!parse_variables (lexer, dataset_dict (ds), &rename_vars, &rename_cnt, PV_APPEND | PV_NO_DUPLICATE)) goto lossage; - if (!lex_match (lexer, T_EQUALS)) - { - msg (SE, _("`=' expected between lists of new and old variable names.")); - goto lossage; - } + if (!lex_force_match (lexer, T_EQUALS)) + goto lossage; if (!parse_DATA_LIST_vars (lexer, dataset_dict (ds), &rename_new_names, &prev_nv_1, PV_APPEND | PV_NO_DUPLICATE)) @@ -83,11 +77,8 @@ cmd_rename_variables (struct lexer *lexer, struct dataset *ds) rename_new_names = NULL; goto lossage; } - if (!lex_match (lexer, T_RPAREN)) - { - msg (SE, _("`)' expected after variable names.")); - goto lossage; - } + if (!lex_force_match (lexer, T_RPAREN)) + goto lossage; } while (lex_token (lexer) != T_ENDCMD);