comparison src/pt-cell.cc @ 8658:73c4516fae10

New evaluator and debugger derived from tree-walker class
author John W. Eaton <jwe@octave.org>
date Wed, 04 Feb 2009 00:47:53 -0500
parents 79845b1793cf
children 35cd375d4bb3
comparison
equal deleted inserted replaced
8657:102e05821f93 8658:73c4516fae10
39 #include "utils.h" 39 #include "utils.h"
40 #include "ov.h" 40 #include "ov.h"
41 #include "variables.h" 41 #include "variables.h"
42 42
43 octave_value 43 octave_value
44 tree_cell::rvalue (void) 44 tree_cell::rvalue1 (int)
45 { 45 {
46 octave_value retval; 46 octave_value retval;
47
48 MAYBE_DO_BREAKPOINT;
49 47
50 octave_idx_type nr = length (); 48 octave_idx_type nr = length ();
51 octave_idx_type nc = -1; 49 octave_idx_type nc = -1;
52 50
53 Cell val; 51 Cell val;
97 octave_value_list retval; 95 octave_value_list retval;
98 96
99 if (nargout > 1) 97 if (nargout > 1)
100 error ("invalid number of output arguments for cell array"); 98 error ("invalid number of output arguments for cell array");
101 else 99 else
102 retval = rvalue (); 100 retval = rvalue1 (nargout);
103 101
104 return retval; 102 return retval;
105 } 103 }
106 104
107 tree_expression * 105 tree_expression *