Mercurial > hg > octave-nkf
changeset 123:174de3807b61
[project @ 1993-09-21 20:39:54 by jwe]
(force_global): When a variable is moved to the global symbol table,
mark it as global.
author | jwe |
---|---|
date | Tue, 21 Sep 1993 20:39:54 +0000 |
parents | 80f682c2da33 |
children | b09b2c84688b |
files | src/variables.cc |
diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/variables.cc +++ b/src/variables.cc @@ -88,6 +88,7 @@ if (sr == (symbol_record *) NULL) { retval = global_sym_tab->lookup (name, 1, 0); + retval->mark_as_forced_global (); } else if (sr->is_formal_parameter ()) { @@ -96,6 +97,7 @@ else { retval = global_sym_tab->lookup (name, 1, 0); + retval->mark_as_forced_global (); retval->alias (sr); curr_sym_tab->clear (name); }