* inpt-pgm.c (cmd_reread): Always return error code upon detecting

[pspp-builds.git] / src / language / data-io / inpt-pgm.c

diff --git a/src/language/data-io/inpt-pgm.c b/src/language/data-io/inpt-pgm.c
index 3459ee0fbb03eaba4094924dcd5ae370b5b36e9c..cc6bd6a3277fbd8beebe4ebe1b9ece64b163997d 100644 (file)
--- a/src/language/data-io/inpt-pgm.c
+++ b/src/language/data-io/inpt-pgm.c
@@ -358,6 +358,7 @@ cmd_reread (struct lexer *lexer, struct dataset *ds)
        {
          lex_error (lexer, NULL);
          expr_free (e);
+          return CMD_CASCADING_FAILURE;
        }
     }