Mercurial > hg > octave-lyh
diff src/ov-base.cc @ 2901:e6d25bc478dd
[project @ 1997-04-30 03:41:26 by jwe]
| author | jwe |
|---|---|
| date | Wed, 30 Apr 1997 03:43:29 +0000 |
| parents | 05926e1b367d |
| children | 56be458e237f |
line wrap: on
line diff
--- a/src/ov-base.cc +++ b/src/ov-base.cc @@ -28,6 +28,8 @@ #include <config.h> #endif +#include <iostream.h> + #include "lo-ieee.h" #include "gripes.h" @@ -99,11 +101,27 @@ } void -octave_base_value::print (ostream&, bool) +octave_base_value::print (ostream&, bool) const { gripe_wrong_type_arg ("octave_base_value::print()", type_name ()); } +void +octave_base_value::print_raw (ostream&, bool) const +{ + gripe_wrong_type_arg ("octave_base_value::print_raw()", type_name ()); +} + +bool +octave_base_value::print_name_tag (ostream& os, const string& name) const +{ + indent (os); + os << name << " ="; + newline (os); + newline (os); + return true; +} + double octave_base_value::double_value (bool) const { @@ -178,6 +196,22 @@ return retval; } +octave_stream * +octave_base_value::stream_value (void) const +{ + octave_stream *retval = 0; + gripe_wrong_type_arg ("octave_base_value::stream_value()", type_name ()); + return retval; +} + +int +octave_base_value::stream_number (void) const +{ + int retval = -1; + gripe_wrong_type_arg ("octave_base_value::stream_number()", type_name ()); + return retval; +} + octave_value_list octave_base_value::list_value (void) const {