annotate libinterp/operators/op-sbm-bm.cc @ 25054:6652d3823428 stable

maint: Update copyright dates in all source files.
author John W. Eaton <jwe@octave.org>
date Fri, 30 Mar 2018 09:19:05 -0400
parents 46440078d73b
children 078b795c5219
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
1 /*
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
2
25054
6652d3823428 maint: Update copyright dates in all source files.
John W. Eaton <jwe@octave.org>
parents: 24540
diff changeset
3 Copyright (C) 2004-2018 David Bateman
11523
fd0a3ac60b0e update copyright notices
John W. Eaton <jwe@octave.org>
parents: 9933
diff changeset
4 Copyright (C) 1998-2004 Andy Adler
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
5
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
6 This file is part of Octave.
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
7
24534
194eb4bd202b maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents: 23220
diff changeset
8 Octave is free software: you can redistribute it and/or modify it
22755
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
9 under the terms of the GNU General Public License as published by
24534
194eb4bd202b maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents: 23220
diff changeset
10 the Free Software Foundation, either version 3 of the License, or
22755
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
11 (at your option) any later version.
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
12
22755
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
13 Octave is distributed in the hope that it will be useful, but
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
14 WITHOUT ANY WARRANTY; without even the implied warranty of
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
3a2b891d0b33 maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents: 22407
diff changeset
16 GNU General Public License for more details.
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
17
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
18 You should have received a copy of the GNU General Public License
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 5307
diff changeset
19 along with Octave; see the file COPYING. If not, see
24534
194eb4bd202b maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents: 23220
diff changeset
20 <https://www.gnu.org/licenses/>.
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
21
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
22 */
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
23
21724
aba2e6293dd8 use "#if ..." consistently instead of "#ifdef" and "#ifndef"
John W. Eaton <jwe@octave.org>
parents: 21647
diff changeset
24 #if defined (HAVE_CONFIG_H)
21301
40de9f8f23a6 Use '#include "config.h"' rather than <config.h>.
Rik <rik@octave.org>
parents: 21200
diff changeset
25 # include "config.h"
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
26 #endif
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
27
21100
e39e05d90788 Switch gripe_XXX to either err_XXX or warn_XXX naming scheme.
Rik <rik@octave.org>
parents: 20940
diff changeset
28 #include "errwarn.h"
20940
48b2ad5ee801 maint: Rename oct-obj.[cc|h] to ovl.[cc|h] for clarity.
Rik <rik@octave.org>
parents: 20555
diff changeset
29 #include "ovl.h"
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
30 #include "ov.h"
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
31 #include "ov-typeinfo.h"
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
32 #include "ov-bool-mat.h"
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
33 #include "boolMatrix.h"
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
34 #include "ov-int8.h"
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
35 #include "ov-int16.h"
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
36 #include "ov-int32.h"
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
37 #include "ov-int64.h"
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
38 #include "ov-uint8.h"
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
39 #include "ov-uint16.h"
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
40 #include "ov-uint32.h"
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
41 #include "ov-uint64.h"
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
42 #include "ov-range.h"
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
43 #include "ov-scalar.h"
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
44 #include "ov-str-mat.h"
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
45 #include "ops.h"
12758
ecd1364a2700 allow assignment of [], "", and '' to sparse logical matrix
John W. Eaton <jwe@octave.org>
parents: 12757
diff changeset
46 #include "ov-null-mat.h"
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
47 #include "ov-re-sparse.h"
7503
8c32f95c2639 convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
48 #include "ov-bool-sparse.h"
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
49 #include "smx-bm-sbm.h"
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
50 #include "smx-sbm-bm.h"
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
51
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
52 // sparse bool matrix by bool matrix ops.
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
53
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
54 DEFBINOP_FN (eq, sparse_bool_matrix, bool_matrix, mx_el_eq)
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
55 DEFBINOP_FN (ne, sparse_bool_matrix, bool_matrix, mx_el_ne)
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
56
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
57 DEFBINOP_FN (el_and, sparse_bool_matrix, bool_matrix, mx_el_and)
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
58 DEFBINOP_FN (el_or, sparse_bool_matrix, bool_matrix, mx_el_or)
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
59
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
60 DEFCATOP (sbm_bm, sparse_bool_matrix, bool_matrix)
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
61 {
21647
66cae7a6dc47 eliminate some macros for operator definitions
John W. Eaton <jwe@octave.org>
parents: 21301
diff changeset
62 octave_sparse_bool_matrix& v1 = dynamic_cast<octave_sparse_bool_matrix&> (a1);
66cae7a6dc47 eliminate some macros for operator definitions
John W. Eaton <jwe@octave.org>
parents: 21301
diff changeset
63 const octave_bool_matrix& v2 = dynamic_cast<const octave_bool_matrix&> (a2);
11586
12df7854fa7c strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents: 11523
diff changeset
64
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
65 SparseBoolMatrix tmp (v2.bool_matrix_value ());
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
66 return octave_value (v1.sparse_bool_matrix_value (). concat (tmp, ra_idx));
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
67 }
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
68
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
69 DEFCATOP (sbm_m, sparse_bool_matrix, matrix)
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
70 {
21647
66cae7a6dc47 eliminate some macros for operator definitions
John W. Eaton <jwe@octave.org>
parents: 21301
diff changeset
71 octave_sparse_bool_matrix& v1 = dynamic_cast<octave_sparse_bool_matrix&> (a1);
66cae7a6dc47 eliminate some macros for operator definitions
John W. Eaton <jwe@octave.org>
parents: 21301
diff changeset
72 const octave_matrix& v2 = dynamic_cast<const octave_matrix&> (a2);
11586
12df7854fa7c strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents: 11523
diff changeset
73
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
74 SparseMatrix tmp (v2.matrix_value ());
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
75 return octave_value (v1.sparse_matrix_value (). concat (tmp, ra_idx));
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
76 }
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
77
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
78 DEFCATOP (sm_bm, sparse_matrix, bool_matrix)
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
79 {
21647
66cae7a6dc47 eliminate some macros for operator definitions
John W. Eaton <jwe@octave.org>
parents: 21301
diff changeset
80 octave_sparse_matrix& v1 = dynamic_cast<octave_sparse_matrix&> (a1);
66cae7a6dc47 eliminate some macros for operator definitions
John W. Eaton <jwe@octave.org>
parents: 21301
diff changeset
81 const octave_bool_matrix& v2 = dynamic_cast<const octave_bool_matrix&> (a2);
11586
12df7854fa7c strip trailing whitespace from source files
John W. Eaton <jwe@octave.org>
parents: 11523
diff changeset
82
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
83 SparseMatrix tmp (v2.matrix_value ());
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
84 return octave_value (v1.sparse_matrix_value (). concat (tmp, ra_idx));
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
85 }
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
86
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
87 DEFASSIGNOP (assign, sparse_bool_matrix, bool_matrix)
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
88 {
21647
66cae7a6dc47 eliminate some macros for operator definitions
John W. Eaton <jwe@octave.org>
parents: 21301
diff changeset
89 octave_sparse_bool_matrix& v1 = dynamic_cast<octave_sparse_bool_matrix&> (a1);
66cae7a6dc47 eliminate some macros for operator definitions
John W. Eaton <jwe@octave.org>
parents: 21301
diff changeset
90 const octave_bool_matrix& v2 = dynamic_cast<const octave_bool_matrix&> (a2);
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
91
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
92 v1.assign (idx, SparseBoolMatrix (v2.bool_matrix_value ()));
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
93 return octave_value ();
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
94 }
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
95
12758
ecd1364a2700 allow assignment of [], "", and '' to sparse logical matrix
John W. Eaton <jwe@octave.org>
parents: 12757
diff changeset
96 DEFNULLASSIGNOP_FN (null_assign, sparse_bool_matrix, delete_elements)
ecd1364a2700 allow assignment of [], "", and '' to sparse logical matrix
John W. Eaton <jwe@octave.org>
parents: 12757
diff changeset
97
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
98 static octave_value
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
99 oct_assignop_conv_and_assign (octave_base_value& a1,
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
100 const octave_value_list& idx,
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
101 const octave_base_value& a2)
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
102 {
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
103 octave_sparse_bool_matrix& v1 = dynamic_cast<octave_sparse_bool_matrix&> (a1);
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
104
17787
175b392e91fe Use GNU style coding conventions for code in libinterp/
Rik <rik@octave.org>
parents: 17744
diff changeset
105 // FIXME: perhaps add a warning for this conversion if the values
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
106 // are not all 0 or 1?
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
107
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
108 SparseBoolMatrix v2 (a2.bool_array_value ());
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
109
20555
f90c8372b7ba eliminate many more simple uses of error_state
John W. Eaton <jwe@octave.org>
parents: 19697
diff changeset
110 v1.assign (idx, v2);
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
111
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
112 return octave_value ();
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
113 }
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
114
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
115 void
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
116 install_sbm_bm_ops (octave::type_info& ti)
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
117 {
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
118 INSTALL_BINOP_TI (ti, op_eq, octave_sparse_bool_matrix, octave_bool_matrix, eq);
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
119 INSTALL_BINOP_TI (ti, op_ne, octave_sparse_bool_matrix, octave_bool_matrix, ne);
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
120
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
121 INSTALL_BINOP_TI (ti, op_el_and, octave_sparse_bool_matrix, octave_bool_matrix,
9931
fb6b6fcafa62 untabify files in src/OPERATORS directory
John W. Eaton <jwe@octave.org>
parents: 8920
diff changeset
122 el_and);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
123 INSTALL_BINOP_TI (ti, op_el_or, octave_sparse_bool_matrix, octave_bool_matrix,
9931
fb6b6fcafa62 untabify files in src/OPERATORS directory
John W. Eaton <jwe@octave.org>
parents: 8920
diff changeset
124 el_or);
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
125
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
126 INSTALL_CATOP_TI (ti, octave_sparse_bool_matrix, octave_bool_matrix, sbm_bm);
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
127 INSTALL_CATOP_TI (ti, octave_sparse_matrix, octave_bool_matrix, sm_bm);
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
128 INSTALL_CATOP_TI (ti, octave_sparse_bool_matrix, octave_matrix, sbm_m);
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
129
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
130 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix,
9931
fb6b6fcafa62 untabify files in src/OPERATORS directory
John W. Eaton <jwe@octave.org>
parents: 8920
diff changeset
131 octave_bool_matrix, assign);
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
132
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
133 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
134 conv_and_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
135 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
136 octave_char_matrix_str, conv_and_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
137 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
138 octave_char_matrix_sq_str, conv_and_assign);
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
139
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
140 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_range,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
141 conv_and_assign);
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
142
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
143 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_sparse_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
144 conv_and_assign);
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
145
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
146 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_int8_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
147 conv_and_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
148 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_int16_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
149 conv_and_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
150 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_int32_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
151 conv_and_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
152 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_int64_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
153 conv_and_assign);
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
154
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
155 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_uint8_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
156 conv_and_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
157 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_uint16_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
158 conv_and_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
159 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_uint32_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
160 conv_and_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
161 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_uint64_matrix,
12757
824c60c8f7b9 preserve type when assigning values to sparse logical
John W. Eaton <jwe@octave.org>
parents: 11586
diff changeset
162 conv_and_assign);
12758
ecd1364a2700 allow assignment of [], "", and '' to sparse logical matrix
John W. Eaton <jwe@octave.org>
parents: 12757
diff changeset
163
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
164 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_null_matrix,
12758
ecd1364a2700 allow assignment of [], "", and '' to sparse logical matrix
John W. Eaton <jwe@octave.org>
parents: 12757
diff changeset
165 null_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
166 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_null_str,
12758
ecd1364a2700 allow assignment of [], "", and '' to sparse logical matrix
John W. Eaton <jwe@octave.org>
parents: 12757
diff changeset
167 null_assign);
24540
46440078d73b don't use singleton for octave_value_typeinfo
John W. Eaton <jwe@octave.org>
parents: 24534
diff changeset
168 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_sparse_bool_matrix, octave_null_sq_str,
12758
ecd1364a2700 allow assignment of [], "", and '' to sparse logical matrix
John W. Eaton <jwe@octave.org>
parents: 12757
diff changeset
169 null_assign);
5164
57077d0ddc8e [project @ 2005-02-25 19:55:24 by jwe]
jwe
parents:
diff changeset
170 }