Mercurial > hg > octave-nkf
diff src/toplev.cc @ 2859:00c0cd0f2ee7
[project @ 1997-03-31 19:02:32 by jwe]
author | jwe |
---|---|
date | Mon, 31 Mar 1997 19:02:37 +0000 |
parents | 8b262e771614 |
children | 95e85daad148 |
line wrap: on
line diff
--- a/src/toplev.cc +++ b/src/toplev.cc @@ -140,7 +140,7 @@ jmp_buf toplevel; void -parse_and_execute (FILE *f, int print) +parse_and_execute (FILE *f, bool print) { begin_unwind_frame ("parse_and_execute"); @@ -208,7 +208,7 @@ } void -parse_and_execute (const string& s, int print, int verbose, +parse_and_execute (const string& s, bool print, bool verbose, const char *warn_for) { begin_unwind_frame ("parse_and_execute_2"); @@ -282,7 +282,7 @@ if (retval == 0 && global_command) { - global_command->eval (1); + global_command->eval (true); delete global_command; @@ -504,7 +504,7 @@ tmp_args.resize (tmp_nargin); for (int i = 0; i < tmp_nargin; i++) tmp_args(i) = args(i+1); - retval = fcn->eval (0, nargout, tmp_args); + retval = fcn->eval (false, nargout, tmp_args); } return retval; @@ -528,7 +528,7 @@ } static octave_value_list -eval_string (const string& s, int print, int& parse_status, int nargout) +eval_string (const string& s, bool print, int& parse_status, int nargout) { begin_unwind_frame ("eval_string"); @@ -575,7 +575,7 @@ } octave_value -eval_string (const string& s, int print, int& parse_status) +eval_string (const string& s, bool print, int& parse_status) { octave_value retval; @@ -587,7 +587,7 @@ } static octave_value_list -eval_string (const octave_value& arg, int print, int& parse_status, +eval_string (const octave_value& arg, bool print, int& parse_status, int nargout) { string s = arg.string_value (); @@ -816,7 +816,7 @@ { octave_value_list fcn = octave_atexit_functions.pop (); - feval (fcn, 0); + feval (fcn, false); } }