Mercurial > hg > octave-nkf
annotate libinterp/octave-value/ov.h @ 15429:4db96357fec9
maint: periodic merge of stable to default
| author | Jordi Gutiérrez Hermoso <jordigh@octave.org> |
|---|---|
| date | Fri, 21 Sep 2012 17:24:46 -0400 |
| parents | src/ov.h@fd5c0159b588 src/ov.h@2fc554ffbc28 |
| children | ecf5be238b4a |
| rev | line source |
|---|---|
| 2376 | 1 /* |
| 2 | |
|
14138
72c96de7a403
maint: update copyright notices for 2012
John W. Eaton <jwe@octave.org>
parents:
13985
diff
changeset
|
3 Copyright (C) 1996-2012 John W. Eaton |
| 11523 | 4 Copyright (C) 2009-2010 VZLU Prague |
| 2376 | 5 |
| 6 This file is part of Octave. | |
| 7 | |
| 8 Octave is free software; you can redistribute it and/or modify it | |
| 9 under the terms of the GNU General Public License as published by the | |
| 7016 | 10 Free Software Foundation; either version 3 of the License, or (at your |
| 11 option) any later version. | |
| 2376 | 12 |
| 13 Octave is distributed in the hope that it will be useful, but WITHOUT | |
| 14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 16 for more details. | |
| 17 | |
| 18 You should have received a copy of the GNU General Public License | |
| 7016 | 19 along with Octave; see the file COPYING. If not, see |
| 20 <http://www.gnu.org/licenses/>. | |
| 2376 | 21 |
| 22 */ | |
| 23 | |
| 24 #if !defined (octave_value_h) | |
| 25 #define octave_value_h 1 | |
| 26 | |
| 27 #include <cstdlib> | |
| 28 | |
|
8950
d865363208d6
include <iosfwd> instead of <iostream> in header files
John W. Eaton <jwe@octave.org>
parents:
8920
diff
changeset
|
29 #include <iosfwd> |
| 2376 | 30 #include <string> |
| 4219 | 31 #include <list> |
| 2376 | 32 |
| 33 #include "Range.h" | |
| 5828 | 34 #include "data-conv.h" |
| 2376 | 35 #include "idx-vector.h" |
| 5828 | 36 #include "mach-info.h" |
| 2376 | 37 #include "mx-base.h" |
| 2477 | 38 #include "oct-alloc.h" |
| 4254 | 39 #include "oct-time.h" |
| 2942 | 40 #include "str-vec.h" |
| 41 | |
| 8676 | 42 #include "oct-hdf5.h" |
| 7433 | 43 #include "oct-sort.h" |
| 44 | |
| 3351 | 45 class Cell; |
|
15149
62a35ae7d6a2
use forward decls for mxArray in ov.h and ov-base.h
John W. Eaton <jwe@octave.org>
parents:
15140
diff
changeset
|
46 class mxArray; |
|
10742
604e13a89c7f
initial code for structs rewrite
Jaroslav Hajek <highegg@gmail.com>
parents:
10670
diff
changeset
|
47 class octave_map; |
|
604e13a89c7f
initial code for structs rewrite
Jaroslav Hajek <highegg@gmail.com>
parents:
10670
diff
changeset
|
48 class octave_scalar_map; |
| 2376 | 49 class Octave_map; |
| 2903 | 50 class octave_stream; |
| 2974 | 51 class octave_function; |
| 4700 | 52 class octave_user_function; |
| 4342 | 53 class octave_fcn_handle; |
| 4933 | 54 class octave_fcn_inline; |
| 2376 | 55 class octave_value_list; |
| 2979 | 56 class octave_lvalue; |
| 2376 | 57 |
| 5759 | 58 #include "ov-base.h" |
| 2376 | 59 |
| 5759 | 60 // Constants. |
| 2376 | 61 |
| 2427 | 62 class octave_value; |
| 63 | |
| 2376 | 64 class |
| 6109 | 65 OCTINTERP_API |
| 2974 | 66 octave_value |
| 2376 | 67 { |
| 68 public: | |
| 69 | |
| 3203 | 70 enum unary_op |
| 71 { | |
| 6518 | 72 op_not, // not |
| 73 op_uplus, // uplus | |
| 74 op_uminus, // uminus | |
| 75 op_transpose, // transpose | |
| 76 op_hermitian, // ctranspose | |
| 3525 | 77 op_incr, |
| 78 op_decr, | |
| 3203 | 79 num_unary_ops, |
| 80 unknown_unary_op | |
| 81 }; | |
| 82 | |
| 2376 | 83 enum binary_op |
| 84 { | |
| 6518 | 85 op_add, // plus |
| 86 op_sub, // minus | |
| 87 op_mul, // mtimes | |
| 88 op_div, // mrdivide | |
| 89 op_pow, // mpower | |
| 90 op_ldiv, // mldivide | |
| 3525 | 91 op_lshift, |
| 92 op_rshift, | |
| 6518 | 93 op_lt, // lt |
| 94 op_le, // le | |
| 95 op_eq, // eq | |
| 96 op_ge, // ge | |
| 97 op_gt, // gt | |
| 98 op_ne, // ne | |
| 99 op_el_mul, // times | |
| 100 op_el_div, // rdivide | |
| 101 op_el_pow, // power | |
| 102 op_el_ldiv, // ldivide | |
| 103 op_el_and, // and | |
| 104 op_el_or, // or | |
| 3525 | 105 op_struct_ref, |
| 2376 | 106 num_binary_ops, |
| 107 unknown_binary_op | |
| 108 }; | |
| 109 | |
|
7800
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
110 enum compound_binary_op |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
111 { |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
112 // ** compound operations ** |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
113 op_trans_mul, |
|
7800
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
114 op_mul_trans, |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
115 op_herm_mul, |
|
7800
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
116 op_mul_herm, |
|
9661
afcf852256d2
optimize / and '\ for triangular matrices
Jaroslav Hajek <highegg@gmail.com>
parents:
9657
diff
changeset
|
117 op_trans_ldiv, |
|
afcf852256d2
optimize / and '\ for triangular matrices
Jaroslav Hajek <highegg@gmail.com>
parents:
9657
diff
changeset
|
118 op_herm_ldiv, |
|
8982
dc6bda6f9994
implement compound logical ops
Jaroslav Hajek <highegg@gmail.com>
parents:
8960
diff
changeset
|
119 op_el_not_and, |
|
dc6bda6f9994
implement compound logical ops
Jaroslav Hajek <highegg@gmail.com>
parents:
8960
diff
changeset
|
120 op_el_not_or, |
|
dc6bda6f9994
implement compound logical ops
Jaroslav Hajek <highegg@gmail.com>
parents:
8960
diff
changeset
|
121 op_el_and_not, |
|
dc6bda6f9994
implement compound logical ops
Jaroslav Hajek <highegg@gmail.com>
parents:
8960
diff
changeset
|
122 op_el_or_not, |
|
7800
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
123 num_compound_binary_ops, |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
124 unknown_compound_binary_op |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
125 }; |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
126 |
| 2880 | 127 enum assign_op |
| 128 { | |
| 3525 | 129 op_asn_eq, |
| 130 op_add_eq, | |
| 131 op_sub_eq, | |
| 132 op_mul_eq, | |
| 133 op_div_eq, | |
| 134 op_ldiv_eq, | |
| 4018 | 135 op_pow_eq, |
| 3525 | 136 op_lshift_eq, |
| 137 op_rshift_eq, | |
| 138 op_el_mul_eq, | |
| 139 op_el_div_eq, | |
| 140 op_el_ldiv_eq, | |
| 4018 | 141 op_el_pow_eq, |
| 3525 | 142 op_el_and_eq, |
| 143 op_el_or_eq, | |
| 2880 | 144 num_assign_ops, |
| 145 unknown_assign_op | |
| 146 }; | |
| 147 | |
|
15140
6ea86e1d0f5f
Support +=, -=, *=, ect. in JIT
Max Brister <max@2bass.com>
parents:
15057
diff
changeset
|
148 static binary_op assign_op_to_binary_op (assign_op); |
|
6ea86e1d0f5f
Support +=, -=, *=, ect. in JIT
Max Brister <max@2bass.com>
parents:
15057
diff
changeset
|
149 |
|
9607
1be3c73ed7b5
reuse temporary arrays in nested expressions
Jaroslav Hajek <highegg@gmail.com>
parents:
9521
diff
changeset
|
150 static assign_op binary_op_to_assign_op (binary_op); |
|
1be3c73ed7b5
reuse temporary arrays in nested expressions
Jaroslav Hajek <highegg@gmail.com>
parents:
9521
diff
changeset
|
151 |
| 3523 | 152 static std::string unary_op_as_string (unary_op); |
| 7336 | 153 static std::string unary_op_fcn_name (unary_op); |
| 3203 | 154 |
| 3523 | 155 static std::string binary_op_as_string (binary_op); |
| 7336 | 156 static std::string binary_op_fcn_name (binary_op); |
| 2376 | 157 |
|
7800
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
158 static std::string binary_op_fcn_name (compound_binary_op); |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
159 |
| 3523 | 160 static std::string assign_op_as_string (assign_op); |
| 2880 | 161 |
| 3933 | 162 static octave_value empty_conv (const std::string& type, |
| 10313 | 163 const octave_value& rhs = octave_value ()); |
| 3933 | 164 |
| 2376 | 165 enum magic_colon { magic_colon_t }; |
| 166 | |
|
8992
d12f44a5dce3
implement fast octave_value constructor
Jaroslav Hajek <highegg@gmail.com>
parents:
8982
diff
changeset
|
167 octave_value (void) |
|
d12f44a5dce3
implement fast octave_value constructor
Jaroslav Hajek <highegg@gmail.com>
parents:
8982
diff
changeset
|
168 { |
|
d12f44a5dce3
implement fast octave_value constructor
Jaroslav Hajek <highegg@gmail.com>
parents:
8982
diff
changeset
|
169 static octave_base_value nil_rep; |
|
d12f44a5dce3
implement fast octave_value constructor
Jaroslav Hajek <highegg@gmail.com>
parents:
8982
diff
changeset
|
170 rep = &nil_rep; |
|
d12f44a5dce3
implement fast octave_value constructor
Jaroslav Hajek <highegg@gmail.com>
parents:
8982
diff
changeset
|
171 rep->count++; |
|
d12f44a5dce3
implement fast octave_value constructor
Jaroslav Hajek <highegg@gmail.com>
parents:
8982
diff
changeset
|
172 } |
|
d12f44a5dce3
implement fast octave_value constructor
Jaroslav Hajek <highegg@gmail.com>
parents:
8982
diff
changeset
|
173 |
| 4254 | 174 octave_value (short int i); |
| 175 octave_value (unsigned short int i); | |
| 4233 | 176 octave_value (int i); |
| 4254 | 177 octave_value (unsigned int i); |
| 178 octave_value (long int i); | |
| 179 octave_value (unsigned long int i); | |
| 4353 | 180 |
| 5775 | 181 // FIXME -- these are kluges. They turn into doubles |
| 4353 | 182 // internally, which will break for very large values. We just use |
| 183 // them to store things like 64-bit ino_t, etc, and hope that those | |
| 184 // values are never actually larger than can be represented exactly | |
| 185 // in a double. | |
| 186 | |
| 187 #if defined (HAVE_LONG_LONG_INT) | |
| 188 octave_value (long long int i); | |
| 189 #endif | |
| 4356 | 190 #if defined (HAVE_UNSIGNED_LONG_LONG_INT) |
| 4353 | 191 octave_value (unsigned long long int i); |
| 192 #endif | |
| 193 | |
| 4254 | 194 octave_value (octave_time t); |
| 2376 | 195 octave_value (double d); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
196 octave_value (float d); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
197 octave_value (const Array<octave_value>& a, bool is_cs_list = false); |
| 4532 | 198 octave_value (const Cell& c, bool is_cs_list = false); |
|
14846
460a3c6d8bf1
maint: Use Octave coding convention for cuddled parenthis in function calls with empty argument lists.
Rik <octave@nomad.inbox5.com>
parents:
14770
diff
changeset
|
199 octave_value (const Matrix& m, const MatrixType& t = MatrixType ()); |
|
460a3c6d8bf1
maint: Use Octave coding convention for cuddled parenthis in function calls with empty argument lists.
Rik <octave@nomad.inbox5.com>
parents:
14770
diff
changeset
|
200 octave_value (const FloatMatrix& m, const MatrixType& t = MatrixType ()); |
| 4513 | 201 octave_value (const NDArray& nda); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
202 octave_value (const FloatNDArray& nda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
203 octave_value (const Array<double>& m); |
|
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
204 octave_value (const Array<float>& m); |
| 2376 | 205 octave_value (const DiagMatrix& d); |
|
15428
fd5c0159b588
Fix diag handling of diagvectors (bug #37411)
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
14138
diff
changeset
|
206 octave_value (const DiagArray2<double>& d); |
|
fd5c0159b588
Fix diag handling of diagvectors (bug #37411)
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
14138
diff
changeset
|
207 octave_value (const DiagArray2<float>& d); |
|
fd5c0159b588
Fix diag handling of diagvectors (bug #37411)
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
14138
diff
changeset
|
208 octave_value (const DiagArray2<Complex>& d); |
|
fd5c0159b588
Fix diag handling of diagvectors (bug #37411)
Jordi Gutiérrez Hermoso <jordigh@octave.org>
parents:
14138
diff
changeset
|
209 octave_value (const DiagArray2<FloatComplex>& d); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
210 octave_value (const FloatDiagMatrix& d); |
| 3418 | 211 octave_value (const RowVector& v); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
212 octave_value (const FloatRowVector& v); |
| 3418 | 213 octave_value (const ColumnVector& v); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
214 octave_value (const FloatColumnVector& v); |
| 2376 | 215 octave_value (const Complex& C); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
216 octave_value (const FloatComplex& C); |
|
14846
460a3c6d8bf1
maint: Use Octave coding convention for cuddled parenthis in function calls with empty argument lists.
Rik <octave@nomad.inbox5.com>
parents:
14770
diff
changeset
|
217 octave_value (const ComplexMatrix& m, const MatrixType& t = MatrixType ()); |
|
460a3c6d8bf1
maint: Use Octave coding convention for cuddled parenthis in function calls with empty argument lists.
Rik <octave@nomad.inbox5.com>
parents:
14770
diff
changeset
|
218 octave_value (const FloatComplexMatrix& m, const MatrixType& t = MatrixType ()); |
| 4513 | 219 octave_value (const ComplexNDArray& cnda); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
220 octave_value (const FloatComplexNDArray& cnda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
221 octave_value (const Array<Complex>& m); |
|
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
222 octave_value (const Array<FloatComplex>& m); |
| 2376 | 223 octave_value (const ComplexDiagMatrix& d); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
224 octave_value (const FloatComplexDiagMatrix& d); |
| 3418 | 225 octave_value (const ComplexRowVector& v); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
226 octave_value (const FloatComplexRowVector& v); |
| 3418 | 227 octave_value (const ComplexColumnVector& v); |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
228 octave_value (const FloatComplexColumnVector& v); |
|
8960
93f18f166aba
remove float perm matrices
Jaroslav Hajek <highegg@gmail.com>
parents:
8950
diff
changeset
|
229 octave_value (const PermMatrix& p); |
| 2825 | 230 octave_value (bool b); |
|
14846
460a3c6d8bf1
maint: Use Octave coding convention for cuddled parenthis in function calls with empty argument lists.
Rik <octave@nomad.inbox5.com>
parents:
14770
diff
changeset
|
231 octave_value (const boolMatrix& bm, const MatrixType& t = MatrixType ()); |
| 4513 | 232 octave_value (const boolNDArray& bnda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
233 octave_value (const Array<bool>& bnda); |
|
9689
34d6f005db4b
eliminate is_string argument from octave_value character array constructors
John W. Eaton <jwe@octave.org>
parents:
9685
diff
changeset
|
234 octave_value (char c, char type = '\''); |
|
34d6f005db4b
eliminate is_string argument from octave_value character array constructors
John W. Eaton <jwe@octave.org>
parents:
9685
diff
changeset
|
235 octave_value (const char *s, char type = '\''); |
|
34d6f005db4b
eliminate is_string argument from octave_value character array constructors
John W. Eaton <jwe@octave.org>
parents:
9685
diff
changeset
|
236 octave_value (const std::string& s, char type = '\''); |
|
34d6f005db4b
eliminate is_string argument from octave_value character array constructors
John W. Eaton <jwe@octave.org>
parents:
9685
diff
changeset
|
237 octave_value (const string_vector& s, char type = '\''); |
| 10313 | 238 octave_value (const charMatrix& chm, char type = '\''); |
|
9689
34d6f005db4b
eliminate is_string argument from octave_value character array constructors
John W. Eaton <jwe@octave.org>
parents:
9685
diff
changeset
|
239 octave_value (const charNDArray& chnda, char type = '\''); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
240 octave_value (const Array<char>& chnda, char type = '\''); |
|
9689
34d6f005db4b
eliminate is_string argument from octave_value character array constructors
John W. Eaton <jwe@octave.org>
parents:
9685
diff
changeset
|
241 octave_value (const charMatrix& chm, bool is_string, |
| 10313 | 242 char type = '\'') GCC_ATTR_DEPRECATED; |
|
9689
34d6f005db4b
eliminate is_string argument from octave_value character array constructors
John W. Eaton <jwe@octave.org>
parents:
9685
diff
changeset
|
243 octave_value (const charNDArray& chnda, bool is_string, |
| 10313 | 244 char type = '\'') GCC_ATTR_DEPRECATED; |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
245 octave_value (const Array<char>& chnda, bool is_string, |
| 10313 | 246 char type = '\'') GCC_ATTR_DEPRECATED; |
| 5785 | 247 octave_value (const SparseMatrix& m, const MatrixType& t = MatrixType ()); |
| 6863 | 248 octave_value (const Sparse<double>& m, const MatrixType& t = MatrixType ()); |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
249 octave_value (const SparseComplexMatrix& m, |
| 10313 | 250 const MatrixType& t = MatrixType ()); |
| 6863 | 251 octave_value (const Sparse<Complex>& m, const MatrixType& t = MatrixType ()); |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
252 octave_value (const SparseBoolMatrix& bm, |
| 10313 | 253 const MatrixType& t = MatrixType ()); |
| 7433 | 254 octave_value (const Sparse<bool>& m, const MatrixType& t = MatrixType ()); |
| 4901 | 255 octave_value (const octave_int8& i); |
| 4910 | 256 octave_value (const octave_int16& i); |
| 257 octave_value (const octave_int32& i); | |
| 258 octave_value (const octave_int64& i); | |
| 4901 | 259 octave_value (const octave_uint8& i); |
| 260 octave_value (const octave_uint16& i); | |
| 261 octave_value (const octave_uint32& i); | |
| 262 octave_value (const octave_uint64& i); | |
| 263 octave_value (const int8NDArray& inda); | |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
264 octave_value (const Array<octave_int8>& inda); |
| 4910 | 265 octave_value (const int16NDArray& inda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
266 octave_value (const Array<octave_int16>& inda); |
| 4910 | 267 octave_value (const int32NDArray& inda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
268 octave_value (const Array<octave_int32>& inda); |
| 4910 | 269 octave_value (const int64NDArray& inda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
270 octave_value (const Array<octave_int64>& inda); |
| 4901 | 271 octave_value (const uint8NDArray& inda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
272 octave_value (const Array<octave_uint8>& inda); |
| 4901 | 273 octave_value (const uint16NDArray& inda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
274 octave_value (const Array<octave_uint16>& inda); |
| 4901 | 275 octave_value (const uint32NDArray& inda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
276 octave_value (const Array<octave_uint32>& inda); |
| 4901 | 277 octave_value (const uint64NDArray& inda); |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9728
diff
changeset
|
278 octave_value (const Array<octave_uint64>& inda); |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
279 octave_value (const Array<octave_idx_type>& inda, |
|
9351
e2344f4af0cb
autocache indices returned from find et al.
Jaroslav Hajek <highegg@gmail.com>
parents:
9329
diff
changeset
|
280 bool zero_based = false, bool cache_index = false); |
| 9725 | 281 octave_value (const Array<std::string>& cellstr); |
|
10325
8b3cfc1288e2
implement lazy index conversions
Jaroslav Hajek <highegg@gmail.com>
parents:
10313
diff
changeset
|
282 octave_value (const idx_vector& idx, bool lazy = true); |
| 2376 | 283 octave_value (double base, double limit, double inc); |
| 284 octave_value (const Range& r); | |
|
10742
604e13a89c7f
initial code for structs rewrite
Jaroslav Hajek <highegg@gmail.com>
parents:
10670
diff
changeset
|
285 octave_value (const octave_map& m); |
|
604e13a89c7f
initial code for structs rewrite
Jaroslav Hajek <highegg@gmail.com>
parents:
10670
diff
changeset
|
286 octave_value (const octave_scalar_map& m); |
| 2376 | 287 octave_value (const Octave_map& m); |
|
13294
7dce7e110511
make concatenation of class objects work
John W. Eaton <jwe@octave.org>
parents:
13241
diff
changeset
|
288 octave_value (const Octave_map& m, const std::string& id, |
|
13874
c1b754d93572
copy parent class info when performing operations on class objects
John W. Eaton <jwe@octave.org>
parents:
13736
diff
changeset
|
289 const std::list<std::string>& plist); |
| 10293 | 290 octave_value (const octave_value_list& m, bool = false); |
| 2376 | 291 octave_value (octave_value::magic_colon); |
| 292 | |
|
9728
70925b11ba46
again allow the obsolete syntax for cellfun
Jaroslav Hajek <highegg@gmail.com>
parents:
9725
diff
changeset
|
293 octave_value (octave_base_value *new_rep, bool borrow = false); |
|
70925b11ba46
again allow the obsolete syntax for cellfun
Jaroslav Hajek <highegg@gmail.com>
parents:
9725
diff
changeset
|
294 octave_value (octave_base_value *new_rep, int xcount) GCC_ATTR_DEPRECATED; |
| 2376 | 295 |
| 296 // Copy constructor. | |
| 297 | |
| 298 octave_value (const octave_value& a) | |
| 299 { | |
| 300 rep = a.rep; | |
| 301 rep->count++; | |
| 302 } | |
| 303 | |
| 3933 | 304 // This should only be called for derived types. |
| 305 | |
| 5759 | 306 octave_base_value *clone (void) const; |
| 3933 | 307 |
| 5759 | 308 octave_base_value *empty_clone (void) const |
| 3933 | 309 { return rep->empty_clone (); } |
| 310 | |
| 2376 | 311 // Delete the representation of this constant if the count drops to |
| 312 // zero. | |
| 313 | |
| 6338 | 314 ~octave_value (void) |
| 315 { | |
| 316 if (--rep->count == 0) | |
| 317 delete rep; | |
| 318 } | |
| 2376 | 319 |
| 320 void make_unique (void) | |
| 321 { | |
| 322 if (rep->count > 1) | |
| 10313 | 323 { |
| 14445 | 324 octave_base_value *r = rep->unique_clone (); |
|
13985
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
325 |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
326 if (--rep->count == 0) |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
327 delete rep; |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
328 |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
329 rep = r; |
| 10313 | 330 } |
| 2376 | 331 } |
| 332 | |
|
8546
3d8a914c580e
improve parser indexed assigment code
Jaroslav Hajek <highegg@gmail.com>
parents:
8531
diff
changeset
|
333 // This uniquifies the value if it is referenced by more than a certain |
|
3d8a914c580e
improve parser indexed assigment code
Jaroslav Hajek <highegg@gmail.com>
parents:
8531
diff
changeset
|
334 // number of shallow copies. This is useful for optimizations where we |
|
3d8a914c580e
improve parser indexed assigment code
Jaroslav Hajek <highegg@gmail.com>
parents:
8531
diff
changeset
|
335 // know a certain copy, typically within a cell array, to be obsolete. |
|
3d8a914c580e
improve parser indexed assigment code
Jaroslav Hajek <highegg@gmail.com>
parents:
8531
diff
changeset
|
336 void make_unique (int obsolete_copies) |
|
3d8a914c580e
improve parser indexed assigment code
Jaroslav Hajek <highegg@gmail.com>
parents:
8531
diff
changeset
|
337 { |
|
3d8a914c580e
improve parser indexed assigment code
Jaroslav Hajek <highegg@gmail.com>
parents:
8531
diff
changeset
|
338 if (rep->count > obsolete_copies + 1) |
| 10313 | 339 { |
|
13985
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
340 octave_base_value *r = rep->unique_clone (); |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
341 |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
342 if (--rep->count == 0) |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
343 delete rep; |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
344 |
|
43cc49c7abd1
Use thread-safe atomic reference counting (GCC and MSVC).
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13874
diff
changeset
|
345 rep = r; |
| 10313 | 346 } |
|
8546
3d8a914c580e
improve parser indexed assigment code
Jaroslav Hajek <highegg@gmail.com>
parents:
8531
diff
changeset
|
347 } |
|
3d8a914c580e
improve parser indexed assigment code
Jaroslav Hajek <highegg@gmail.com>
parents:
8531
diff
changeset
|
348 |
| 2376 | 349 // Simple assignment. |
| 350 | |
| 351 octave_value& operator = (const octave_value& a) | |
| 352 { | |
| 353 if (rep != a.rep) | |
| 10313 | 354 { |
| 355 if (--rep->count == 0) | |
| 356 delete rep; | |
| 2376 | 357 |
| 10313 | 358 rep = a.rep; |
| 359 rep->count++; | |
| 360 } | |
| 2376 | 361 |
| 362 return *this; | |
| 363 } | |
| 364 | |
|
9703
9a5598cf899d
octave_value::get_count: return octave_idx_type, not int
John W. Eaton <jwe@octave.org>
parents:
9689
diff
changeset
|
365 octave_idx_type get_count (void) const { return rep->count; } |
| 3239 | 366 |
|
8345
c777f3ce02d8
smarter conversion lookup
Jaroslav Hajek <highegg@gmail.com>
parents:
8150
diff
changeset
|
367 octave_base_value::type_conv_info numeric_conversion_function (void) const |
| 2376 | 368 { return rep->numeric_conversion_function (); } |
| 369 | |
|
8345
c777f3ce02d8
smarter conversion lookup
Jaroslav Hajek <highegg@gmail.com>
parents:
8150
diff
changeset
|
370 octave_base_value::type_conv_info numeric_demotion_function (void) const |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
371 { return rep->numeric_demotion_function (); } |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
372 |
| 2409 | 373 void maybe_mutate (void); |
| 374 | |
| 5759 | 375 octave_value squeeze (void) const |
| 4532 | 376 { return rep->squeeze (); } |
| 377 | |
|
8458
d254a21e0120
reimplement full as method of octave_base_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8456
diff
changeset
|
378 // The result of full(). |
|
d254a21e0120
reimplement full as method of octave_base_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8456
diff
changeset
|
379 octave_value full_value (void) const |
|
d254a21e0120
reimplement full as method of octave_base_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8456
diff
changeset
|
380 { return rep->full_value (); } |
|
d254a21e0120
reimplement full as method of octave_base_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8456
diff
changeset
|
381 |
| 5759 | 382 octave_base_value *try_narrowing_conversion (void) |
| 2410 | 383 { return rep->try_narrowing_conversion (); } |
| 2409 | 384 |
|
9329
67fc970dad7d
improve indexed assignment using indexed numel
Jaroslav Hajek <highegg@gmail.com>
parents:
9151
diff
changeset
|
385 // Close to dims (), but can be overloaded for classes. |
|
67fc970dad7d
improve indexed assignment using indexed numel
Jaroslav Hajek <highegg@gmail.com>
parents:
9151
diff
changeset
|
386 Matrix size (void) |
|
67fc970dad7d
improve indexed assignment using indexed numel
Jaroslav Hajek <highegg@gmail.com>
parents:
9151
diff
changeset
|
387 { return rep->size (); } |
|
67fc970dad7d
improve indexed assignment using indexed numel
Jaroslav Hajek <highegg@gmail.com>
parents:
9151
diff
changeset
|
388 |
|
67fc970dad7d
improve indexed assignment using indexed numel
Jaroslav Hajek <highegg@gmail.com>
parents:
9151
diff
changeset
|
389 octave_idx_type numel (const octave_value_list& idx) |
|
67fc970dad7d
improve indexed assignment using indexed numel
Jaroslav Hajek <highegg@gmail.com>
parents:
9151
diff
changeset
|
390 { return rep->numel (idx); } |
|
67fc970dad7d
improve indexed assignment using indexed numel
Jaroslav Hajek <highegg@gmail.com>
parents:
9151
diff
changeset
|
391 |
| 4271 | 392 octave_value single_subsref (const std::string& type, |
| 10313 | 393 const octave_value_list& idx); |
| 4271 | 394 |
| 5759 | 395 octave_value subsref (const std::string& type, |
|
8551
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
396 const std::list<octave_value_list>& idx) |
| 3933 | 397 { return rep->subsref (type, idx); } |
| 398 | |
|
8551
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
399 octave_value subsref (const std::string& type, |
|
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
400 const std::list<octave_value_list>& idx, |
|
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
401 bool auto_add) |
|
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
402 { return rep->subsref (type, idx, auto_add); } |
|
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
403 |
| 5759 | 404 octave_value_list subsref (const std::string& type, |
|
8551
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
405 const std::list<octave_value_list>& idx, |
|
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
406 int nargout); |
| 3933 | 407 |
|
10832
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
408 octave_value_list subsref (const std::string& type, |
|
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
409 const std::list<octave_value_list>& idx, |
|
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
410 int nargout, |
|
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
411 const std::list<octave_lvalue> *lvalue_list); |
|
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
412 |
| 4247 | 413 octave_value next_subsref (const std::string& type, const |
| 10313 | 414 std::list<octave_value_list>& idx, |
| 415 size_t skip = 1); | |
| 3933 | 416 |
| 4994 | 417 octave_value_list next_subsref (int nargout, |
| 10313 | 418 const std::string& type, const |
| 419 std::list<octave_value_list>& idx, | |
| 420 size_t skip = 1); | |
| 4994 | 421 |
|
8551
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
422 octave_value next_subsref (bool auto_add, const std::string& type, const |
| 10313 | 423 std::list<octave_value_list>& idx, |
| 424 size_t skip = 1); | |
|
8551
906f976d35a8
further improve struct&cell indexing & indexed assignment
Jaroslav Hajek <highegg@gmail.com>
parents:
8546
diff
changeset
|
425 |
| 5759 | 426 octave_value do_index_op (const octave_value_list& idx, |
| 10313 | 427 bool resize_ok = false) |
| 3933 | 428 { return rep->do_index_op (idx, resize_ok); } |
| 429 | |
| 5759 | 430 octave_value_list |
| 3544 | 431 do_multi_index_op (int nargout, const octave_value_list& idx); |
| 2974 | 432 |
|
10832
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
433 octave_value_list |
|
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
434 do_multi_index_op (int nargout, const octave_value_list& idx, |
|
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
435 const std::list<octave_lvalue> *lvalue_list); |
|
1b2fcd122c6a
allow user detect ignored outputs in m-functions
Jaroslav Hajek <highegg@gmail.com>
parents:
10768
diff
changeset
|
436 |
| 5759 | 437 octave_value subsasgn (const std::string& type, |
| 10313 | 438 const std::list<octave_value_list>& idx, |
| 439 const octave_value& rhs); | |
| 2376 | 440 |
|
12171
d08901c05c1b
fix bug in class assignment to undefined object with index
John W. Eaton <jwe@octave.org>
parents:
11586
diff
changeset
|
441 octave_value undef_subsasgn (const std::string& type, |
|
d08901c05c1b
fix bug in class assignment to undefined object with index
John W. Eaton <jwe@octave.org>
parents:
11586
diff
changeset
|
442 const std::list<octave_value_list>& idx, |
|
d08901c05c1b
fix bug in class assignment to undefined object with index
John W. Eaton <jwe@octave.org>
parents:
11586
diff
changeset
|
443 const octave_value& rhs); |
|
d08901c05c1b
fix bug in class assignment to undefined object with index
John W. Eaton <jwe@octave.org>
parents:
11586
diff
changeset
|
444 |
|
10544
9961fc022d9d
fix assignment to non-existing variables and octave_value::assign
Jaroslav Hajek <highegg@gmail.com>
parents:
10521
diff
changeset
|
445 octave_value& assign (assign_op op, const std::string& type, |
| 10313 | 446 const std::list<octave_value_list>& idx, |
| 447 const octave_value& rhs); | |
| 2948 | 448 |
|
10544
9961fc022d9d
fix assignment to non-existing variables and octave_value::assign
Jaroslav Hajek <highegg@gmail.com>
parents:
10521
diff
changeset
|
449 octave_value& assign (assign_op, const octave_value& rhs); |
| 2948 | 450 |
| 5759 | 451 idx_vector index_vector (void) const |
| 2376 | 452 { return rep->index_vector (); } |
| 453 | |
| 454 // Size. | |
| 455 | |
| 5759 | 456 dim_vector dims (void) const |
| 4513 | 457 { return rep->dims (); } |
| 458 | |
| 5759 | 459 octave_idx_type rows (void) const { return rep->rows (); } |
| 4563 | 460 |
| 5759 | 461 octave_idx_type columns (void) const { return rep->columns (); } |
| 3195 | 462 |
| 5275 | 463 octave_idx_type length (void) const; |
| 4554 | 464 |
| 5759 | 465 int ndims (void) const { return rep->ndims (); } |
| 4563 | 466 |
|
14846
460a3c6d8bf1
maint: Use Octave coding convention for cuddled parenthis in function calls with empty argument lists.
Rik <octave@nomad.inbox5.com>
parents:
14770
diff
changeset
|
467 bool all_zero_dims (void) const { return dims ().all_zero (); } |
| 5164 | 468 |
| 5759 | 469 octave_idx_type numel (void) const |
| 5080 | 470 { return rep->numel (); } |
| 4559 | 471 |
| 5759 | 472 octave_idx_type capacity (void) const |
| 5164 | 473 { return rep->capacity (); } |
| 474 | |
| 5759 | 475 size_t byte_size (void) const |
| 4791 | 476 { return rep->byte_size (); } |
| 477 | |
| 5759 | 478 octave_idx_type nnz (void) const { return rep->nnz (); } |
| 5602 | 479 |
| 5759 | 480 octave_idx_type nzmax (void) const { return rep->nzmax (); } |
| 5604 | 481 |
| 5900 | 482 octave_idx_type nfields (void) const { return rep->nfields (); } |
| 483 | |
| 5759 | 484 octave_value reshape (const dim_vector& dv) const |
| 4587 | 485 { return rep->reshape (dv); } |
| 4567 | 486 |
| 5759 | 487 octave_value permute (const Array<int>& vec, bool inv = false) const |
| 4593 | 488 { return rep->permute (vec, inv); } |
| 489 | |
| 490 octave_value ipermute (const Array<int>& vec) const | |
| 491 { return rep->permute (vec, true); } | |
| 492 | |
| 5759 | 493 octave_value resize (const dim_vector& dv, bool fill = false) const |
| 494 { return rep->resize (dv, fill);} | |
| 4915 | 495 |
| 5785 | 496 MatrixType matrix_type (void) const |
| 497 { return rep->matrix_type (); } | |
| 498 | |
| 499 MatrixType matrix_type (const MatrixType& typ) const | |
| 500 { return rep->matrix_type (typ); } | |
| 501 | |
| 2376 | 502 // Does this constant have a type? Both of these are provided since |
| 503 // it is sometimes more natural to write is_undefined() instead of | |
| 504 // ! is_defined(). | |
| 505 | |
| 5759 | 506 bool is_defined (void) const |
| 2376 | 507 { return rep->is_defined (); } |
| 508 | |
| 509 bool is_undefined (void) const | |
| 510 { return ! is_defined (); } | |
| 511 | |
| 4559 | 512 bool is_empty (void) const |
| 5759 | 513 { return rep->is_empty (); } |
| 4559 | 514 |
| 5759 | 515 bool is_cell (void) const |
| 3351 | 516 { return rep->is_cell (); } |
| 517 | |
| 6116 | 518 bool is_cellstr (void) const |
| 519 { return rep->is_cellstr (); } | |
| 520 | |
| 5759 | 521 bool is_real_scalar (void) const |
| 2376 | 522 { return rep->is_real_scalar (); } |
| 523 | |
| 5759 | 524 bool is_real_matrix (void) const |
| 2376 | 525 { return rep->is_real_matrix (); } |
| 526 | |
| 5759 | 527 bool is_complex_scalar (void) const |
| 2376 | 528 { return rep->is_complex_scalar (); } |
| 529 | |
| 5759 | 530 bool is_complex_matrix (void) const |
| 2376 | 531 { return rep->is_complex_matrix (); } |
| 532 | |
| 5881 | 533 bool is_bool_scalar (void) const |
| 534 { return rep->is_bool_scalar (); } | |
| 535 | |
| 5759 | 536 bool is_bool_matrix (void) const |
| 4587 | 537 { return rep->is_bool_matrix (); } |
| 538 | |
| 5759 | 539 bool is_char_matrix (void) const |
| 2376 | 540 { return rep->is_char_matrix (); } |
| 541 | |
|
8366
8b1a2555c4e2
implement diagonal matrix objects
Jaroslav Hajek <highegg@gmail.com>
parents:
8346
diff
changeset
|
542 bool is_diag_matrix (void) const |
|
8b1a2555c4e2
implement diagonal matrix objects
Jaroslav Hajek <highegg@gmail.com>
parents:
8346
diff
changeset
|
543 { return rep->is_diag_matrix (); } |
|
8b1a2555c4e2
implement diagonal matrix objects
Jaroslav Hajek <highegg@gmail.com>
parents:
8346
diff
changeset
|
544 |
|
8371
c3f7e2549abb
make det & inv aware of diagonal & permutation matrices
Jaroslav Hajek <highegg@gmail.com>
parents:
8367
diff
changeset
|
545 bool is_perm_matrix (void) const |
|
c3f7e2549abb
make det & inv aware of diagonal & permutation matrices
Jaroslav Hajek <highegg@gmail.com>
parents:
8367
diff
changeset
|
546 { return rep->is_perm_matrix (); } |
|
c3f7e2549abb
make det & inv aware of diagonal & permutation matrices
Jaroslav Hajek <highegg@gmail.com>
parents:
8367
diff
changeset
|
547 |
| 5759 | 548 bool is_string (void) const |
| 2376 | 549 { return rep->is_string (); } |
| 550 | |
| 5759 | 551 bool is_sq_string (void) const |
| 5279 | 552 { return rep->is_sq_string (); } |
| 553 | |
| 5280 | 554 bool is_dq_string (void) const |
| 555 { return rep->is_string () && ! rep->is_sq_string (); } | |
| 556 | |
| 5759 | 557 bool is_range (void) const |
| 2376 | 558 { return rep->is_range (); } |
| 559 | |
| 5759 | 560 bool is_map (void) const |
| 2376 | 561 { return rep->is_map (); } |
| 562 | |
| 7336 | 563 bool is_object (void) const |
| 564 { return rep->is_object (); } | |
| 565 | |
| 5759 | 566 bool is_cs_list (void) const |
| 3977 | 567 { return rep->is_cs_list (); } |
| 568 | |
| 5759 | 569 bool is_magic_colon (void) const |
| 2376 | 570 { return rep->is_magic_colon (); } |
| 571 | |
|
8150
283989f2da9b
make null assignment matlab compatible
Jaroslav Hajek <highegg@gmail.com>
parents:
8017
diff
changeset
|
572 bool is_null_value (void) const |
|
283989f2da9b
make null assignment matlab compatible
Jaroslav Hajek <highegg@gmail.com>
parents:
8017
diff
changeset
|
573 { return rep->is_null_value (); } |
|
283989f2da9b
make null assignment matlab compatible
Jaroslav Hajek <highegg@gmail.com>
parents:
8017
diff
changeset
|
574 |
| 2376 | 575 // Are any or all of the elements in this constant nonzero? |
| 576 | |
| 5759 | 577 octave_value all (int dim = 0) const |
| 4015 | 578 { return rep->all (dim); } |
| 2376 | 579 |
| 5759 | 580 octave_value any (int dim = 0) const |
| 4015 | 581 { return rep->any (dim); } |
| 2376 | 582 |
| 9685 | 583 builtin_type_t builtin_type (void) const |
| 584 { return rep->builtin_type (); } | |
| 585 | |
| 5895 | 586 // Floating point types. |
| 587 | |
| 588 bool is_double_type (void) const | |
| 589 { return rep->is_double_type (); } | |
| 590 | |
| 591 bool is_single_type (void) const | |
| 592 { return rep->is_single_type (); } | |
| 593 | |
| 7576 | 594 bool is_float_type (void) const |
| 595 { return rep->is_float_type (); } | |
| 596 | |
| 5895 | 597 // Integer types. |
| 598 | |
| 599 bool is_int8_type (void) const | |
| 600 { return rep->is_int8_type (); } | |
| 601 | |
| 602 bool is_int16_type (void) const | |
| 603 { return rep->is_int16_type (); } | |
| 604 | |
| 605 bool is_int32_type (void) const | |
| 606 { return rep->is_int32_type (); } | |
| 607 | |
| 608 bool is_int64_type (void) const | |
| 609 { return rep->is_int64_type (); } | |
| 610 | |
| 611 bool is_uint8_type (void) const | |
| 612 { return rep->is_uint8_type (); } | |
| 613 | |
| 614 bool is_uint16_type (void) const | |
| 615 { return rep->is_uint16_type (); } | |
| 616 | |
| 617 bool is_uint32_type (void) const | |
| 618 { return rep->is_uint32_type (); } | |
| 619 | |
| 620 bool is_uint64_type (void) const | |
| 621 { return rep->is_uint64_type (); } | |
| 622 | |
| 2376 | 623 // Other type stuff. |
| 624 | |
| 5759 | 625 bool is_bool_type (void) const |
| 3209 | 626 { return rep->is_bool_type (); } |
| 627 | |
| 6223 | 628 bool is_integer_type (void) const |
| 629 { return rep->is_integer_type (); } | |
| 630 | |
| 5759 | 631 bool is_real_type (void) const |
| 2376 | 632 { return rep->is_real_type (); } |
| 633 | |
| 5759 | 634 bool is_complex_type (void) const |
| 2376 | 635 { return rep->is_complex_type (); } |
| 636 | |
| 5759 | 637 bool is_scalar_type (void) const |
| 2376 | 638 { return rep->is_scalar_type (); } |
| 639 | |
| 5759 | 640 bool is_matrix_type (void) const |
| 2376 | 641 { return rep->is_matrix_type (); } |
| 642 | |
| 5759 | 643 bool is_numeric_type (void) const |
| 2376 | 644 { return rep->is_numeric_type (); } |
| 645 | |
| 5759 | 646 bool is_sparse_type (void) const |
| 5631 | 647 { return rep->is_sparse_type (); } |
| 648 | |
| 2376 | 649 // Does this constant correspond to a truth value? |
| 650 | |
| 5759 | 651 bool is_true (void) const |
| 2376 | 652 { return rep->is_true (); } |
| 653 | |
|
8346
8302788f09db
fix empty matrix handling in switch statement
Jaroslav Hajek <highegg@gmail.com>
parents:
8345
diff
changeset
|
654 // Do two constants match (in a switch statement)? |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
655 |
|
8346
8302788f09db
fix empty matrix handling in switch statement
Jaroslav Hajek <highegg@gmail.com>
parents:
8345
diff
changeset
|
656 bool is_equal (const octave_value&) const; |
|
8302788f09db
fix empty matrix handling in switch statement
Jaroslav Hajek <highegg@gmail.com>
parents:
8345
diff
changeset
|
657 |
| 2376 | 658 // Are the dimensions of this constant zero by zero? |
| 659 | |
| 5759 | 660 bool is_zero_by_zero (void) const |
| 661 { return (rows () == 0 && columns () == 0); } | |
| 2376 | 662 |
| 5759 | 663 bool is_constant (void) const |
| 2974 | 664 { return rep->is_constant (); } |
| 665 | |
| 5759 | 666 bool is_function_handle (void) const |
| 4654 | 667 { return rep->is_function_handle (); } |
| 668 | |
|
13241
2a8dcb5b3a00
improve default indexing for objects
John W. Eaton <jwe@octave.org>
parents:
13110
diff
changeset
|
669 bool is_anonymous_function (void) const |
|
2a8dcb5b3a00
improve default indexing for objects
John W. Eaton <jwe@octave.org>
parents:
13110
diff
changeset
|
670 { return rep->is_anonymous_function (); } |
|
2a8dcb5b3a00
improve default indexing for objects
John W. Eaton <jwe@octave.org>
parents:
13110
diff
changeset
|
671 |
| 5759 | 672 bool is_inline_function (void) const |
| 4954 | 673 { return rep->is_inline_function (); } |
| 674 | |
| 5759 | 675 bool is_function (void) const |
| 2974 | 676 { return rep->is_function (); } |
| 2891 | 677 |
| 7336 | 678 bool is_user_script (void) const |
| 679 { return rep->is_user_script (); } | |
| 680 | |
| 681 bool is_user_function (void) const | |
| 682 { return rep->is_user_function (); } | |
| 683 | |
|
7719
87eda1f8faaa
octave_user_code: new base class for octave_user_script and octave_user_function
John W. Eaton <jwe@octave.org>
parents:
7638
diff
changeset
|
684 bool is_user_code (void) const |
|
87eda1f8faaa
octave_user_code: new base class for octave_user_script and octave_user_function
John W. Eaton <jwe@octave.org>
parents:
7638
diff
changeset
|
685 { return rep->is_user_code (); } |
|
87eda1f8faaa
octave_user_code: new base class for octave_user_script and octave_user_function
John W. Eaton <jwe@octave.org>
parents:
7638
diff
changeset
|
686 |
| 5759 | 687 bool is_builtin_function (void) const |
| 3325 | 688 { return rep->is_builtin_function (); } |
| 689 | |
| 5759 | 690 bool is_dld_function (void) const |
| 3325 | 691 { return rep->is_dld_function (); } |
| 692 | |
| 5864 | 693 bool is_mex_function (void) const |
| 694 { return rep->is_mex_function (); } | |
| 695 | |
|
7876
8447a5024650
clear subfunctions when clearing parent function
John W. Eaton <jwe@octave.org>
parents:
7800
diff
changeset
|
696 void erase_subfunctions (void) { rep->erase_subfunctions (); } |
|
8447a5024650
clear subfunctions when clearing parent function
John W. Eaton <jwe@octave.org>
parents:
7800
diff
changeset
|
697 |
| 2376 | 698 // Values. |
| 699 | |
| 2891 | 700 octave_value eval (void) { return *this; } |
| 701 | |
| 5759 | 702 short int |
| 4254 | 703 short_value (bool req_int = false, bool frc_str_conv = false) const |
| 704 { return rep->short_value (req_int, frc_str_conv); } | |
| 705 | |
| 5759 | 706 unsigned short int |
| 4254 | 707 ushort_value (bool req_int = false, bool frc_str_conv = false) const |
| 708 { return rep->ushort_value (req_int, frc_str_conv); } | |
| 709 | |
| 5759 | 710 int int_value (bool req_int = false, bool frc_str_conv = false) const |
| 3202 | 711 { return rep->int_value (req_int, frc_str_conv); } |
| 712 | |
| 5759 | 713 unsigned int |
| 4254 | 714 uint_value (bool req_int = false, bool frc_str_conv = false) const |
| 715 { return rep->uint_value (req_int, frc_str_conv); } | |
| 716 | |
| 5759 | 717 int nint_value (bool frc_str_conv = false) const |
| 3202 | 718 { return rep->nint_value (frc_str_conv); } |
| 719 | |
| 5759 | 720 long int |
| 4254 | 721 long_value (bool req_int = false, bool frc_str_conv = false) const |
| 722 { return rep->long_value (req_int, frc_str_conv); } | |
| 723 | |
| 5759 | 724 unsigned long int |
| 4254 | 725 ulong_value (bool req_int = false, bool frc_str_conv = false) const |
| 726 { return rep->ulong_value (req_int, frc_str_conv); } | |
| 727 | |
| 6133 | 728 octave_idx_type |
|
8017
260294a5520f
octave_value::idx_type_value: move definition to ov.cc from ov.h
John W. Eaton <jwe@octave.org>
parents:
7885
diff
changeset
|
729 idx_type_value (bool req_int = false, bool frc_str_conv = false) const; |
| 6133 | 730 |
| 5759 | 731 double double_value (bool frc_str_conv = false) const |
| 2376 | 732 { return rep->double_value (frc_str_conv); } |
| 733 | |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
734 float float_value (bool frc_str_conv = false) const |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
735 { return rep->float_value (frc_str_conv); } |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
736 |
| 5759 | 737 double scalar_value (bool frc_str_conv = false) const |
| 2916 | 738 { return rep->scalar_value (frc_str_conv); } |
| 739 | |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
740 float float_scalar_value (bool frc_str_conv = false) const |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
741 { return rep->float_scalar_value (frc_str_conv); } |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
742 |
| 5759 | 743 Cell cell_value (void) const; |
| 3351 | 744 |
| 5759 | 745 Matrix matrix_value (bool frc_str_conv = false) const |
| 2376 | 746 { return rep->matrix_value (frc_str_conv); } |
| 747 | |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
748 FloatMatrix float_matrix_value (bool frc_str_conv = false) const |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
749 { return rep->float_matrix_value (frc_str_conv); } |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
750 |
| 5759 | 751 NDArray array_value (bool frc_str_conv = false) const |
| 4550 | 752 { return rep->array_value (frc_str_conv); } |
| 4505 | 753 |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
754 FloatNDArray float_array_value (bool frc_str_conv = false) const |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
755 { return rep->float_array_value (frc_str_conv); } |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
756 |
| 5759 | 757 Complex complex_value (bool frc_str_conv = false) const |
| 2376 | 758 { return rep->complex_value (frc_str_conv); } |
| 759 | |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
760 FloatComplex float_complex_value (bool frc_str_conv = false) const |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
761 { return rep->float_complex_value (frc_str_conv); } |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
762 |
| 5759 | 763 ComplexMatrix complex_matrix_value (bool frc_str_conv = false) const |
| 2376 | 764 { return rep->complex_matrix_value (frc_str_conv); } |
| 765 | |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
766 FloatComplexMatrix float_complex_matrix_value (bool frc_str_conv = false) const |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
767 { return rep->float_complex_matrix_value (frc_str_conv); } |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
768 |
| 5759 | 769 ComplexNDArray complex_array_value (bool frc_str_conv = false) const |
| 4550 | 770 { return rep->complex_array_value (frc_str_conv); } |
| 771 | |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
772 FloatComplexNDArray float_complex_array_value (bool frc_str_conv = false) const |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
773 { return rep->float_complex_array_value (frc_str_conv); } |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
774 |
| 5943 | 775 bool bool_value (bool warn = false) const |
| 776 { return rep->bool_value (warn); } | |
| 4550 | 777 |
| 5943 | 778 boolMatrix bool_matrix_value (bool warn = false) const |
| 779 { return rep->bool_matrix_value (warn); } | |
| 4550 | 780 |
| 5943 | 781 boolNDArray bool_array_value (bool warn = false) const |
| 782 { return rep->bool_array_value (warn); } | |
| 4550 | 783 |
| 5759 | 784 charMatrix char_matrix_value (bool frc_str_conv = false) const |
| 2376 | 785 { return rep->char_matrix_value (frc_str_conv); } |
| 786 | |
| 5759 | 787 charNDArray char_array_value (bool frc_str_conv = false) const |
| 4550 | 788 { return rep->char_array_value (frc_str_conv); } |
| 789 | |
| 5759 | 790 SparseMatrix sparse_matrix_value (bool frc_str_conv = false) const |
| 791 { return rep->sparse_matrix_value (frc_str_conv); } | |
| 5164 | 792 |
| 5759 | 793 SparseComplexMatrix sparse_complex_matrix_value (bool frc_str_conv = false) const |
| 794 { return rep->sparse_complex_matrix_value (frc_str_conv); } | |
| 5164 | 795 |
|
9852
aabf7a8c2e57
implement sparse logical conversion
Jaroslav Hajek <highegg@gmail.com>
parents:
9835
diff
changeset
|
796 SparseBoolMatrix sparse_bool_matrix_value (bool warn = false) const |
|
aabf7a8c2e57
implement sparse logical conversion
Jaroslav Hajek <highegg@gmail.com>
parents:
9835
diff
changeset
|
797 { return rep->sparse_bool_matrix_value (warn); } |
| 5164 | 798 |
|
8916
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
799 DiagMatrix diag_matrix_value (bool force = false) const |
|
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
800 { return rep->diag_matrix_value (force); } |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
801 |
|
8916
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
802 FloatDiagMatrix float_diag_matrix_value (bool force = false) const |
|
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
803 { return rep->float_diag_matrix_value (force); } |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
804 |
|
8916
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
805 ComplexDiagMatrix complex_diag_matrix_value (bool force = false) const |
|
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
806 { return rep->complex_diag_matrix_value (force); } |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
807 |
|
8916
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
808 FloatComplexDiagMatrix float_complex_diag_matrix_value (bool force = false) const |
|
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
809 { return rep->float_complex_diag_matrix_value (force); } |
|
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
810 |
|
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
811 PermMatrix perm_matrix_value (void) const |
|
a2878ba31a9e
add diag & perm matrix query methods to octave_value
Jaroslav Hajek <highegg@gmail.com>
parents:
8811
diff
changeset
|
812 { return rep->perm_matrix_value (); } |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
813 |
| 5759 | 814 octave_int8 int8_scalar_value (void) const |
| 4910 | 815 { return rep->int8_scalar_value (); } |
| 816 | |
| 5759 | 817 octave_int16 int16_scalar_value (void) const |
| 4910 | 818 { return rep->int16_scalar_value (); } |
| 819 | |
| 5759 | 820 octave_int32 int32_scalar_value (void) const |
| 4910 | 821 { return rep->int32_scalar_value (); } |
| 822 | |
| 5759 | 823 octave_int64 int64_scalar_value (void) const |
| 4910 | 824 { return rep->int64_scalar_value (); } |
| 825 | |
| 5759 | 826 octave_uint8 uint8_scalar_value (void) const |
| 4910 | 827 { return rep->uint8_scalar_value (); } |
| 828 | |
| 5759 | 829 octave_uint16 uint16_scalar_value (void) const |
| 4910 | 830 { return rep->uint16_scalar_value (); } |
| 831 | |
| 5759 | 832 octave_uint32 uint32_scalar_value (void) const |
| 4910 | 833 { return rep->uint32_scalar_value (); } |
| 834 | |
| 5759 | 835 octave_uint64 uint64_scalar_value (void) const |
| 4910 | 836 { return rep->uint64_scalar_value (); } |
| 837 | |
| 5759 | 838 int8NDArray int8_array_value (void) const |
| 4906 | 839 { return rep->int8_array_value (); } |
| 840 | |
| 5759 | 841 int16NDArray int16_array_value (void) const |
| 4906 | 842 { return rep->int16_array_value (); } |
| 843 | |
| 5759 | 844 int32NDArray int32_array_value (void) const |
| 4906 | 845 { return rep->int32_array_value (); } |
| 846 | |
| 5759 | 847 int64NDArray int64_array_value (void) const |
| 4906 | 848 { return rep->int64_array_value (); } |
| 849 | |
| 5759 | 850 uint8NDArray uint8_array_value (void) const |
| 4906 | 851 { return rep->uint8_array_value (); } |
| 852 | |
| 5759 | 853 uint16NDArray uint16_array_value (void) const |
| 4906 | 854 { return rep->uint16_array_value (); } |
| 855 | |
| 5759 | 856 uint32NDArray uint32_array_value (void) const |
| 4906 | 857 { return rep->uint32_array_value (); } |
| 858 | |
| 5759 | 859 uint64NDArray uint64_array_value (void) const |
| 4906 | 860 { return rep->uint64_array_value (); } |
| 861 | |
| 5759 | 862 string_vector all_strings (bool pad = false) const |
| 5715 | 863 { return rep->all_strings (pad); } |
| 2376 | 864 |
| 5759 | 865 std::string string_value (bool force = false) const |
| 4665 | 866 { return rep->string_value (force); } |
| 2376 | 867 |
| 8732 | 868 Array<std::string> cellstr_value (void) const |
| 869 { return rep->cellstr_value (); } | |
| 870 | |
| 5759 | 871 Range range_value (void) const |
| 2376 | 872 { return rep->range_value (); } |
| 873 | |
|
10742
604e13a89c7f
initial code for structs rewrite
Jaroslav Hajek <highegg@gmail.com>
parents:
10670
diff
changeset
|
874 octave_map map_value (void) const; |
|
604e13a89c7f
initial code for structs rewrite
Jaroslav Hajek <highegg@gmail.com>
parents:
10670
diff
changeset
|
875 |
|
604e13a89c7f
initial code for structs rewrite
Jaroslav Hajek <highegg@gmail.com>
parents:
10670
diff
changeset
|
876 octave_scalar_map scalar_map_value (void) const; |
|
604e13a89c7f
initial code for structs rewrite
Jaroslav Hajek <highegg@gmail.com>
parents:
10670
diff
changeset
|
877 |
| 5759 | 878 string_vector map_keys (void) const |
| 3933 | 879 { return rep->map_keys (); } |
| 880 | |
| 9151 | 881 size_t nparents (void) const |
| 882 { return rep->nparents (); } | |
| 883 | |
| 884 std::list<std::string> parent_class_name_list (void) const | |
| 885 { return rep->parent_class_name_list (); } | |
| 886 | |
|
9010
f914834836e7
Partial implementation of derived classes using the old form with "@" files.
rtshort@smoketree.phaselocked.com
parents:
8992
diff
changeset
|
887 string_vector parent_class_names (void) const |
|
f914834836e7
Partial implementation of derived classes using the old form with "@" files.
rtshort@smoketree.phaselocked.com
parents:
8992
diff
changeset
|
888 { return rep->parent_class_names (); } |
|
f914834836e7
Partial implementation of derived classes using the old form with "@" files.
rtshort@smoketree.phaselocked.com
parents:
8992
diff
changeset
|
889 |
|
f914834836e7
Partial implementation of derived classes using the old form with "@" files.
rtshort@smoketree.phaselocked.com
parents:
8992
diff
changeset
|
890 octave_base_value * |
|
f914834836e7
Partial implementation of derived classes using the old form with "@" files.
rtshort@smoketree.phaselocked.com
parents:
8992
diff
changeset
|
891 find_parent_class (const std::string& parent_class_name) |
|
f914834836e7
Partial implementation of derived classes using the old form with "@" files.
rtshort@smoketree.phaselocked.com
parents:
8992
diff
changeset
|
892 { return rep->find_parent_class (parent_class_name); } |
|
f914834836e7
Partial implementation of derived classes using the old form with "@" files.
rtshort@smoketree.phaselocked.com
parents:
8992
diff
changeset
|
893 |
|
10075
84b0725f4b09
return class types by reference in const Array element access functions
Jaroslav Hajek <highegg@gmail.com>
parents:
9881
diff
changeset
|
894 octave_function *function_value (bool silent = false) const; |
| 2974 | 895 |
|
10075
84b0725f4b09
return class types by reference in const Array element access functions
Jaroslav Hajek <highegg@gmail.com>
parents:
9881
diff
changeset
|
896 octave_user_function *user_function_value (bool silent = false) const; |
|
7761
5adeea5de26c
symbol table reporting functions
John W. Eaton <jwe@octave.org>
parents:
7740
diff
changeset
|
897 |
|
10075
84b0725f4b09
return class types by reference in const Array element access functions
Jaroslav Hajek <highegg@gmail.com>
parents:
9881
diff
changeset
|
898 octave_user_script *user_script_value (bool silent = false) const; |
| 4700 | 899 |
|
10075
84b0725f4b09
return class types by reference in const Array element access functions
Jaroslav Hajek <highegg@gmail.com>
parents:
9881
diff
changeset
|
900 octave_user_code *user_code_value (bool silent = false) const; |
|
7719
87eda1f8faaa
octave_user_code: new base class for octave_user_script and octave_user_function
John W. Eaton <jwe@octave.org>
parents:
7638
diff
changeset
|
901 |
|
10075
84b0725f4b09
return class types by reference in const Array element access functions
Jaroslav Hajek <highegg@gmail.com>
parents:
9881
diff
changeset
|
902 octave_fcn_handle *fcn_handle_value (bool silent = false) const; |
| 4343 | 903 |
|
10075
84b0725f4b09
return class types by reference in const Array element access functions
Jaroslav Hajek <highegg@gmail.com>
parents:
9881
diff
changeset
|
904 octave_fcn_inline *fcn_inline_value (bool silent = false) const; |
| 4933 | 905 |
| 5759 | 906 octave_value_list list_value (void) const; |
| 2880 | 907 |
| 3419 | 908 ColumnVector column_vector_value (bool frc_str_conv = false, |
| 10313 | 909 bool frc_vec_conv = false) const; |
| 2376 | 910 |
| 911 ComplexColumnVector | |
| 3419 | 912 complex_column_vector_value (bool frc_str_conv = false, |
| 10313 | 913 bool frc_vec_conv = false) const; |
| 2376 | 914 |
| 3419 | 915 RowVector row_vector_value (bool frc_str_conv = false, |
| 10313 | 916 bool frc_vec_conv = false) const; |
| 3419 | 917 |
| 918 ComplexRowVector | |
| 919 complex_row_vector_value (bool frc_str_conv = false, | |
| 10313 | 920 bool frc_vec_conv = false) const; |
| 3419 | 921 |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
922 |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
923 FloatColumnVector float_column_vector_value (bool frc_str_conv = false, |
| 10313 | 924 bool frc_vec_conv = false) const; |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
925 |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
926 FloatComplexColumnVector |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
927 float_complex_column_vector_value (bool frc_str_conv = false, |
| 10313 | 928 bool frc_vec_conv = false) const; |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
929 |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
930 FloatRowVector float_row_vector_value (bool frc_str_conv = false, |
| 10313 | 931 bool frc_vec_conv = false) const; |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
932 |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
933 FloatComplexRowVector |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
934 float_complex_row_vector_value (bool frc_str_conv = false, |
| 10313 | 935 bool frc_vec_conv = false) const; |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
936 |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
937 |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
938 |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
939 |
| 4044 | 940 Array<int> int_vector_value (bool req_int = false, |
| 10313 | 941 bool frc_str_conv = false, |
| 942 bool frc_vec_conv = false) const; | |
| 4044 | 943 |
| 8811 | 944 Array<octave_idx_type> |
| 945 octave_idx_type_vector_value (bool req_int = false, | |
| 10313 | 946 bool frc_str_conv = false, |
| 947 bool frc_vec_conv = false) const; | |
| 8811 | 948 |
| 3419 | 949 Array<double> vector_value (bool frc_str_conv = false, |
| 10313 | 950 bool frc_vec_conv = false) const; |
| 3419 | 951 |
| 952 Array<Complex> complex_vector_value (bool frc_str_conv = false, | |
| 10313 | 953 bool frc_vec_conv = false) const; |
| 3419 | 954 |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
955 Array<float> float_vector_value (bool frc_str_conv = false, |
| 10313 | 956 bool frc_vec_conv = false) const; |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
957 |
|
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
958 Array<FloatComplex> float_complex_vector_value (bool frc_str_conv = false, |
| 10313 | 959 bool frc_vec_conv = false) const; |
|
7789
82be108cc558
First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents:
7761
diff
changeset
|
960 |
|
8523
ad3afaaa19c1
implement non-copying contiguous range indexing
Jaroslav Hajek <highegg@gmail.com>
parents:
8458
diff
changeset
|
961 // Possibly economize a lazy-indexed value. |
|
8150
283989f2da9b
make null assignment matlab compatible
Jaroslav Hajek <highegg@gmail.com>
parents:
8017
diff
changeset
|
962 |
|
8523
ad3afaaa19c1
implement non-copying contiguous range indexing
Jaroslav Hajek <highegg@gmail.com>
parents:
8458
diff
changeset
|
963 void maybe_economize (void) |
|
ad3afaaa19c1
implement non-copying contiguous range indexing
Jaroslav Hajek <highegg@gmail.com>
parents:
8458
diff
changeset
|
964 { rep->maybe_economize (); } |
|
ad3afaaa19c1
implement non-copying contiguous range indexing
Jaroslav Hajek <highegg@gmail.com>
parents:
8458
diff
changeset
|
965 |
|
8531
b01fef323c24
add some explaining comments
Jaroslav Hajek <highegg@gmail.com>
parents:
8523
diff
changeset
|
966 // The following two hook conversions are called on any octave_value prior to |
|
b01fef323c24
add some explaining comments
Jaroslav Hajek <highegg@gmail.com>
parents:
8523
diff
changeset
|
967 // storing it to a "permanent" location, like a named variable, a cell or a |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
968 // struct component, or a return value of a function. |
|
8523
ad3afaaa19c1
implement non-copying contiguous range indexing
Jaroslav Hajek <highegg@gmail.com>
parents:
8458
diff
changeset
|
969 |
|
ad3afaaa19c1
implement non-copying contiguous range indexing
Jaroslav Hajek <highegg@gmail.com>
parents:
8458
diff
changeset
|
970 octave_value storable_value (void) const; |
|
8150
283989f2da9b
make null assignment matlab compatible
Jaroslav Hajek <highegg@gmail.com>
parents:
8017
diff
changeset
|
971 |
|
8531
b01fef323c24
add some explaining comments
Jaroslav Hajek <highegg@gmail.com>
parents:
8523
diff
changeset
|
972 // Ditto, but in place, i.e. equivalent to *this = this->storable_value (), |
|
b01fef323c24
add some explaining comments
Jaroslav Hajek <highegg@gmail.com>
parents:
8523
diff
changeset
|
973 // but possibly more efficient. |
|
8150
283989f2da9b
make null assignment matlab compatible
Jaroslav Hajek <highegg@gmail.com>
parents:
8017
diff
changeset
|
974 |
|
8523
ad3afaaa19c1
implement non-copying contiguous range indexing
Jaroslav Hajek <highegg@gmail.com>
parents:
8458
diff
changeset
|
975 void make_storable_value (void); |
|
8150
283989f2da9b
make null assignment matlab compatible
Jaroslav Hajek <highegg@gmail.com>
parents:
8017
diff
changeset
|
976 |
| 2376 | 977 // Conversions. These should probably be private. If a user of this |
| 978 // class wants a certain kind of constant, he should simply ask for | |
| 979 // it, and we should convert it if possible. | |
| 980 | |
| 5279 | 981 octave_value convert_to_str (bool pad = false, bool force = false, |
| 10313 | 982 char type = '\'') const |
|
9689
34d6f005db4b
eliminate is_string argument from octave_value character array constructors
John W. Eaton <jwe@octave.org>
parents:
9685
diff
changeset
|
983 { return rep->convert_to_str (pad, force, type); } |
| 4452 | 984 |
| 5759 | 985 octave_value |
| 5279 | 986 convert_to_str_internal (bool pad, bool force, char type) const |
| 987 { return rep->convert_to_str_internal (pad, force, type); } | |
| 2376 | 988 |
| 5759 | 989 void convert_to_row_or_column_vector (void) |
| 2376 | 990 { rep->convert_to_row_or_column_vector (); } |
| 991 | |
| 5759 | 992 bool print_as_scalar (void) const |
| 4604 | 993 { return rep->print_as_scalar (); } |
| 994 | |
| 5759 | 995 void print (std::ostream& os, bool pr_as_read_syntax = false) const |
| 2466 | 996 { rep->print (os, pr_as_read_syntax); } |
| 2376 | 997 |
| 5759 | 998 void print_raw (std::ostream& os, |
| 10313 | 999 bool pr_as_read_syntax = false) const |
| 2903 | 1000 { rep->print_raw (os, pr_as_read_syntax); } |
| 1001 | |
| 5759 | 1002 bool print_name_tag (std::ostream& os, const std::string& name) const |
| 2903 | 1003 { return rep->print_name_tag (os, name); } |
| 2376 | 1004 |
|
13110
2d5035847529
Add Júlio Hoffimann Mendes to contributors.in
John W. Eaton <jwe@octave.org>
parents:
12171
diff
changeset
|
1005 void print_with_name (std::ostream& os, const std::string& name) const |
|
2d5035847529
Add Júlio Hoffimann Mendes to contributors.in
John W. Eaton <jwe@octave.org>
parents:
12171
diff
changeset
|
1006 { rep->print_with_name (os, name, true); } |
| 2376 | 1007 |
| 5759 | 1008 int type_id (void) const { return rep->type_id (); } |
| 2376 | 1009 |
| 5759 | 1010 std::string type_name (void) const { return rep->type_name (); } |
| 1011 | |
| 1012 std::string class_name (void) const { return rep->class_name (); } | |
| 4612 | 1013 |
| 3203 | 1014 // Unary and binary operations. |
| 1015 | |
| 6109 | 1016 friend OCTINTERP_API octave_value do_unary_op (unary_op op, |
| 10313 | 1017 const octave_value& a); |
| 3203 | 1018 |
|
10614
d1194069e58c
optimize code handling ++,--
Jaroslav Hajek <highegg@gmail.com>
parents:
10544
diff
changeset
|
1019 octave_value& do_non_const_unary_op (unary_op op); |
| 3933 | 1020 |
|
10614
d1194069e58c
optimize code handling ++,--
Jaroslav Hajek <highegg@gmail.com>
parents:
10544
diff
changeset
|
1021 octave_value& do_non_const_unary_op (unary_op op, const std::string& type, |
| 10313 | 1022 const std::list<octave_value_list>& idx); |
| 3205 | 1023 |
| 6109 | 1024 friend OCTINTERP_API octave_value do_binary_op (binary_op op, |
| 10313 | 1025 const octave_value& a, |
| 1026 const octave_value& b); | |
| 2376 | 1027 |
|
7800
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1028 friend OCTINTERP_API octave_value do_binary_op (compound_binary_op op, |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1029 const octave_value& a, |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1030 const octave_value& b); |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1031 |
| 6109 | 1032 friend OCTINTERP_API octave_value do_cat_op (const octave_value& a, |
| 10313 | 1033 const octave_value& b, |
| 1034 const Array<octave_idx_type>& ra_idx); | |
| 4915 | 1035 |
| 5759 | 1036 const octave_base_value& get_rep (void) const { return *rep; } |
| 3301 | 1037 |
|
8456
c1709a45b45b
optimize structure components access
Jaroslav Hajek <highegg@gmail.com>
parents:
8437
diff
changeset
|
1038 bool is_copy_of (const octave_value &val) const { return rep == val.rep; } |
|
c1709a45b45b
optimize structure components access
Jaroslav Hajek <highegg@gmail.com>
parents:
8437
diff
changeset
|
1039 |
| 5759 | 1040 void print_info (std::ostream& os, |
| 10313 | 1041 const std::string& prefix = std::string ()) const; |
| 3933 | 1042 |
| 6974 | 1043 bool save_ascii (std::ostream& os) { return rep->save_ascii (os); } |
| 4687 | 1044 |
| 6974 | 1045 bool load_ascii (std::istream& is) { return rep->load_ascii (is); } |
| 4687 | 1046 |
| 5759 | 1047 bool save_binary (std::ostream& os, bool& save_as_floats) |
| 4687 | 1048 { return rep->save_binary (os, save_as_floats); } |
| 1049 | |
| 5759 | 1050 bool load_binary (std::istream& is, bool swap, |
| 10313 | 1051 oct_mach_info::float_format fmt) |
| 4687 | 1052 { return rep->load_binary (is, swap, fmt); } |
| 1053 | |
| 1054 #if defined (HAVE_HDF5) | |
| 5759 | 1055 bool save_hdf5 (hid_t loc_id, const char *name, bool save_as_floats) |
| 4687 | 1056 { return rep->save_hdf5 (loc_id, name, save_as_floats); } |
| 1057 | |
|
9881
b3089dba88bf
Remove HDF5 cruft for older versions of HDF5
Kacper Kowalik
parents:
9852
diff
changeset
|
1058 bool load_hdf5 (hid_t loc_id, const char *name) |
|
b3089dba88bf
Remove HDF5 cruft for older versions of HDF5
Kacper Kowalik
parents:
9852
diff
changeset
|
1059 { return rep->load_hdf5 (loc_id, name); } |
| 4687 | 1060 #endif |
| 1061 | |
| 5759 | 1062 int write (octave_stream& os, int block_size, |
| 10313 | 1063 oct_data_conv::data_type output_type, int skip, |
| 1064 oct_mach_info::float_format flt_fmt) const; | |
| 4944 | 1065 |
| 5759 | 1066 octave_base_value *internal_rep (void) const { return rep; } |
| 4901 | 1067 |
| 5900 | 1068 // Unsafe. These functions exist to support the MEX interface. |
| 1069 // You should not use them anywhere else. | |
| 1070 void *mex_get_data (void) const { return rep->mex_get_data (); } | |
| 1071 | |
| 1072 octave_idx_type *mex_get_ir (void) const { return rep->mex_get_ir (); } | |
| 1073 | |
| 1074 octave_idx_type *mex_get_jc (void) const { return rep->mex_get_jc (); } | |
| 1075 | |
| 1076 mxArray *as_mxArray (void) const { return rep->as_mxArray (); } | |
| 1077 | |
|
7620
36594d5bbe13
Move diag function into the octave_value class
David Bateman <dbateman@free.fr>
parents:
7576
diff
changeset
|
1078 octave_value diag (octave_idx_type k = 0) const |
|
36594d5bbe13
Move diag function into the octave_value class
David Bateman <dbateman@free.fr>
parents:
7576
diff
changeset
|
1079 { return rep->diag (k); } |
|
36594d5bbe13
Move diag function into the octave_value class
David Bateman <dbateman@free.fr>
parents:
7576
diff
changeset
|
1080 |
|
14557
e8e86ae3abbc
make diag (x, m, n) return a proper diagonal matrix object (bug #36099)
John W. Eaton <jwe@octave.org>
parents:
14528
diff
changeset
|
1081 octave_value diag (octave_idx_type m, octave_idx_type n) const |
|
e8e86ae3abbc
make diag (x, m, n) return a proper diagonal matrix object (bug #36099)
John W. Eaton <jwe@octave.org>
parents:
14528
diff
changeset
|
1082 { return rep->diag (m, n); } |
|
e8e86ae3abbc
make diag (x, m, n) return a proper diagonal matrix object (bug #36099)
John W. Eaton <jwe@octave.org>
parents:
14528
diff
changeset
|
1083 |
|
7463
2467639bd8c0
eliminate UNDEFINED sort mode
John W. Eaton <jwe@octave.org>
parents:
7433
diff
changeset
|
1084 octave_value sort (octave_idx_type dim = 0, sortmode mode = ASCENDING) const |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
1085 { return rep->sort (dim, mode); } |
| 7433 | 1086 octave_value sort (Array<octave_idx_type> &sidx, octave_idx_type dim = 0, |
| 10313 | 1087 sortmode mode = ASCENDING) const |
|
11586
12df7854fa7c
strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents:
11523
diff
changeset
|
1088 { return rep->sort (sidx, dim, mode); } |
| 7433 | 1089 |
|
8734
767ed8cc6634
rename internal issorted and issorted_rows functions to is_sorted and is_sorted_rows
John W. Eaton <jwe@octave.org>
parents:
8733
diff
changeset
|
1090 sortmode is_sorted (sortmode mode = UNSORTED) const |
|
767ed8cc6634
rename internal issorted and issorted_rows functions to is_sorted and is_sorted_rows
John W. Eaton <jwe@octave.org>
parents:
8733
diff
changeset
|
1091 { return rep->is_sorted (mode); } |
|
8721
e9cb742df9eb
imported patch sort3.diff
Jaroslav Hajek <highegg@gmail.com>
parents:
8676
diff
changeset
|
1092 |
|
8733
3ef774603887
rename all uses of sortrows_idx to sort_rows_idx
John W. Eaton <jwe@octave.org>
parents:
8732
diff
changeset
|
1093 Array<octave_idx_type> sort_rows_idx (sortmode mode = ASCENDING) const |
|
3ef774603887
rename all uses of sortrows_idx to sort_rows_idx
John W. Eaton <jwe@octave.org>
parents:
8732
diff
changeset
|
1094 { return rep->sort_rows_idx (mode); } |
|
8721
e9cb742df9eb
imported patch sort3.diff
Jaroslav Hajek <highegg@gmail.com>
parents:
8676
diff
changeset
|
1095 |
|
8734
767ed8cc6634
rename internal issorted and issorted_rows functions to is_sorted and is_sorted_rows
John W. Eaton <jwe@octave.org>
parents:
8733
diff
changeset
|
1096 sortmode is_sorted_rows (sortmode mode = UNSORTED) const |
|
767ed8cc6634
rename internal issorted and issorted_rows functions to is_sorted and is_sorted_rows
John W. Eaton <jwe@octave.org>
parents:
8733
diff
changeset
|
1097 { return rep->is_sorted_rows (mode); } |
|
8721
e9cb742df9eb
imported patch sort3.diff
Jaroslav Hajek <highegg@gmail.com>
parents:
8676
diff
changeset
|
1098 |
|
7489
8e4592e49fa7
don't clear locked functions
John W. Eaton <jwe@octave.org>
parents:
7463
diff
changeset
|
1099 void lock (void) { rep->lock (); } |
|
8e4592e49fa7
don't clear locked functions
John W. Eaton <jwe@octave.org>
parents:
7463
diff
changeset
|
1100 |
|
8e4592e49fa7
don't clear locked functions
John W. Eaton <jwe@octave.org>
parents:
7463
diff
changeset
|
1101 void unlock (void) { rep->unlock (); } |
|
8e4592e49fa7
don't clear locked functions
John W. Eaton <jwe@octave.org>
parents:
7463
diff
changeset
|
1102 |
|
8e4592e49fa7
don't clear locked functions
John W. Eaton <jwe@octave.org>
parents:
7463
diff
changeset
|
1103 bool islocked (void) const { return rep->islocked (); } |
|
8e4592e49fa7
don't clear locked functions
John W. Eaton <jwe@octave.org>
parents:
7463
diff
changeset
|
1104 |
|
7761
5adeea5de26c
symbol table reporting functions
John W. Eaton <jwe@octave.org>
parents:
7740
diff
changeset
|
1105 void dump (std::ostream& os) const { rep->dump (os); } |
|
5adeea5de26c
symbol table reporting functions
John W. Eaton <jwe@octave.org>
parents:
7740
diff
changeset
|
1106 |
|
9813
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1107 #define MAPPER_FORWARD(F) \ |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1108 octave_value F (void) const { return rep->map (octave_base_value::umap_ ## F); } |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1109 |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1110 MAPPER_FORWARD (abs) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1111 MAPPER_FORWARD (acos) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1112 MAPPER_FORWARD (acosh) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1113 MAPPER_FORWARD (angle) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1114 MAPPER_FORWARD (arg) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1115 MAPPER_FORWARD (asin) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1116 MAPPER_FORWARD (asinh) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1117 MAPPER_FORWARD (atan) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1118 MAPPER_FORWARD (atanh) |
|
10414
2a8b1db1e2ca
implement built-in cbrt
Jaroslav Hajek <highegg@gmail.com>
parents:
10391
diff
changeset
|
1119 MAPPER_FORWARD (cbrt) |
|
9813
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1120 MAPPER_FORWARD (ceil) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1121 MAPPER_FORWARD (conj) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1122 MAPPER_FORWARD (cos) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1123 MAPPER_FORWARD (cosh) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1124 MAPPER_FORWARD (erf) |
|
9835
1bb1ed717d2f
implement built-in erfinv
Jaroslav Hajek <highegg@gmail.com>
parents:
9813
diff
changeset
|
1125 MAPPER_FORWARD (erfinv) |
|
14770
cb85e836d035
New function: erfcinv (bug #36607)
Axel Mathéi <axel.mathei@gmail.com>
parents:
14557
diff
changeset
|
1126 MAPPER_FORWARD (erfcinv) |
|
9813
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1127 MAPPER_FORWARD (erfc) |
|
10391
59e34bcdff13
implement built-in erfcx
Jaroslav Hajek <highegg@gmail.com>
parents:
10325
diff
changeset
|
1128 MAPPER_FORWARD (erfcx) |
|
9813
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1129 MAPPER_FORWARD (exp) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1130 MAPPER_FORWARD (expm1) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1131 MAPPER_FORWARD (finite) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1132 MAPPER_FORWARD (fix) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1133 MAPPER_FORWARD (floor) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1134 MAPPER_FORWARD (gamma) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1135 MAPPER_FORWARD (imag) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1136 MAPPER_FORWARD (isinf) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1137 MAPPER_FORWARD (isna) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1138 MAPPER_FORWARD (isnan) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1139 MAPPER_FORWARD (lgamma) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1140 MAPPER_FORWARD (log) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1141 MAPPER_FORWARD (log2) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1142 MAPPER_FORWARD (log10) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1143 MAPPER_FORWARD (log1p) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1144 MAPPER_FORWARD (real) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1145 MAPPER_FORWARD (round) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1146 MAPPER_FORWARD (roundb) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1147 MAPPER_FORWARD (signum) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1148 MAPPER_FORWARD (sin) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1149 MAPPER_FORWARD (sinh) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1150 MAPPER_FORWARD (sqrt) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1151 MAPPER_FORWARD (tan) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1152 MAPPER_FORWARD (tanh) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1153 |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1154 // These functions are prefixed with X to avoid potential macro |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1155 // conflicts. |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1156 |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1157 MAPPER_FORWARD (xisalnum) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1158 MAPPER_FORWARD (xisalpha) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1159 MAPPER_FORWARD (xisascii) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1160 MAPPER_FORWARD (xiscntrl) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1161 MAPPER_FORWARD (xisdigit) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1162 MAPPER_FORWARD (xisgraph) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1163 MAPPER_FORWARD (xislower) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1164 MAPPER_FORWARD (xisprint) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1165 MAPPER_FORWARD (xispunct) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1166 MAPPER_FORWARD (xisspace) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1167 MAPPER_FORWARD (xisupper) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1168 MAPPER_FORWARD (xisxdigit) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1169 MAPPER_FORWARD (xtoascii) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1170 MAPPER_FORWARD (xtolower) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1171 MAPPER_FORWARD (xtoupper) |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1172 |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1173 #undef MAPPER_FORWARD |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1174 |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1175 octave_value map (octave_base_value::unary_mapper_t umap) const |
|
8fa32b527d9a
improve & partially revert previous change
Jaroslav Hajek <highegg@gmail.com>
parents:
9812
diff
changeset
|
1176 { return rep->map (umap); } |
|
7503
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7489
diff
changeset
|
1177 |
|
10670
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1178 // Extract the n-th element, aka val(n). Result is undefined if val is not an |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1179 // array type or n is out of range. Never error. |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1180 octave_value |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1181 fast_elem_extract (octave_idx_type n) const |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1182 { return rep->fast_elem_extract (n); } |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1183 |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1184 // Assign the n-th element, aka val(n) = x. Returns false if val is not an |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1185 // array type, x is not a matching scalar type, or n is out of range. |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1186 // Never error. |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1187 virtual bool |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1188 fast_elem_insert (octave_idx_type n, const octave_value& x) |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1189 { |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1190 make_unique (); |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1191 return rep->fast_elem_insert (n, x); |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1192 } |
|
654fbde5dceb
make cellfun's fast scalar collection mechanism public
Jaroslav Hajek <highegg@gmail.com>
parents:
10614
diff
changeset
|
1193 |
| 2376 | 1194 protected: |
| 1195 | |
| 5759 | 1196 // The real representation. |
| 1197 octave_base_value *rep; | |
| 2413 | 1198 |
| 3933 | 1199 private: |
| 2903 | 1200 |
| 3205 | 1201 assign_op unary_op_to_assign_op (unary_op op); |
| 1202 | |
| 3204 | 1203 binary_op op_eq_to_binary_op (assign_op op); |
| 1204 | |
| 9521 | 1205 // This declaration protects against constructing octave_value from |
| 1206 // const octave_base_value* which actually silently calls octave_value (bool). | |
| 1207 octave_value (const octave_base_value *); | |
| 1208 | |
| 3219 | 1209 DECLARE_OCTAVE_ALLOCATOR |
| 2376 | 1210 }; |
| 1211 | |
| 5508 | 1212 // Publish externally used friend functions. |
| 1213 | |
| 6109 | 1214 extern OCTINTERP_API octave_value |
| 5508 | 1215 do_unary_op (octave_value::unary_op op, const octave_value& a); |
| 1216 | |
| 6109 | 1217 extern OCTINTERP_API octave_value |
| 5508 | 1218 do_binary_op (octave_value::binary_op op, |
| 10313 | 1219 const octave_value& a, const octave_value& b); |
| 5508 | 1220 |
|
7800
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1221 extern OCTINTERP_API octave_value |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1222 do_binary_op (octave_value::compound_binary_op op, |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1223 const octave_value& a, const octave_value& b); |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1224 |
| 3203 | 1225 #define OV_UNOP_FN(name) \ |
| 1226 inline octave_value \ | |
| 1227 name (const octave_value& a) \ | |
| 1228 { \ | |
| 1229 return do_unary_op (octave_value::name, a); \ | |
| 1230 } | |
| 1231 | |
| 1232 #define OV_UNOP_OP(name, op) \ | |
| 1233 inline octave_value \ | |
| 1234 operator op (const octave_value& a) \ | |
| 1235 { \ | |
| 1236 return name (a); \ | |
| 1237 } | |
| 1238 | |
| 1239 #define OV_UNOP_FN_OP(name, op) \ | |
| 1240 OV_UNOP_FN (name) \ | |
| 1241 OV_UNOP_OP (name, op) | |
| 1242 | |
| 3525 | 1243 OV_UNOP_FN_OP (op_not, !) |
| 6518 | 1244 OV_UNOP_FN_OP (op_uplus, +) |
| 3525 | 1245 OV_UNOP_FN_OP (op_uminus, -) |
| 3203 | 1246 |
| 3525 | 1247 OV_UNOP_FN (op_transpose) |
| 1248 OV_UNOP_FN (op_hermitian) | |
| 3203 | 1249 |
| 1250 // No simple way to define these for prefix and suffix ops? | |
| 1251 // | |
| 1252 // incr | |
| 1253 // decr | |
| 1254 | |
| 1255 #define OV_BINOP_FN(name) \ | |
| 1256 inline octave_value \ | |
| 1257 name (const octave_value& a1, const octave_value& a2) \ | |
| 1258 { \ | |
| 1259 return do_binary_op (octave_value::name, a1, a2); \ | |
| 1260 } | |
| 1261 | |
| 1262 #define OV_BINOP_OP(name, op) \ | |
| 1263 inline octave_value \ | |
| 1264 operator op (const octave_value& a1, const octave_value& a2) \ | |
| 1265 { \ | |
| 1266 return name (a1, a2); \ | |
| 1267 } | |
| 1268 | |
| 1269 #define OV_BINOP_FN_OP(name, op) \ | |
| 1270 OV_BINOP_FN (name) \ | |
| 1271 OV_BINOP_OP (name, op) | |
| 1272 | |
| 3525 | 1273 OV_BINOP_FN_OP (op_add, +) |
| 1274 OV_BINOP_FN_OP (op_sub, -) | |
| 1275 OV_BINOP_FN_OP (op_mul, *) | |
| 1276 OV_BINOP_FN_OP (op_div, /) | |
| 3203 | 1277 |
| 3525 | 1278 OV_BINOP_FN (op_pow) |
| 1279 OV_BINOP_FN (op_ldiv) | |
| 1280 OV_BINOP_FN (op_lshift) | |
| 1281 OV_BINOP_FN (op_rshift) | |
| 3203 | 1282 |
| 3525 | 1283 OV_BINOP_FN_OP (op_lt, <) |
| 1284 OV_BINOP_FN_OP (op_le, <=) | |
| 1285 OV_BINOP_FN_OP (op_eq, ==) | |
| 1286 OV_BINOP_FN_OP (op_ge, >=) | |
| 1287 OV_BINOP_FN_OP (op_gt, >) | |
| 1288 OV_BINOP_FN_OP (op_ne, !=) | |
| 3203 | 1289 |
| 3525 | 1290 OV_BINOP_FN (op_el_mul) |
| 1291 OV_BINOP_FN (op_el_div) | |
| 1292 OV_BINOP_FN (op_el_pow) | |
| 1293 OV_BINOP_FN (op_el_ldiv) | |
| 1294 OV_BINOP_FN (op_el_and) | |
| 1295 OV_BINOP_FN (op_el_or) | |
| 3203 | 1296 |
| 3525 | 1297 OV_BINOP_FN (op_struct_ref) |
| 3203 | 1298 |
|
7800
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1299 #define OV_COMP_BINOP_FN(name) \ |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1300 inline octave_value \ |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1301 name (const octave_value& a1, const octave_value& a2) \ |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1302 { \ |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1303 return do_binary_op (octave_value::name, a1, a2); \ |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1304 } |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1305 |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1306 OV_COMP_BINOP_FN (op_trans_mul) |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1307 OV_COMP_BINOP_FN (op_mul_trans) |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1308 OV_COMP_BINOP_FN (op_herm_mul) |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1309 OV_COMP_BINOP_FN (op_mul_herm) |
|
5861b95e9879
support for compound operators, implement trans_mul, mul_trans, herm_mul and mul_herm
Jaroslav Hajek <highegg@gmail.com>
parents:
7789
diff
changeset
|
1310 |
| 6109 | 1311 extern OCTINTERP_API void install_types (void); |
| 2376 | 1312 |
| 5759 | 1313 // This will eventually go away, but for now it can be used to |
| 1314 // simplify the transition to the new octave_value class hierarchy, | |
| 1315 // which uses octave_base_value instead of octave_value for the type | |
| 1316 // of octave_value::rep. | |
| 1317 #define OV_REP_TYPE octave_base_value | |
| 1318 | |
|
9657
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1319 // Templated value extractors. |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1320 template<class Value> |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1321 inline Value octave_value_extract (const octave_value&) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1322 { assert (false); } |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1323 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1324 #define DEF_VALUE_EXTRACTOR(VALUE,MPREFIX) \ |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1325 template<> \ |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1326 inline VALUE octave_value_extract<VALUE> (const octave_value& v) \ |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1327 { return v.MPREFIX ## _value (); } |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1328 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1329 DEF_VALUE_EXTRACTOR (double, scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1330 DEF_VALUE_EXTRACTOR (float, float_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1331 DEF_VALUE_EXTRACTOR (Complex, complex) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1332 DEF_VALUE_EXTRACTOR (FloatComplex, float_complex) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1333 DEF_VALUE_EXTRACTOR (bool, bool) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1334 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1335 DEF_VALUE_EXTRACTOR (octave_int8, int8_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1336 DEF_VALUE_EXTRACTOR (octave_int16, int16_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1337 DEF_VALUE_EXTRACTOR (octave_int32, int32_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1338 DEF_VALUE_EXTRACTOR (octave_int64, int64_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1339 DEF_VALUE_EXTRACTOR (octave_uint8, uint8_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1340 DEF_VALUE_EXTRACTOR (octave_uint16, uint16_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1341 DEF_VALUE_EXTRACTOR (octave_uint32, uint32_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1342 DEF_VALUE_EXTRACTOR (octave_uint64, uint64_scalar) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1343 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1344 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1345 DEF_VALUE_EXTRACTOR (NDArray, array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1346 DEF_VALUE_EXTRACTOR (FloatNDArray, float_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1347 DEF_VALUE_EXTRACTOR (ComplexNDArray, complex_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1348 DEF_VALUE_EXTRACTOR (FloatComplexNDArray, float_complex_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1349 DEF_VALUE_EXTRACTOR (boolNDArray, bool_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1350 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1351 DEF_VALUE_EXTRACTOR (charNDArray, char_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1352 DEF_VALUE_EXTRACTOR (int8NDArray, int8_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1353 DEF_VALUE_EXTRACTOR (int16NDArray, int16_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1354 DEF_VALUE_EXTRACTOR (int32NDArray, int32_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1355 DEF_VALUE_EXTRACTOR (int64NDArray, int64_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1356 DEF_VALUE_EXTRACTOR (uint8NDArray, uint8_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1357 DEF_VALUE_EXTRACTOR (uint16NDArray, uint16_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1358 DEF_VALUE_EXTRACTOR (uint32NDArray, uint32_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1359 DEF_VALUE_EXTRACTOR (uint64NDArray, uint64_array) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1360 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1361 DEF_VALUE_EXTRACTOR (Matrix, matrix) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1362 DEF_VALUE_EXTRACTOR (FloatMatrix, float_matrix) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1363 DEF_VALUE_EXTRACTOR (ComplexMatrix, complex_matrix) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1364 DEF_VALUE_EXTRACTOR (FloatComplexMatrix, float_complex_matrix) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1365 DEF_VALUE_EXTRACTOR (boolMatrix, bool_matrix) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1366 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1367 DEF_VALUE_EXTRACTOR (ColumnVector, column_vector) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1368 DEF_VALUE_EXTRACTOR (FloatColumnVector, float_column_vector) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1369 DEF_VALUE_EXTRACTOR (ComplexColumnVector, complex_column_vector) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1370 DEF_VALUE_EXTRACTOR (FloatComplexColumnVector, float_complex_column_vector) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1371 |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1372 DEF_VALUE_EXTRACTOR (RowVector, row_vector) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1373 DEF_VALUE_EXTRACTOR (FloatRowVector, float_row_vector) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1374 DEF_VALUE_EXTRACTOR (ComplexRowVector, complex_row_vector) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1375 DEF_VALUE_EXTRACTOR (FloatComplexRowVector, float_complex_row_vector) |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1376 |
| 9685 | 1377 DEF_VALUE_EXTRACTOR (DiagMatrix, diag_matrix) |
| 1378 DEF_VALUE_EXTRACTOR (FloatDiagMatrix, float_diag_matrix) | |
| 1379 DEF_VALUE_EXTRACTOR (ComplexDiagMatrix, complex_diag_matrix) | |
| 1380 DEF_VALUE_EXTRACTOR (FloatComplexDiagMatrix, float_complex_diag_matrix) | |
| 1381 DEF_VALUE_EXTRACTOR (PermMatrix, perm_matrix) | |
| 1382 | |
|
9789
97f5de91427b
support sparse templated extractors
Jaroslav Hajek <highegg@gmail.com>
parents:
9732
diff
changeset
|
1383 DEF_VALUE_EXTRACTOR (SparseMatrix, sparse_matrix) |
|
97f5de91427b
support sparse templated extractors
Jaroslav Hajek <highegg@gmail.com>
parents:
9732
diff
changeset
|
1384 DEF_VALUE_EXTRACTOR (SparseComplexMatrix, sparse_complex_matrix) |
|
97f5de91427b
support sparse templated extractors
Jaroslav Hajek <highegg@gmail.com>
parents:
9732
diff
changeset
|
1385 DEF_VALUE_EXTRACTOR (SparseBoolMatrix, sparse_bool_matrix) |
|
9657
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1386 #undef DEF_VALUE_EXTRACTOR |
|
3c1c3a38ec7b
implement templated octave_value extractor
Jaroslav Hajek <highegg@gmail.com>
parents:
9607
diff
changeset
|
1387 |
|
13733
b1186adb567e
Add dummy template specializations with a return value.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13294
diff
changeset
|
1388 #define DEF_DUMMY_VALUE_EXTRACTOR(VALUE,DEFVAL) \ |
|
b1186adb567e
Add dummy template specializations with a return value.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13294
diff
changeset
|
1389 template<> \ |
|
13736
deb69dab4514
Avoid some compilation warnings.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13733
diff
changeset
|
1390 inline VALUE octave_value_extract<VALUE> (const octave_value&) \ |
|
13733
b1186adb567e
Add dummy template specializations with a return value.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13294
diff
changeset
|
1391 { assert (false); return DEFVAL; } |
|
b1186adb567e
Add dummy template specializations with a return value.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13294
diff
changeset
|
1392 |
|
b1186adb567e
Add dummy template specializations with a return value.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13294
diff
changeset
|
1393 DEF_DUMMY_VALUE_EXTRACTOR (char, 0) |
|
b1186adb567e
Add dummy template specializations with a return value.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13294
diff
changeset
|
1394 DEF_DUMMY_VALUE_EXTRACTOR (octave_value, octave_value ()) |
|
b1186adb567e
Add dummy template specializations with a return value.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13294
diff
changeset
|
1395 #undef DEF_DUMMY_VALUE_EXTRACTOR |
|
b1186adb567e
Add dummy template specializations with a return value.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13294
diff
changeset
|
1396 |
| 2376 | 1397 #endif |