Mercurial > octave

changeset 340:57cdcf21c1df

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-02-07 07:35:28 by jwe]
author jwe
date Mon, 07 Feb 1994 07:35:32 +0000
parents 94f0f219a946
children 4115f7713851
files src/lex.l src/parse.y
diffstat 2 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/lex.l	Mon Feb 07 07:29:19 1994 +0000
+++ b/src/lex.l	Mon Feb 07 07:35:32 1994 +0000
@@ -1499,7 +1499,7 @@
 	  else
 	    {
 	      warning ("ignoring trailing garbage after end of function\n\
-         near line %d of file `%s.m'", lineno, curr_fcn_file_name);
+         near line %d of file `%s'", lineno, curr_fcn_file_name);
 	      
 	      yyunput ('\n', yytext);
 	      return;
--- a/src/parse.y	Mon Feb 07 07:29:19 1994 +0000
+++ b/src/parse.y	Mon Feb 07 07:35:32 1994 +0000
@@ -923,7 +923,7 @@
 			     && strcmp (curr_fcn_file_name, id_name) == 0)
 		      {
 			warning ("function `%s' defined within\
- script file `%s.m'", id_name, curr_fcn_file_name);
+ script file `%s'", id_name, curr_fcn_file_name);
 		      }
 
 		    top_level_sym_tab->clear (id_name);
@@ -1118,7 +1118,7 @@
 
 // Maybe print the line number and file name.
   if (reading_fcn_file || reading_script_file)
-    fprintf (stderr, " near line %d of file %s.m", input_line_number,
+    fprintf (stderr, " near line %d of file %s", input_line_number,
 	     curr_fcn_file_name);
 
   if (line != (char *) NULL)