Mercurial > octave

changeset 197:83c8b5c4d9d9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1993-11-07 13:01:07 by jwe] (func_def2): Reset id_name after renaming identifier. Clear id_name from top level symbol table before defining identifier.
author jwe
date Sun, 07 Nov 1993 13:01:07 +0000
parents b025ad539b43
children e34910e90474
files src/parse.y
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/parse.y	Sun Nov 07 01:09:34 1993 +0000
+++ b/src/parse.y	Sun Nov 07 13:01:07 1993 +0000
@@ -886,6 +886,7 @@
  with M-file name `%s.m'", id_name, curr_m_file_name);
 
 			    $1->rename (curr_m_file_name);
+			    id_name = $1->name ();
 			  }
 
 			$4->stash_m_file_name (curr_m_file_name);
@@ -900,6 +901,8 @@
  script file `%s.m'", id_name, curr_m_file_name);
 		      }
 
+		    top_level_sym_tab->clear (id_name);
+
 		    $4->stash_function_name (id_name);
 
 		    $1->define ($4);