diff src/oct-obj.cc @ 4591:2c9de1be042a

[project @ 2003-11-11 00:23:35 by jwe]
author jwe
date Tue, 11 Nov 2003 00:23:35 +0000
parents e613ffa9f0e6
children e35b034d3523
line wrap: on
line diff
--- a/src/oct-obj.cc
+++ b/src/oct-obj.cc
@@ -37,15 +37,31 @@
 bool
 octave_value_list::valid_scalar_indices (void) const
 {
-  int n = data.length ();
+  int n = length ();
 
   for (int i = 0; i < n; i++)
-    if (! data(i).valid_as_scalar_index ())
+    if (! data[i].valid_as_scalar_index ())
       return false;
 
   return true;
 }
 
+void
+octave_value_list::resize (int n, const octave_value& val)
+{
+  int len = length ();
+
+  if (n > len)
+    {
+      data.resize (n);
+
+      for (int i = len; i < n; i++)
+	data[i] = val;
+    }
+  else if (n < len)
+    data.resize (n);
+}
+
 octave_value_list&
 octave_value_list::prepend (const octave_value& val)
 {
@@ -148,22 +164,6 @@
   return retval;
 }
 
-octave_value_list
-octave_value_list::index (idx_vector& i, int resize_ok) const
-{
-  return octave_value_list (data.index (i, resize_ok, octave_value ()));
-}
-
-octave_value_list&
-octave_value_list::assign (const idx_vector& i,
-			   const octave_value_list& rhs,
-			   const octave_value& fill_val)
-{
-  data.set_index (i);
-  ::assign (data, rhs.data, fill_val);
-  return *this;
-}
-
 bool
 octave_value_list::all_strings_p (void) const
 {