Mercurial > octave-nkf

comparison src/parse.y @ 7750:5c6c6f4803c8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
make eval('script') to work again
author John W. Eaton <jwe@octave.org>
date Sat, 03 May 2008 22:07:26 -0400
parents 14e05160b99f
children ea9cb4d68dbf
comparison
equal deleted inserted replaced
7749:14e05160b99f 7750:5c6c6f4803c8
3031 { 3031 {
3032 std::string file_type; 3032 std::string file_type;
3033 3033
3034 bool parsing_script = false; 3034 bool parsing_script = false;
3035 3035
3036 unwind_protect_bool (get_input_from_eval_string);
3037 unwind_protect_bool (parser_end_of_input);
3038
3039 get_input_from_eval_string = false;
3040 parser_end_of_input = false;
3041
3036 if (! force_script && looking_at_function_keyword (ffile)) 3042 if (! force_script && looking_at_function_keyword (ffile))
3037 { 3043 {
3038 file_type = "function"; 3044 file_type = "function";
3039 3045
3040 unwind_protect_int (Vecho_executing_commands); 3046 unwind_protect_int (Vecho_executing_commands);
3041 unwind_protect_bool (reading_fcn_file); 3047 unwind_protect_bool (reading_fcn_file);
3042 unwind_protect_bool (get_input_from_eval_string);
3043 unwind_protect_bool (parser_end_of_input);
3044 3048
3045 Vecho_executing_commands = ECHO_OFF; 3049 Vecho_executing_commands = ECHO_OFF;
3046 reading_fcn_file = true; 3050 reading_fcn_file = true;
3047 get_input_from_eval_string = false;
3048 parser_end_of_input = false;
3049 } 3051 }
3050 else 3052 else
3051 { 3053 {
3052 file_type = "script"; 3054 file_type = "script";
3053 3055