Mercurial > hg > octave-nkf
diff src/fsolve.cc @ 516:309fc59f66ee
[project @ 1994-07-13 02:31:31 by jwe]
author | jwe |
---|---|
date | Wed, 13 Jul 1994 02:31:31 +0000 |
parents | 0f388340e607 |
children | b9284136189a |
line wrap: on
line diff
--- a/src/fsolve.cc +++ b/src/fsolve.cc @@ -91,7 +91,7 @@ int n = x.capacity (); -// tree_constant name = tree_constant (fsolve_fcn->name ()); +// tree_constant name = fsolve_fcn->name (); Octave_object args (2); // args(0) = name; @@ -159,13 +159,10 @@ info = hybrd_info_to_fsolve_info (info); retval.resize (nargout ? nargout : 1); - retval(0) = tree_constant (soln, 1); + retval(0) = soln, 1; if (nargout > 1) - retval(1) = tree_constant ((double) info); - - if (nargout > 2) - retval(2) = tree_constant (); + retval(1) = (double) info; return retval; }