Mercurial > hg > octave-nkf
diff src/ov.cc @ 4643:ef3a14fb6847
[project @ 2003-11-22 12:25:44 by jwe]
author | jwe |
---|---|
date | Sat, 22 Nov 2003 12:25:45 +0000 |
parents | 2c9de1be042a |
children | bd2067547b40 |
line wrap: on
line diff
--- a/src/ov.cc +++ b/src/ov.cc @@ -47,6 +47,7 @@ #include "ov-range.h" #include "ov-struct.h" #include "ov-file.h" +#include "ov-streamoff.h" #include "ov-list.h" #include "ov-cs-list.h" #include "ov-colon.h" @@ -592,6 +593,12 @@ rep->count = 1; } +octave_value::octave_value (const streamoff_array& off) + : rep (new octave_streamoff (off)) +{ + rep->count = 1; +} + octave_value::octave_value (octave_function *f) : rep (f) { @@ -923,6 +930,12 @@ return rep->stream_number (); } +streamoff_array +octave_value::streamoff_value (void) const +{ + return rep->streamoff_value (); +} + octave_function * octave_value::function_value (bool silent) { @@ -1879,6 +1892,8 @@ octave_builtin::register_type (); octave_mapper::register_type (); octave_user_function::register_type (); + octave_fcn_handle::register_type (); + octave_streamoff::register_type (); } static int