Mercurial > hg > octave-nkf
diff src/variables.cc @ 4143:62afb31c1f85
[project @ 2002-11-01 17:27:38 by jwe]
author | jwe |
---|---|
date | Fri, 01 Nov 2002 17:27:38 +0000 |
parents | 63a5613cca00 |
children | 8734ba917fea |
line wrap: on
line diff
--- a/src/variables.cc +++ b/src/variables.cc @@ -291,13 +291,18 @@ int parse_status; + unwind_protect::begin_frame ("generate_struct_completions"); + unwind_protect_str (Vwarning_option); + unwind_protect_bool (discard_error_messages); + unwind_protect_int (error_state); Vwarning_option = "off"; + discard_error_messages = true; octave_value tmp = eval_string (prefix, true, parse_status); - unwind_protect::run (); + unwind_protect::run_frame ("generate_struct_completions"); if (tmp.is_defined () && tmp.is_map ()) names = tmp.map_keys (); @@ -316,8 +321,19 @@ { int parse_status; + unwind_protect::begin_frame ("looks_like_struct"); + + unwind_protect_str (Vwarning_option); + unwind_protect_bool (discard_error_messages); + unwind_protect_int (error_state); + + Vwarning_option = "off"; + discard_error_messages = true; + octave_value tmp = eval_string (text, true, parse_status); + unwind_protect::run_frame ("looks_like_struct"); + retval = (tmp.is_defined () && tmp.is_map ()); }