Mercurial > hg > octave-nkf
annotate liboctave/chNDArray.h @ 12011:67ad3b58b99a release-3-2-x
improve error handling
author | Jaroslav Hajek <highegg@gmail.com> |
---|---|
date | Wed, 24 Jun 2009 07:31:32 +0200 |
parents | eb63fbe60fab |
children | b29504415a2e |
rev | line source |
---|---|
4514 | 1 /* |
2 | |
8920 | 3 Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009 John W. Eaton |
4514 | 4 |
5 This file is part of Octave. | |
6 | |
7 Octave is free software; you can redistribute it and/or modify it | |
8 under the terms of the GNU General Public License as published by the | |
7016 | 9 Free Software Foundation; either version 3 of the License, or (at your |
10 option) any later version. | |
4514 | 11 |
12 Octave is distributed in the hope that it will be useful, but WITHOUT | |
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
15 for more details. | |
16 | |
17 You should have received a copy of the GNU General Public License | |
7016 | 18 along with Octave; see the file COPYING. If not, see |
19 <http://www.gnu.org/licenses/>. | |
4514 | 20 |
21 */ | |
22 | |
23 #if !defined (octave_charNDArray_h) | |
24 #define octave_charNDArray_h 1 | |
25 | |
26 #include "MArrayN.h" | |
27 #include "chMatrix.h" | |
28 | |
29 #include "mx-defs.h" | |
8774
b756ce0002db
split implementation and interface in mx-op-defs and MArray-defs
Jaroslav Hajek <highegg@gmail.com>
parents:
8626
diff
changeset
|
30 #include "mx-op-decl.h" |
4514 | 31 |
32 class | |
6108 | 33 OCTAVE_API |
4514 | 34 charNDArray : public MArrayN<char> |
35 { | |
36 public: | |
5523 | 37 |
4514 | 38 charNDArray (void) : MArrayN<char> () { } |
39 | |
6979 | 40 charNDArray (const dim_vector& dv) : MArrayN<char> (dv) { } |
4514 | 41 |
6979 | 42 charNDArray (const dim_vector& dv, char val) : MArrayN<char> (dv, val) { } |
4514 | 43 |
44 charNDArray (const charNDArray& a) : MArrayN<char> (a) { } | |
45 | |
46 charNDArray (const charMatrix& a) : MArrayN<char> (a) { } | |
47 | |
48 charNDArray (char c) : MArrayN<char> (charMatrix (c)) { } | |
49 | |
50 charNDArray (const char *s) : MArrayN<char> (charMatrix (s)) { } | |
51 | |
52 charNDArray (const std::string& s) : MArrayN<char> (charMatrix (s)) { } | |
53 | |
54 charNDArray (const string_vector& s) : MArrayN<char> (charMatrix (s)) { } | |
55 | |
56 charNDArray (const ArrayN<char>& a) : MArrayN<char> (a) { } | |
57 | |
58 charNDArray& operator = (const charNDArray& a) | |
59 { | |
60 MArrayN<char>::operator = (a); | |
61 return *this; | |
62 } | |
63 | |
8626
1dce30ab0e72
don't convert NaN to logical in bool expressions
John W. Eaton <jwe@octave.org>
parents:
7620
diff
changeset
|
64 bool any_element_is_nan (void) const { return false; } |
1dce30ab0e72
don't convert NaN to logical in bool expressions
John W. Eaton <jwe@octave.org>
parents:
7620
diff
changeset
|
65 |
5775 | 66 // FIXME -- this is not quite the right thing. |
4514 | 67 |
4556 | 68 boolNDArray all (int dim = -1) const; |
69 boolNDArray any (int dim = -1) const; | |
5275 | 70 charNDArray concat (const charNDArray& rb, const Array<octave_idx_type>& ra_idx); |
71 charNDArray concat (const NDArray& rb, const Array<octave_idx_type>& ra_idx); | |
4915 | 72 |
5275 | 73 charNDArray& insert (const charNDArray& a, octave_idx_type r, octave_idx_type c); |
74 charNDArray& insert (const charNDArray& a, const Array<octave_idx_type>& ra_idx); | |
4915 | 75 |
4514 | 76 charMatrix matrix_value (void) const; |
77 | |
4532 | 78 charNDArray squeeze (void) const { return ArrayN<char>::squeeze (); } |
79 | |
5275 | 80 static void increment_index (Array<octave_idx_type>& ra_idx, |
4532 | 81 const dim_vector& dimensions, |
82 int start_dimension = 0); | |
83 | |
5275 | 84 static octave_idx_type compute_index (Array<octave_idx_type>& ra_idx, |
4556 | 85 const dim_vector& dimensions); |
86 | |
4514 | 87 // i/o |
88 | |
89 // friend std::ostream& operator << (std::ostream& os, const charNDArray& a); | |
90 // friend std::istream& operator >> (std::istream& is, charNDArray& a); | |
91 | |
92 static char resize_fill_value (void) { return '\0'; } | |
93 | |
7620
36594d5bbe13
Move diag function into the octave_value class
David Bateman <dbateman@free.fr>
parents:
7503
diff
changeset
|
94 charNDArray diag (octave_idx_type k = 0) const; |
36594d5bbe13
Move diag function into the octave_value class
David Bateman <dbateman@free.fr>
parents:
7503
diff
changeset
|
95 |
7503
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
96 typedef int (*mapper) (int); |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
97 boolNDArray bmap (mapper fcn) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
98 NDArray dmap (mapper fcn) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
99 charNDArray smap (mapper fcn) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
100 |
4514 | 101 private: |
102 | |
4587 | 103 charNDArray (char *d, dim_vector& dv) : MArrayN<char> (d, dv) { } |
4514 | 104 }; |
105 | |
6708 | 106 NDS_CMP_OP_DECLS (charNDArray, char, OCTAVE_API) |
107 NDS_BOOL_OP_DECLS (charNDArray, char, OCTAVE_API) | |
6456 | 108 |
6708 | 109 SND_CMP_OP_DECLS (char, charNDArray, OCTAVE_API) |
110 SND_BOOL_OP_DECLS (char, charNDArray, OCTAVE_API) | |
6456 | 111 |
6708 | 112 NDND_CMP_OP_DECLS (charNDArray, charNDArray, OCTAVE_API) |
113 NDND_BOOL_OP_DECLS (charNDArray, charNDArray, OCTAVE_API) | |
6456 | 114 |
4514 | 115 MARRAY_FORWARD_DEFS (MArrayN, charNDArray, char) |
116 | |
117 #endif | |
118 | |
119 /* | |
120 ;;; Local Variables: *** | |
121 ;;; mode: C++ *** | |
122 ;;; End: *** | |
123 */ |