Mercurial > octave
diff src/quad.cc @ 2086:bfb775fb6fe8
[project @ 1996-04-25 05:55:19 by jwe]
author | jwe |
---|---|
date | Thu, 25 Apr 1996 05:55:19 +0000 |
parents | 003570e69c7b |
children | 36903d507b0e |
line wrap: on
line diff
--- a/src/quad.cc Thu Apr 25 05:55:19 1996 +0000 +++ b/src/quad.cc Thu Apr 25 05:55:19 1996 +0000 @@ -50,12 +50,12 @@ { double retval = 0.0; - Octave_object args; + octave_value_list args; args(0) = x; if (quad_fcn) { - Octave_object tmp = quad_fcn->eval (0, 1, args); + octave_value_list tmp = quad_fcn->eval (0, 1, args); if (error_state) { @@ -105,7 +105,7 @@ The optional argument @var{sing} is a vector of values at which the\n\ integrand is singular.") { - Octave_object retval; + octave_value_list retval; int nargin = args.length (); @@ -332,10 +332,10 @@ warning ("quad_options: no match for `%s'", keyword.c_str ()); } -static Octave_object +static octave_value_list show_quad_option (const string& keyword) { - Octave_object retval; + octave_value_list retval; QUAD_OPTIONS *list = quad_option_table; @@ -360,7 +360,7 @@ Set or show options for quad. Keywords may be abbreviated\n\ to the shortest match.") { - Octave_object retval; + octave_value_list retval; int nargin = args.length ();