octave-nkf: liboctave/array/boolNDArray.cc annotate

annotate liboctave/array/boolNDArray.cc @ 20614:10ec79b47808

use new string_value method to handle value extraction errors * __voronoi__.cc, chol.cc, colamd.cc, fftw.cc: Use new string_value method.

author	John W. Eaton <jwe@octave.org>
date	Thu, 08 Oct 2015 18:15:56 -0400
parents	4197fc428c7d
children

rev	line source
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	1 // N-D Array manipulations.
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	2 /*
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	3
19731 4197fc428c7d maint: Update copyright notices for 2015. John W. Eaton <jwe@octave.org> parents: 19349 diff changeset	4 Copyright (C) 1996-2015 John W. Eaton
9601 a9b37bae1802 add a couple of missing copyright statements Jaroslav Hajek <highegg@gmail.com> parents: 9578 diff changeset	5 Copyright (C) 2009 VZLU Prague, a.s.
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	6
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	7 This file is part of Octave.
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	8
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	9 Octave is free software; you can redistribute it and/or modify it
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	10 under the terms of the GNU General Public License as published by the
7016 93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 5775 diff changeset	11 Free Software Foundation; either version 3 of the License, or (at your
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 5775 diff changeset	12 option) any later version.
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	13
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	14 Octave is distributed in the hope that it will be useful, but WITHOUT
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	15 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	16 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	17 for more details.
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	18
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	19 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: 5775 diff changeset	20 along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 5775 diff changeset	21 <http://www.gnu.org/licenses/>.
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	22
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	23 */
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	24
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	25 #ifdef HAVE_CONFIG_H
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	26 #include <config.h>
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	27 #endif
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	28
4588 19bfd295f400 [project @ 2003-11-10 17:18:48 by jwe] jwe parents: 4569 diff changeset	29 #include "Array-util.h"
19303 65554f5847ac don't include oct-locbuf.h in header files unnecessarily John W. Eaton <jwe@octave.org> parents: 17769 diff changeset	30 #include "boolNDArray.h"
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	31 #include "CNDArray.h"
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	32 #include "mx-base.h"
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	33 #include "lo-ieee.h"
8774 b756ce0002db split implementation and interface in mx-op-defs and MArray-defs Jaroslav Hajek <highegg@gmail.com> parents: 8756 diff changeset	34 #include "mx-op-defs.h"
9548 e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	35 #include "MArray-defs.h"
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	36
9743 26abff55f6fe optimize bsxfun for common built-in operations Jaroslav Hajek <highegg@gmail.com> parents: 9732 diff changeset	37 #include "bsxfun-defs.cc"
26abff55f6fe optimize bsxfun for common built-in operations Jaroslav Hajek <highegg@gmail.com> parents: 9732 diff changeset	38
4543 79df15d4470c [project @ 2003-10-18 03:53:52 by jwe] jwe parents: 4532 diff changeset	39 // unary operations
79df15d4470c [project @ 2003-10-18 03:53:52 by jwe] jwe parents: 4532 diff changeset	40
79df15d4470c [project @ 2003-10-18 03:53:52 by jwe] jwe parents: 4532 diff changeset	41 boolNDArray
79df15d4470c [project @ 2003-10-18 03:53:52 by jwe] jwe parents: 4532 diff changeset	42 boolNDArray::operator ! (void) const
79df15d4470c [project @ 2003-10-18 03:53:52 by jwe] jwe parents: 4532 diff changeset	43 {
13731 3b52038e6e6c Help dumb compilers to resolve template parameters. Michael Goffioul <michael.goffioul@gmail.com> parents: 13139 diff changeset	44 return do_mx_unary_op<bool, bool> (*this, mx_inline_not);
4543 79df15d4470c [project @ 2003-10-18 03:53:52 by jwe] jwe parents: 4532 diff changeset	45 }
79df15d4470c [project @ 2003-10-18 03:53:52 by jwe] jwe parents: 4532 diff changeset	46
9607 1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	47 boolNDArray&
1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	48 boolNDArray::invert (void)
1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	49 {
1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	50 if (is_shared ())
1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	51 this = ! this;
1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	52 else
10362 b47ab50a6aa8 simplify appliers in mx-inlines.cc Jaroslav Hajek <highegg@gmail.com> parents: 10352 diff changeset	53 do_mx_inplace_op<bool> (*this, mx_inline_not2);
9607 1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	54
1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	55 return *this;
1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	56 }
1be3c73ed7b5 reuse temporary arrays in nested expressions Jaroslav Hajek <highegg@gmail.com> parents: 9601 diff changeset	57
17769 49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/ Rik <rik@octave.org> parents: 17744 diff changeset	58 // FIXME: this is not quite the right thing.
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	59
4556 773a21e4fce8 [project @ 2003-10-28 05:02:10 by jwe] jwe parents: 4543 diff changeset	60 boolNDArray
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	61 boolNDArray::all (int dim) const
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	62 {
10362 b47ab50a6aa8 simplify appliers in mx-inlines.cc Jaroslav Hajek <highegg@gmail.com> parents: 10352 diff changeset	63 return do_mx_red_op<bool, bool> (*this, dim, mx_inline_all);
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	64 }
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	65
4556 773a21e4fce8 [project @ 2003-10-28 05:02:10 by jwe] jwe parents: 4543 diff changeset	66 boolNDArray
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	67 boolNDArray::any (int dim) const
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	68 {
10362 b47ab50a6aa8 simplify appliers in mx-inlines.cc Jaroslav Hajek <highegg@gmail.com> parents: 10352 diff changeset	69 return do_mx_red_op<bool, bool> (*this, dim, mx_inline_any);
4514 8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	70 }
8373b9b41eee [project @ 2003-09-19 21:47:10 by jwe] jwe parents: diff changeset	71
11586 12df7854fa7c strip trailing whitespace from source files John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	72 NDArray
7113 a018c140f8aa [project @ 2007-11-07 00:28:01 by dbateman] dbateman parents: 7017 diff changeset	73 boolNDArray::sum (int dim) const
a018c140f8aa [project @ 2007-11-07 00:28:01 by dbateman] dbateman parents: 7017 diff changeset	74 {
10152 b6b65e71049b optimize cumsum with logicals Jaroslav Hajek <highegg@gmail.com> parents: 9743 diff changeset	75 // NOTE: going via octave_idx_type is typically faster even though it
11586 12df7854fa7c strip trailing whitespace from source files John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	76 // requires a conversion.
10362 b47ab50a6aa8 simplify appliers in mx-inlines.cc Jaroslav Hajek <highegg@gmail.com> parents: 10352 diff changeset	77 return do_mx_red_op<octave_idx_type, bool> (*this, dim, mx_inline_count);
7113 a018c140f8aa [project @ 2007-11-07 00:28:01 by dbateman] dbateman parents: 7017 diff changeset	78 }
a018c140f8aa [project @ 2007-11-07 00:28:01 by dbateman] dbateman parents: 7017 diff changeset	79
11586 12df7854fa7c strip trailing whitespace from source files John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	80 NDArray
8780 ea76466605ba support native cumsum, gripe on overflow in sum/cumsum Jaroslav Hajek <highegg@gmail.com> parents: 8774 diff changeset	81 boolNDArray::cumsum (int dim) const
ea76466605ba support native cumsum, gripe on overflow in sum/cumsum Jaroslav Hajek <highegg@gmail.com> parents: 8774 diff changeset	82 {
10152 b6b65e71049b optimize cumsum with logicals Jaroslav Hajek <highegg@gmail.com> parents: 9743 diff changeset	83 // In this case, it's better to sum directly to doubles.
10362 b47ab50a6aa8 simplify appliers in mx-inlines.cc Jaroslav Hajek <highegg@gmail.com> parents: 10352 diff changeset	84 return do_mx_cum_op<double , bool> (*this, dim, mx_inline_cumcount);
8780 ea76466605ba support native cumsum, gripe on overflow in sum/cumsum Jaroslav Hajek <highegg@gmail.com> parents: 8774 diff changeset	85 }
ea76466605ba support native cumsum, gripe on overflow in sum/cumsum Jaroslav Hajek <highegg@gmail.com> parents: 8774 diff changeset	86
4964 269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	87 boolNDArray
17769 49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/ Rik <rik@octave.org> parents: 17744 diff changeset	88 boolNDArray::concat (const boolNDArray& rb,
49a5a4be04a1 maint: Use GNU style coding conventions for code in liboctave/ Rik <rik@octave.org> parents: 17744 diff changeset	89 const Array<octave_idx_type>& ra_idx)
4964 269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	90 {
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	91 if (rb.numel () > 0)
5073 e71be9c548f2 [project @ 2004-11-09 18:31:25 by jwe] jwe parents: 4964 diff changeset	92 insert (rb, ra_idx);
e71be9c548f2 [project @ 2004-11-09 18:31:25 by jwe] jwe parents: 4964 diff changeset	93 return *this;
4964 269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	94 }
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	95
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	96 boolNDArray&
5275 23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe] jwe parents: 5105 diff changeset	97 boolNDArray::insert (const boolNDArray& a, octave_idx_type r, octave_idx_type c)
4964 269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	98 {
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	99 Array<bool>::insert (a, r, c);
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	100 return *this;
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	101 }
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	102
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	103 boolNDArray&
5275 23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe] jwe parents: 5105 diff changeset	104 boolNDArray::insert (const boolNDArray& a, const Array<octave_idx_type>& ra_idx)
4964 269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	105 {
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	106 Array<bool>::insert (a, ra_idx);
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	107 return *this;
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	108 }
269c3d6c0569 [project @ 2004-09-04 01:16:28 by jwe] jwe parents: 4770 diff changeset	109
4532 01ee68d18069 [project @ 2003-10-10 00:49:54 by jwe] jwe parents: 4514 diff changeset	110 void
5275 23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe] jwe parents: 5105 diff changeset	111 boolNDArray::increment_index (Array<octave_idx_type>& ra_idx,
10314 07ebe522dac2 untabify liboctave C++ sources John W. Eaton <jwe@octave.org> parents: 10158 diff changeset	112 const dim_vector& dimensions,
07ebe522dac2 untabify liboctave C++ sources John W. Eaton <jwe@octave.org> parents: 10158 diff changeset	113 int start_dimension)
4532 01ee68d18069 [project @ 2003-10-10 00:49:54 by jwe] jwe parents: 4514 diff changeset	114 {
01ee68d18069 [project @ 2003-10-10 00:49:54 by jwe] jwe parents: 4514 diff changeset	115 ::increment_index (ra_idx, dimensions, start_dimension);
01ee68d18069 [project @ 2003-10-10 00:49:54 by jwe] jwe parents: 4514 diff changeset	116 }
01ee68d18069 [project @ 2003-10-10 00:49:54 by jwe] jwe parents: 4514 diff changeset	117
5275 23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe] jwe parents: 5105 diff changeset	118 octave_idx_type
23b37da9fd5b [project @ 2005-04-08 16:07:35 by jwe] jwe parents: 5105 diff changeset	119 boolNDArray::compute_index (Array<octave_idx_type>& ra_idx,
10314 07ebe522dac2 untabify liboctave C++ sources John W. Eaton <jwe@octave.org> parents: 10158 diff changeset	120 const dim_vector& dimensions)
4556 773a21e4fce8 [project @ 2003-10-28 05:02:10 by jwe] jwe parents: 4543 diff changeset	121 {
773a21e4fce8 [project @ 2003-10-28 05:02:10 by jwe] jwe parents: 4543 diff changeset	122 return ::compute_index (ra_idx, dimensions);
773a21e4fce8 [project @ 2003-10-28 05:02:10 by jwe] jwe parents: 4543 diff changeset	123 }
773a21e4fce8 [project @ 2003-10-28 05:02:10 by jwe] jwe parents: 4543 diff changeset	124
7620 36594d5bbe13 Move diag function into the octave_value class David Bateman <dbateman@free.fr> parents: 7113 diff changeset	125 boolNDArray
36594d5bbe13 Move diag function into the octave_value class David Bateman <dbateman@free.fr> parents: 7113 diff changeset	126 boolNDArray::diag (octave_idx_type k) const
36594d5bbe13 Move diag function into the octave_value class David Bateman <dbateman@free.fr> parents: 7113 diff changeset	127 {
9732 b4fdfee405b5 remove ArrayN<T> + fix nonhom. diag-scalar ops Jaroslav Hajek <highegg@gmail.com> parents: 9612 diff changeset	128 return Array<bool>::diag (k);
7620 36594d5bbe13 Move diag function into the octave_value class David Bateman <dbateman@free.fr> parents: 7113 diff changeset	129 }
36594d5bbe13 Move diag function into the octave_value class David Bateman <dbateman@free.fr> parents: 7113 diff changeset	130
14557 e8e86ae3abbc make diag (x, m, n) return a proper diagonal matrix object (bug #36099) John W. Eaton <jwe@octave.org> parents: 14138 diff changeset	131 boolNDArray
e8e86ae3abbc make diag (x, m, n) return a proper diagonal matrix object (bug #36099) John W. Eaton <jwe@octave.org> parents: 14138 diff changeset	132 boolNDArray::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: 14138 diff changeset	133 {
e8e86ae3abbc make diag (x, m, n) return a proper diagonal matrix object (bug #36099) John W. Eaton <jwe@octave.org> parents: 14138 diff changeset	134 return Array<bool>::diag (m, n);
e8e86ae3abbc make diag (x, m, n) return a proper diagonal matrix object (bug #36099) John W. Eaton <jwe@octave.org> parents: 14138 diff changeset	135 }
e8e86ae3abbc make diag (x, m, n) return a proper diagonal matrix object (bug #36099) John W. Eaton <jwe@octave.org> parents: 14138 diff changeset	136
9550 3d6a9aea2aea refactor binary & bool ops in liboctave Jaroslav Hajek <highegg@gmail.com> parents: 9548 diff changeset	137 NDND_BOOL_OPS (boolNDArray, boolNDArray)
9578 7dafdb8b062f refactor comparison ops implementations Jaroslav Hajek <highegg@gmail.com> parents: 9550 diff changeset	138 NDND_CMP_OPS (boolNDArray, boolNDArray)
4543 79df15d4470c [project @ 2003-10-18 03:53:52 by jwe] jwe parents: 4532 diff changeset	139
9550 3d6a9aea2aea refactor binary & bool ops in liboctave Jaroslav Hajek <highegg@gmail.com> parents: 9548 diff changeset	140 NDS_BOOL_OPS (boolNDArray, bool)
9578 7dafdb8b062f refactor comparison ops implementations Jaroslav Hajek <highegg@gmail.com> parents: 9550 diff changeset	141 NDS_CMP_OPS (boolNDArray, bool)
4669 334a27c8f453 [project @ 2003-11-26 07:02:42 by jwe] jwe parents: 4588 diff changeset	142
9550 3d6a9aea2aea refactor binary & bool ops in liboctave Jaroslav Hajek <highegg@gmail.com> parents: 9548 diff changeset	143 SND_BOOL_OPS (bool, boolNDArray)
9578 7dafdb8b062f refactor comparison ops implementations Jaroslav Hajek <highegg@gmail.com> parents: 9550 diff changeset	144 SND_CMP_OPS (bool, boolNDArray)
4669 334a27c8f453 [project @ 2003-11-26 07:02:42 by jwe] jwe parents: 4588 diff changeset	145
11586 12df7854fa7c strip trailing whitespace from source files John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	146 boolNDArray&
9548 e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	147 mx_el_and_assign (boolNDArray& a, const boolNDArray& b)
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	148 {
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	149 if (a.is_shared ())
9612 66970dd627f6 further liboctave design improvements Jaroslav Hajek <highegg@gmail.com> parents: 9607 diff changeset	150 a = mx_el_and (a, b);
9548 e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	151 else
13139 aa4a23337a0f Enable BSX in-place for missing assignment operators Jordi Gutiérrez Hermoso <jordigh@octave.org> parents: 11586 diff changeset	152 do_mm_inplace_op<bool, bool> (a, b, mx_inline_and2, mx_inline_and2,
aa4a23337a0f Enable BSX in-place for missing assignment operators Jordi Gutiérrez Hermoso <jordigh@octave.org> parents: 11586 diff changeset	153 "operator &=");
9548 e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	154
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	155 return a;
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	156 }
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	157
11586 12df7854fa7c strip trailing whitespace from source files John W. Eaton <jwe@octave.org> parents: 11523 diff changeset	158 boolNDArray&
9548 e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	159 mx_el_or_assign (boolNDArray& a, const boolNDArray& b)
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	160 {
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	161 if (a.is_shared ())
9612 66970dd627f6 further liboctave design improvements Jaroslav Hajek <highegg@gmail.com> parents: 9607 diff changeset	162 a = mx_el_or (a, b);
9548 e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	163 else
13139 aa4a23337a0f Enable BSX in-place for missing assignment operators Jordi Gutiérrez Hermoso <jordigh@octave.org> parents: 11586 diff changeset	164 do_mm_inplace_op<bool, bool> (a, b, mx_inline_or2, mx_inline_or2,
aa4a23337a0f Enable BSX in-place for missing assignment operators Jordi Gutiérrez Hermoso <jordigh@octave.org> parents: 11586 diff changeset	165 "operator \|=");
9548 e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	166
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	167 return a;
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	168 }
e5f7aee2ab8c optimize &=, \|= operators Jaroslav Hajek <highegg@gmail.com> parents: 9227 diff changeset	169
9743 26abff55f6fe optimize bsxfun for common built-in operations Jaroslav Hajek <highegg@gmail.com> parents: 9732 diff changeset	170 BSXFUN_OP_DEF_MXLOOP (and, boolNDArray, mx_inline_and)
26abff55f6fe optimize bsxfun for common built-in operations Jaroslav Hajek <highegg@gmail.com> parents: 9732 diff changeset	171 BSXFUN_OP_DEF_MXLOOP (or, boolNDArray, mx_inline_or)

Mercurial > octave-nkf

annotate liboctave/array/boolNDArray.cc @ 20614:10ec79b47808