Mercurial > hg > octave-nkf
diff src/ov-str-mat.cc @ 2901:e6d25bc478dd
[project @ 1997-04-30 03:41:26 by jwe]
author | jwe |
---|---|
date | Wed, 30 Apr 1997 03:43:29 +0000 |
parents | 8b262e771614 |
children | 4e7bea116f24 |
line wrap: on
line diff
--- a/src/ov-str-mat.cc +++ b/src/ov-str-mat.cc @@ -28,6 +28,8 @@ #include <config.h> #endif +#include <iostream.h> + #include "lo-ieee.h" #include "mx-base.h" @@ -216,10 +218,38 @@ } void -octave_char_matrix_str::print (ostream& os, bool pr_as_read_syntax) +octave_char_matrix_str::print (ostream& os, bool pr_as_read_syntax) const +{ + indent (os); + print_raw (os, pr_as_read_syntax); + newline (os); +} + +void +octave_char_matrix_str::print_raw (ostream& os, bool pr_as_read_syntax) const { octave_print_internal (os, matrix, pr_as_read_syntax, true, - struct_indent); + current_print_indent_level ()); +} + +bool +octave_char_matrix_str::print_name_tag (ostream& os, const string& name) const +{ + bool retval = false; + + indent (os); + + if (rows () == 1) + os << name << " = "; + else + { + os << name << " ="; + newline (os); + newline (os); + retval = true; + } + + return retval; } /*