Mercurial > hg > octave-nkf

changeset 3765:e10451597802

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2001-01-17 18:41:29 by jwe]
author jwe
date Wed, 17 Jan 2001 18:41:30 +0000
parents 0ac9388e7e1f
children df962bbf1788
files src/ChangeLog src/parse.y
diffstat 2 files changed, 11 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-17  John W. Eaton  <jwe@bevo.che.wisc.edu>
+
+	* parse.y (safe_fclose): Discard comments at the end of a file.
+
 2001-01-16  John W. Eaton  <jwe@bevo.che.wisc.edu>
 
 	* error.cc (pr_where): Call pr_where_1 with two args, not one, to
--- a/src/parse.y
+++ b/src/parse.y
@@ -2786,6 +2786,13 @@
 static void
 safe_fclose (void *f)
 {
+  // XXX FIXME XXX -- comments at the end of an input file are
+  // discarded (otherwise, they would be appended to the next
+  // statement, possibly from the command line or another file, which
+  // can be quite confusing).
+
+  octave_comment_buffer::get_comment ();
+
   if (f)
     fclose (static_cast<FILE *> (f));
 }