Mercurial > hg > octave-nkf
diff src/ov-colon.h @ 2376:2142216bf85a
[project @ 1996-10-12 01:39:07 by jwe]
author | jwe |
---|---|
date | Sat, 12 Oct 1996 01:39:21 +0000 |
parents | |
children | 1573640a9994 |
line wrap: on
line diff
new file mode 100644 --- /dev/null +++ b/src/ov-colon.h @@ -0,0 +1,98 @@ +/* + +Copyright (C) 1996 John W. Eaton + +This file is part of Octave. + +Octave is free software; you can redistribute it and/or modify it +under the terms of the GNU General Public License as published by the +Free Software Foundation; either version 2, or (at your option) any +later version. + +Octave is distributed in the hope that it will be useful, but WITHOUT +ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or +FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License +for more details. + +You should have received a copy of the GNU General Public License +along with Octave; see the file COPYING. If not, write to the Free +Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + +*/ + +#if !defined (octave_magic_colon_h) +#define octave_magic_colon_h 1 + +#include <cstdlib> + +#include <string> + +class ostream; + +#include "mx-base.h" +#include "str-vec.h" + +#include "error.h" +#include "ov-base.h" +#include "ov-typeinfo.h" + +class Octave_map; +class octave_value_list; + +class tree_walker; + +// Real scalar values. + +class +octave_magic_colon : public octave_base_value +{ +public: + + octave_magic_colon (void) + : octave_base_value () { } + + octave_magic_colon (const octave_magic_colon&) + : octave_base_value () { } + + ~octave_magic_colon (void) { } + + octave_value *clone (void) { return new octave_magic_colon (*this); } + +#if 0 + void *operator new (size_t size); + void operator delete (void *p, size_t size); +#endif + + idx_vector index_vector (void) const { return idx_vector (':'); } + + bool is_defined (void) const { return true; } + + bool is_magic_colon (void) const { return true; } + + bool valid_as_scalar_index (void) const { return true; } + + bool valid_as_zero_index (void) const { return false; } + + int type_id (void) const { return t_id; } + + string type_name (void) const { return t_name; } + + static int static_type_id (void) { return t_id; } + + static void register_type (void) + { t_id = octave_value_typeinfo::register_type (t_name); } + +private: + + static int t_id; + + static const string t_name; +}; + +#endif + +/* +;;; Local Variables: *** +;;; mode: C++ *** +;;; End: *** +*/