Mercurial > hg > octave-nkf
diff src/pt-const.h @ 1199:4f1bfa351b99
[project @ 1995-03-31 22:16:54 by jwe]
author | jwe |
---|---|
date | Fri, 31 Mar 1995 22:21:38 +0000 |
parents | e2036dce97ea |
children | 68d147abe7ca |
line wrap: on
line diff
--- a/src/pt-const.h +++ b/src/pt-const.h @@ -324,16 +324,19 @@ rep->bump_value (et); } + void print (void); + void print (ostream& os) { rep->print (os); } + // Evaluate this constant, possibly converting complex to real, or // matrix to scalar, etc. - tree_constant eval (int print) + tree_constant eval (int print_result) { if (! is_scalar_type ()) rep->maybe_mutate (); - if (print) - rep->print (); + if (print_result) + print (); return *this; } @@ -431,6 +434,10 @@ } }; +extern int print_as_scalar (const tree_constant& val); + +extern int print_as_structure (const tree_constant& val); + // XXX FIXME XXX -- this is not used very much now. Perhaps it can be // eliminated. extern Octave_object vector_of_empties (int nargout, const char *fcn_name);