X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Flanguage%2Fdata-io%2Fget.c;h=00e78c8f00c1a39922ae3179200b6f8fb8591a9c;hb=2f3bca35516d8f3b3df76b3152fd5c77ff1f09cf;hp=2440bd900b9d2ee01fcfac78342f70f88004c36b;hpb=38e6de480f30185dce6be3ad39668f4bfd5fd15d;p=pspp diff --git a/src/language/data-io/get.c b/src/language/data-io/get.c index 2440bd900b..00e78c8f00 100644 --- a/src/language/data-io/get.c +++ b/src/language/data-io/get.c @@ -109,7 +109,7 @@ parse_read_command (struct lexer *lexer, struct dataset *ds, if (!lex_match_id (lexer, "COMM") && !lex_match_id (lexer, "TAPE")) { - lex_error_expecting (lexer, "COMM", "TAPE", NULL_SENTINEL); + lex_error_expecting (lexer, "COMM", "TAPE"); goto error; } } @@ -139,7 +139,7 @@ parse_read_command (struct lexer *lexer, struct dataset *ds, while (lex_token (lexer) != T_ENDCMD) { lex_match (lexer, T_SLASH); - if (!parse_dict_trim (lexer, dict)) + if (!parse_dict_trim (lexer, dict, false)) goto error; } dict_compact_values (dict); @@ -161,7 +161,7 @@ parse_read_command (struct lexer *lexer, struct dataset *ds, fh_unref (fh); casereader_destroy (reader); if (dict != NULL) - dict_destroy (dict); + dict_unref (dict); free (encoding); return CMD_CASCADING_FAILURE; }