X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fcommands%2Finpt-pgm.c;h=f6beea1f54aae6244f4aad80767440e8a0f0eb96;hb=95cde62bdf5210c1c60dad5598a888b864f93161;hp=b5bd041d79ffa2d81201113333688743c3080c5b;hpb=6953fd7f0ef58595a14548c4262f0e4c65b8939a;p=pspp

diff --git a/src/language/commands/inpt-pgm.c b/src/language/commands/inpt-pgm.c
index b5bd041d79..f6beea1f54 100644
--- a/src/language/commands/inpt-pgm.c
+++ b/src/language/commands/inpt-pgm.c
@@ -149,7 +149,7 @@ cmd_input_program (struct lexer *lexer, struct dataset *ds)
       msg_location_destroy (location);
       return CMD_FAILURE;
     }
-  if (dict_get_next_value_idx (dataset_dict (inp->ds)) == 0)
+  if (dict_get_n_vars (dataset_dict (inp->ds)) == 0)
     {
       msg_at (SE, location, _("Input program did not create any variables."));
       destroy_input_program (inp);