Mercurial > hg > octave-nkf
diff src/variables.cc @ 4245:610671be8792
[project @ 2002-12-28 04:02:31 by jwe]
author | jwe |
---|---|
date | Sat, 28 Dec 2002 04:02:31 +0000 |
parents | a5a68c0afe56 |
children | bdaa0d3dfc0b |
line wrap: on
line diff
--- a/src/variables.cc +++ b/src/variables.cc @@ -65,6 +65,9 @@ // Symbol table for the current scope. symbol_table *curr_sym_tab = 0; +// Symbol table for the current caller scope. +symbol_table *curr_caller_sym_tab = 0; + // Symbol table for global symbols. symbol_table *global_sym_tab = 0; @@ -94,7 +97,7 @@ if (! top_level_sym_tab) top_level_sym_tab = new symbol_table (4096, "TOP"); - curr_sym_tab = top_level_sym_tab; + curr_caller_sym_tab = curr_sym_tab = top_level_sym_tab; } // Attributes of variables and functions.