octave: libinterp/operators/op-bm-b.cc annotate

annotate libinterp/operators/op-bm-b.cc @ 29358:0a5b15007766 stable

update Octave Project Developers copyright for the new year In files that have the "Octave Project Developers" copyright notice, update for 2021.

author	John W. Eaton <jwe@octave.org>
date	Wed, 10 Feb 2021 09:52:15 -0500
parents	bd51beb6205e
children	b260322f6730

rev	line source
27923 bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	1 ////////////////////////////////////////////////////////////////////////
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	2 //
29358 0a5b15007766 update Octave Project Developers copyright for the new year John W. Eaton <jwe@octave.org> parents: 27923 diff changeset	3 // Copyright (C) 2001-2021 The Octave Project Developers
27923 bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	4 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	5 // See the file COPYRIGHT.md in the top-level directory of this
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	6 // distribution or <https://octave.org/copyright/>.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	7 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	8 // This file is part of Octave.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	9 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	10 // Octave is free software: you can redistribute it and/or modify it
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	11 // under the terms of the GNU General Public License as published by
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	12 // the Free Software Foundation, either version 3 of the License, or
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	13 // (at your option) any later version.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	14 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	15 // Octave is distributed in the hope that it will be useful, but
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	16 // WITHOUT ANY WARRANTY; without even the implied warranty of
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	17 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	18 // GNU General Public License for more details.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	19 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	20 // You should have received a copy of the GNU General Public License
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	21 // along with Octave; see the file COPYING. If not, see
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	22 // <https://www.gnu.org/licenses/>.
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	23 //
bd51beb6205e update formatting of copyright notices John W. Eaton <jwe@octave.org> parents: 27919 diff changeset	24 ////////////////////////////////////////////////////////////////////////
3937 e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	25
21724 aba2e6293dd8 use "#if ..." consistently instead of "#ifdef" and "#ifndef" John W. Eaton <jwe@octave.org> parents: 21301 diff changeset	26 #if defined (HAVE_CONFIG_H)
21301 40de9f8f23a6 Use '#include "config.h"' rather than <config.h>. Rik <rik@octave.org> parents: 21200 diff changeset	27 # include "config.h"
3937 e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	28 #endif
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	29
21100 e39e05d90788 Switch gripe_XXX to either err_XXX or warn_XXX naming scheme. Rik <rik@octave.org> parents: 20940 diff changeset	30 #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	31 #include "ovl.h"
3937 e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	32 #include "ov.h"
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	33 #include "ov-bool.h"
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	34 #include "ov-bool-mat.h"
4915 c638c144d4da [project @ 2004-07-23 19:01:22 by jwe] jwe parents: 4686 diff changeset	35 #include "ov-scalar.h"
7789 82be108cc558 First attempt at single precision tyeps David Bateman <dbateman@free.fr> parents: 7017 diff changeset	36 #include "ov-float.h"
4915 c638c144d4da [project @ 2004-07-23 19:01:22 by jwe] jwe parents: 4686 diff changeset	37 #include "ov-re-mat.h"
7789 82be108cc558 First attempt at single precision tyeps David Bateman <dbateman@free.fr> parents: 7017 diff changeset	38 #include "ov-flt-re-mat.h"
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	39 #include "ov-str-mat.h"
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	40 #include "ov-int8.h"
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	41 #include "ov-int16.h"
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	42 #include "ov-int32.h"
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	43 #include "ov-int64.h"
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	44 #include "ov-uint8.h"
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	45 #include "ov-uint16.h"
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	46 #include "ov-uint32.h"
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	47 #include "ov-uint64.h"
3937 e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	48 #include "ov-typeinfo.h"
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	49 #include "ops.h"
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	50 #include "xdiv.h"
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	51 #include "xpow.h"
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	52
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	53 // bool matrix by bool ops.
e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	54
4669 334a27c8f453 [project @ 2003-11-26 07:02:42 by jwe] jwe parents: 4192 diff changeset	55 DEFNDBINOP_FN (el_and, bool_matrix, bool, bool_array, bool, mx_el_and)
334a27c8f453 [project @ 2003-11-26 07:02:42 by jwe] jwe parents: 4192 diff changeset	56 DEFNDBINOP_FN (el_or, bool_matrix, bool, bool_array, bool, mx_el_or)
334a27c8f453 [project @ 2003-11-26 07:02:42 by jwe] jwe parents: 4192 diff changeset	57
8982 dc6bda6f9994 implement compound logical ops Jaroslav Hajek <highegg@gmail.com> parents: 8920 diff changeset	58 DEFNDBINOP_FN (el_not_and, bool_matrix, bool, bool_array, bool, mx_el_not_and)
dc6bda6f9994 implement compound logical ops Jaroslav Hajek <highegg@gmail.com> parents: 8920 diff changeset	59 DEFNDBINOP_FN (el_not_or, bool_matrix, bool, bool_array, bool, mx_el_not_or)
dc6bda6f9994 implement compound logical ops Jaroslav Hajek <highegg@gmail.com> parents: 8920 diff changeset	60
4964 269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4915 diff changeset	61 DEFNDCATOP_FN (bm_b, bool_matrix, bool, bool_array, bool_array, concat)
4915 c638c144d4da [project @ 2004-07-23 19:01:22 by jwe] jwe parents: 4686 diff changeset	62 DEFNDCATOP_FN (bm_s, bool_matrix, scalar, array, array, concat)
c638c144d4da [project @ 2004-07-23 19:01:22 by jwe] jwe parents: 4686 diff changeset	63 DEFNDCATOP_FN (m_b, matrix, bool, array, array, concat)
17787 175b392e91fe Use GNU style coding conventions for code in libinterp/ Rik <rik@octave.org> parents: 17744 diff changeset	64 DEFNDCATOP_FN (bm_f, bool_matrix, float_scalar, float_array, float_array,
175b392e91fe Use GNU style coding conventions for code in libinterp/ Rik <rik@octave.org> parents: 17744 diff changeset	65 concat)
7789 82be108cc558 First attempt at single precision tyeps David Bateman <dbateman@free.fr> parents: 7017 diff changeset	66 DEFNDCATOP_FN (fm_b, float_matrix, bool, float_array, float_array, concat)
4915 c638c144d4da [project @ 2004-07-23 19:01:22 by jwe] jwe parents: 4686 diff changeset	67
4686 c7ae43dfdea4 [project @ 2004-01-06 19:29:23 by jwe] jwe parents: 4669 diff changeset	68 DEFNDASSIGNOP_FN (assign, bool_matrix, bool, bool_array, assign)
3937 e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	69
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	70 static octave_value
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	71 oct_assignop_conv_and_assign (octave_base_value& a1,
9931 fb6b6fcafa62 untabify files in src/OPERATORS directory John W. Eaton <jwe@octave.org> parents: 8993 diff changeset	72 const octave_value_list& idx,
fb6b6fcafa62 untabify files in src/OPERATORS directory John W. Eaton <jwe@octave.org> parents: 8993 diff changeset	73 const octave_base_value& a2)
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	74 {
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	75 octave_bool_matrix& v1 = dynamic_cast<octave_bool_matrix&> (a1);
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	76
17787 175b392e91fe Use GNU style coding conventions for code in libinterp/ Rik <rik@octave.org> parents: 17744 diff changeset	77 // FIXME: perhaps add a warning for this conversion
175b392e91fe Use GNU style coding conventions for code in libinterp/ Rik <rik@octave.org> parents: 17744 diff changeset	78 // if the values are not all 0 or 1?
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	79
5943 c038c2947ee1 [project @ 2006-08-18 21:27:03 by jwe] jwe parents: 5899 diff changeset	80 boolNDArray v2 = a2.bool_array_value (true);
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	81
20555 f90c8372b7ba eliminate many more simple uses of error_state John W. Eaton <jwe@octave.org> parents: 19697 diff changeset	82 v1.assign (idx, v2);
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	83
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	84 return octave_value ();
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	85 }
da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	86
3937 e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	87 void
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	88 install_bm_b_ops (octave::type_info& ti)
3937 e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	89 {
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	90 INSTALL_BINOP_TI (ti, op_el_and, octave_bool_matrix, octave_bool, el_and);
46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	91 INSTALL_BINOP_TI (ti, op_el_or, octave_bool_matrix, octave_bool, el_or);
46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	92 INSTALL_BINOP_TI (ti, op_el_not_and, octave_bool_matrix, octave_bool, el_not_and);
46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	93 INSTALL_BINOP_TI (ti, op_el_not_or, octave_bool_matrix, octave_bool, el_not_or);
4669 334a27c8f453 [project @ 2003-11-26 07:02:42 by jwe] jwe parents: 4192 diff changeset	94
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	95 INSTALL_CATOP_TI (ti, octave_bool_matrix, octave_bool, bm_b);
46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	96 INSTALL_CATOP_TI (ti, octave_bool_matrix, octave_scalar, bm_s);
46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	97 INSTALL_CATOP_TI (ti, octave_matrix, octave_bool, m_b);
46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	98 INSTALL_CATOP_TI (ti, octave_bool_matrix, octave_float_scalar, bm_f);
46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	99 INSTALL_CATOP_TI (ti, octave_float_matrix, octave_bool, fm_b);
4915 c638c144d4da [project @ 2004-07-23 19:01:22 by jwe] jwe parents: 4686 diff changeset	100
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	101 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_bool, assign);
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	102
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	103 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	104 conv_and_assign);
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	105
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	106 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_int8_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	107 conv_and_assign);
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	108 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_int16_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	109 conv_and_assign);
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	110 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_int32_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	111 conv_and_assign);
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	112 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_int64_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	113 conv_and_assign);
5898 da843f35775c [project @ 2006-07-19 18:18:08 by jwe] jwe parents: 5307 diff changeset	114
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	115 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_uint8_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	116 conv_and_assign);
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	117 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_uint16_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	118 conv_and_assign);
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	119 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_uint32_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	120 conv_and_assign);
24540 46440078d73b don't use singleton for octave_value_typeinfo John W. Eaton <jwe@octave.org> parents: 24534 diff changeset	121 INSTALL_ASSIGNOP_TI (ti, op_asn_eq, octave_bool_matrix, octave_uint64_scalar,
25103 078b795c5219 maint: style check C++ ahead of 4.4 release. Rik <rik@octave.org> parents: 25054 diff changeset	122 conv_and_assign);
3937 e1a2648d9150 [project @ 2002-05-16 15:12:10 by jwe] jwe parents: diff changeset	123 }

Mercurial > octave

annotate libinterp/operators/op-bm-b.cc @ 29358:0a5b15007766 stable