Mercurial > octave
view libinterp/operators/op-b-sbm.cc @ 21220:d78e45987d6a
rename octave::build_env namespace from octave::config
* build-env-features.sh: Rename from ocgt-conf-features.sh.
Update for new names.
* build-env.h: Rename from oct-conf.h. Also declare features function.
* build-env.in.cc: Rename from oct-conf.in.cc.
* oct-conf-features.h: Delete.
* libinterp/module.mk: Update.
* toplev.cc, __init_gnuplot__.cc, octave.cc: Update for new names.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Sun, 07 Feb 2016 14:56:17 -0500 |
parents | fcac5dbbf9ed |
children | 40de9f8f23a6 |
line wrap: on
line source
/* Copyright (C) 2004-2015 David Bateman Copyright (C) 1998-2004 Andy Adler This file is part of Octave. Octave is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. Octave is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with Octave; see the file COPYING. If not, see <http://www.gnu.org/licenses/>. */ #ifdef HAVE_CONFIG_H # include <config.h> #endif #include "errwarn.h" #include "ovl.h" #include "ov.h" #include "ov-typeinfo.h" #include "ov-bool.h" #include "ov-bool-mat.h" #include "ov-scalar.h" #include "ops.h" #include "ov-re-sparse.h" #include "ov-bool-sparse.h" // bool by sparse bool matrix ops. DEFBINOP_FN (ne, bool, sparse_bool_matrix, mx_el_ne) DEFBINOP_FN (eq, bool, sparse_bool_matrix, mx_el_eq) DEFBINOP_FN (el_and, bool, sparse_bool_matrix, mx_el_and) DEFBINOP_FN (el_or, bool, sparse_bool_matrix, mx_el_or) DEFCATOP (b_sbm, bool, sparse_bool_matrix) { CAST_BINOP_ARGS (octave_bool&, const octave_sparse_bool_matrix&); SparseBoolMatrix tmp (1, 1, v1.bool_value ()); return octave_value (tmp. concat (v2.sparse_bool_matrix_value (), ra_idx)); } DEFCATOP (b_sm, bool, sparse_matrix) { CAST_BINOP_ARGS (octave_bool&, const octave_sparse_matrix&); SparseMatrix tmp (1, 1, v1.scalar_value ()); return octave_value (tmp. concat (v2.sparse_matrix_value (), ra_idx)); } DEFCATOP (s_sbm, scalar, sparse_bool_matrix) { CAST_BINOP_ARGS (octave_scalar&, const octave_sparse_bool_matrix&); SparseMatrix tmp (1, 1, v1.scalar_value ()); return octave_value(tmp. concat (v2.sparse_matrix_value (), ra_idx)); } DEFCONV (sparse_bool_matrix_conv, bool, sparse_bool_matrix) { CAST_CONV_ARG (const octave_bool&); return new octave_sparse_bool_matrix (SparseBoolMatrix (1, 1, v.bool_value ())); } void install_b_sbm_ops (void) { INSTALL_BINOP (op_eq, octave_bool, octave_sparse_bool_matrix, eq); INSTALL_BINOP (op_ne, octave_bool, octave_sparse_bool_matrix, ne); INSTALL_BINOP (op_el_and, octave_bool, octave_sparse_bool_matrix, el_and); INSTALL_BINOP (op_el_or, octave_bool, octave_sparse_bool_matrix, el_or); INSTALL_CATOP (octave_bool, octave_sparse_bool_matrix, b_sbm); INSTALL_CATOP (octave_bool, octave_sparse_matrix, b_sm); INSTALL_CATOP (octave_scalar, octave_sparse_bool_matrix, s_sbm); INSTALL_ASSIGNCONV (octave_bool, octave_sparse_bool_matrix, octave_bool_matrix); INSTALL_WIDENOP (octave_bool, octave_sparse_bool_matrix, sparse_bool_matrix_conv); }