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

	syntax error.  Fixes bug #18419.  Thanks to John Darrington for
	reporting this bug.

diff --git a/src/language/data-io/ChangeLog b/src/language/data-io/ChangeLog
index b5f8545fa1cdd470ee0f961682d6522053010f80..3c5313a0db7fc77c890bc2c929fd4cfb045a9725 100644 (file)
--- a/src/language/data-io/ChangeLog
+++ b/src/language/data-io/ChangeLog
@@ -1,3 +1,9 @@
+Thu Nov 30 21:51:58 2006  Ben Pfaff  <blp@gnu.org>
+
+       * inpt-pgm.c (cmd_reread): Always return error code upon detecting
+       syntax error.  Fixes bug #18419.  Thanks to John Darrington for
+       reporting this bug.
+
 Sun Nov 19 09:17:45 2006  Ben Pfaff  <blp@gnu.org>
 
        * data-list.c (parse_free): Follow documented (but odd) rule that

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;
        }
     }