Mercurial > hg > octave-lyh
diff src/pr-output.cc @ 3933:f9ea3dcf58ee
[project @ 2002-05-15 03:21:00 by jwe]
author | jwe |
---|---|
date | Wed, 15 May 2002 03:21:01 +0000 |
parents | e8627dc4bdf2 |
children | f1500121e2e9 |
line wrap: on
line diff
--- a/src/pr-output.cc +++ b/src/pr-output.cc @@ -38,12 +38,12 @@ #include "Range.h" #include "cmd-edit.h" #include "dMatrix.h" -#include "Cell.h" #include "lo-mappers.h" #include "mach-info.h" #include "oct-cmplx.h" #include "str-vec.h" +#include "Cell.h" #include "defun.h" #include "error.h" #include "gripes.h" @@ -1755,37 +1755,10 @@ } } -void -octave_print_internal (std::ostream& os, const Cell& cell_val, - bool pr_as_read_syntax, int extra_indent) +extern void +octave_print_internal (std::ostream&, const Cell&, bool, int, bool) { - int nr = cell_val.rows (); - int nc = cell_val.columns(); - - if (nr > 0 && nc > 0) - { - os << "{\n"; - - for (int j = 0; j < nc; j++) - { - for (int i = 0; i < nr; i++) - { - std::ostrstream buf; - buf << "[" << i+1 << "," << j+1 << "]" << std::ends; - const char *nm = buf.str (); - - octave_value val = cell_val(i,j); - - val.print_with_name (os, nm); - - delete [] nm; - } - } - - os << "}"; - } - else - os << "{}"; + panic_impossible (); } DEFUN (disp, args, nargout,