Mercurial > hg > octave-avbm
diff src/symtab.cc @ 6072:4036e6fca790
[project @ 2006-10-24 01:00:12 by jwe]
author | jwe |
---|---|
date | Tue, 24 Oct 2006 01:00:13 +0000 |
parents | e884ab4f29ee |
children | 44c91c5dfe1d |
line wrap: on
line diff
--- a/src/symtab.cc +++ b/src/symtab.cc @@ -840,6 +840,23 @@ } void +symbol_table::clear_mex_functions (void) +{ + for (unsigned int i = 0; i < table_size; i++) + { + symbol_record *ptr = table[i].next (); + + while (ptr) + { + if (ptr->is_mex_function ()) + ptr->clear (); + + ptr = ptr->next (); + } + } +} + +void symbol_table::clear_globals (void) { for (unsigned int i = 0; i < table_size; i++)