diff src/pt-misc.cc @ 723:1c072f20b522

[project @ 1994-09-21 16:00:10 by jwe]
author jwe
date Wed, 21 Sep 1994 16:00:10 +0000
parents 36ba0576bd1b
children 586160369413
line wrap: on
line diff
--- a/src/pt-misc.cc	Wed Sep 21 15:24:26 1994 +0000
+++ b/src/pt-misc.cc	Wed Sep 21 16:00:10 1994 +0000
@@ -302,10 +302,13 @@
 }
 
 Octave_object
-tree_parameter_list::convert_to_const_vector (void)
+tree_parameter_list::convert_to_const_vector (tree_va_return_list *vr_list)
 {
   int nout = length ();
 
+  if (vr_list)
+    nout += vr_list->length ();
+
   Octave_object retval;
   retval.resize (nout);
 
@@ -321,6 +324,15 @@
       i++;
     }
 
+  if (vr_list)
+    {
+      for (p = vr_list->first (); p != 0; vr_list->next (p))
+	{
+	  retval(i) = vr_list->operator () (p);
+	  i++;
+	}
+    }
+
   return retval;
 }