diff src/fsolve.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/fsolve.cc
+++ b/src/fsolve.cc
@@ -85,7 +85,7 @@
 
   int n = x.capacity ();
 
-  Octave_object args;
+  octave_value_list args;
   args.resize (1);
 
   if (n > 1)
@@ -93,19 +93,19 @@
       Matrix m (n, 1);
       for (int i = 0; i < n; i++)
 	m (i, 0) = x.elem (i);
-      tree_constant vars (m);
+      octave_value vars (m);
       args(0) = vars;
     }
   else
     {
       double d = x.elem (0);
-      tree_constant vars (d);
+      octave_value vars (d);
       args(0) = vars;
     }
 
   if (fsolve_fcn)
     {
-      Octave_object tmp = fsolve_fcn->eval (0, 1, args);
+      octave_value_list tmp = fsolve_fcn->eval (0, 1, args);
       if (tmp.length () > 0 && tmp(0).is_defined ())
 	{
 	  retval = tmp(0).vector_value ();
@@ -132,7 +132,7 @@
 \n\
 where y and x are vectors.")
 {
-  Octave_object retval;
+  octave_value_list retval;
 
   int nargin = args.length ();
 
@@ -260,10 +260,10 @@
   warning ("fsolve_options: no match for `%s'", keyword.c_str ());
 }
 
-static Octave_object
+static octave_value_list
 show_fsolve_option (const string& keyword)
 {
-  Octave_object retval;
+  octave_value_list retval;
 
   NLEQN_OPTIONS *list = fsolve_option_table;
 
@@ -288,7 +288,7 @@
 Set or show options for fsolve.  Keywords may be abbreviated\n\
 to the shortest match.")
 {
-  Octave_object retval;
+  octave_value_list retval;
 
   int nargin = args.length ();