Mercurial > hg > octave-jordi

changeset 3556:0343ffea47ef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-02-03 04:07:55 by jwe]
author jwe
date Thu, 03 Feb 2000 04:07:55 +0000
parents 0b00b69ab2fd
children 2e5d35d7f60c
files src/pt-cell.cc src/pt-cell.h
diffstat 2 files changed, 15 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/pt-cell.cc
+++ b/src/pt-cell.cc
@@ -85,6 +85,19 @@
   return retval;
 }
 
+octave_value_list
+tree_cell::rvalue (int nargout)
+{
+  octave_value_list retval;
+
+  if (nargout > 1)
+    error ("invalid number of output arguments for cell array");
+  else
+    retval = rvalue ();
+
+  return retval;
+}
+
 void
 tree_cell::accept (tree_walker& tw)
 {
--- a/src/pt-cell.h
+++ b/src/pt-cell.h
@@ -55,6 +55,8 @@
 
   octave_value rvalue (void);
 
+  octave_value_list rvalue (int);
+
   void accept (tree_walker& tw);
 
 private: