octave: liboctave/util/oct-sparse.h annotate

annotate liboctave/util/oct-sparse.h @ 31760:aaffac4fbe30 stable

Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). * liboctave/util/oct-sparse.h (SUITESPARSE_ASSIGN_FPTR, SUITESPARSE_ASSIGN_FPTR2): Adapt macro for changes in API of SuiteSparse 7.0.0 or newer.

author	Markus Mützel <markus.muetzel@gmx.de>
date	Fri, 20 Jan 2023 15:07:17 +0100
parents	597f3ee61a48
children	2e484f9f1f18

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 //
31706 597f3ee61a48 update Octave Project Developers copyright for the new year John W. Eaton <jwe@octave.org> parents: 31607 diff changeset	3 // Copyright (C) 2005-2023 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 ////////////////////////////////////////////////////////////////////////
5512 7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	25
20791 f7084eae3318 maint: Use Octave coding conventions for #if statements. Rik <rik@octave.org> parents: 19756 diff changeset	26 #if ! defined (octave_oct_sparse_h)
17822 ebb3ef964372 maint: Use common #define syntax "octave_filename_h" in h_files. Rik <rik@octave.org> parents: 17744 diff changeset	27 #define octave_oct_sparse_h 1
5512 7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	28
21244 1473547f50f5 include octave-config.h in public header files John W. Eaton <jwe@octave.org> parents: 21229 diff changeset	29 #include "octave-config.h"
1473547f50f5 include octave-config.h in public header files John W. Eaton <jwe@octave.org> parents: 21229 diff changeset	30
29275 881bbfaddd25 oct-sparse.h: Add missing header. Markus Mützel <markus.muetzel@gmx.de> parents: 29274 diff changeset	31 #include <limits>
881bbfaddd25 oct-sparse.h: Add missing header. Markus Mützel <markus.muetzel@gmx.de> parents: 29274 diff changeset	32
29259 66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	33 #if defined (HAVE_CHOLMOD)
66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	34 # include "dSparse.h"
66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	35 # include "CSparse.h"
66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	36 #endif
66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	37
7619 56012914972a Add the amd function David Bateman <dbateman@free.fr> parents: 7036 diff changeset	38 #if defined (HAVE_SUITESPARSE_AMD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	39 # include <suitesparse/amd.h>
7619 56012914972a Add the amd function David Bateman <dbateman@free.fr> parents: 7036 diff changeset	40 #elif defined (HAVE_AMD_AMD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	41 # include <amd/amd.h>
7619 56012914972a Add the amd function David Bateman <dbateman@free.fr> parents: 7036 diff changeset	42 #elif defined (HAVE_AMD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	43 # include <amd.h>
7619 56012914972a Add the amd function David Bateman <dbateman@free.fr> parents: 7036 diff changeset	44 #endif
56012914972a Add the amd function David Bateman <dbateman@free.fr> parents: 7036 diff changeset	45
6231 82021cf7e53a [project @ 2007-01-08 19:53:35 by dbateman] dbateman parents: 6186 diff changeset	46 #if defined (HAVE_SUITESPARSE_CCOLAMD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	47 # include <suitesparse/ccolamd.h>
5610 9761b7d24e9e [project @ 2006-02-09 09:12:02 by dbateman] dbateman parents: 5518 diff changeset	48 #elif defined (HAVE_CCOLAMD_CCOLAMD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	49 # include <ccolamd/ccolamd.h>
5512 7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	50 #elif defined (HAVE_CCOLAMD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	51 # include <ccolamd.h>
5512 7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	52 #endif
7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	53
6231 82021cf7e53a [project @ 2007-01-08 19:53:35 by dbateman] dbateman parents: 6186 diff changeset	54 #if defined (HAVE_SUITESPARSE_CHOLMOD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	55 # include <suitesparse/cholmod.h>
6236 1bed9b2c26e0 [project @ 2007-01-10 18:20:18 by jwe] jwe parents: 6231 diff changeset	56 #elif defined (HAVE_CHOLMOD_CHOLMOD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	57 # include <cholmod/cholmod.h>
5512 7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	58 #elif defined (HAVE_CHOLMOD_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	59 # include <cholmod.h>
5512 7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	60 #endif
7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	61
23390 1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	62 #if defined (HAVE_SUITESPARSE_COLAMD_H)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	63 # include <suitesparse/colamd.h>
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	64 #elif defined (HAVE_COLAMD_COLAMD_H)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	65 # include <colamd/colamd.h>
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	66 #elif defined (HAVE_COLAMD_H)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	67 # include <colamd.h>
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	68 #endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	69
6231 82021cf7e53a [project @ 2007-01-08 19:53:35 by dbateman] dbateman parents: 6186 diff changeset	70 #if defined (HAVE_SUITESPARSE_CS_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	71 # include <suitesparse/cs.h>
5648 69a4f320d95a [project @ 2006-03-08 20:17:37 by dbateman] dbateman parents: 5610 diff changeset	72 #elif defined (HAVE_CXSPARSE_CS_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	73 # include <cxsparse/cs.h>
5648 69a4f320d95a [project @ 2006-03-08 20:17:37 by dbateman] dbateman parents: 5610 diff changeset	74 #elif defined (HAVE_CS_H)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	75 # include <cs.h>
5610 9761b7d24e9e [project @ 2006-02-09 09:12:02 by dbateman] dbateman parents: 5518 diff changeset	76 #endif
9761b7d24e9e [project @ 2006-02-09 09:12:02 by dbateman] dbateman parents: 5518 diff changeset	77
23390 1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	78 #if defined (HAVE_SUITESPARSE_UMFPACK_H)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	79 # include <suitesparse/umfpack.h>
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	80 #elif defined (HAVE_UMFPACK_UMFPACK_H)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	81 # include <umfpack/umfpack.h>
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	82 #elif defined (HAVE_UMFPACK_H)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	83 # include <umfpack.h>
5512 7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	84 #endif
7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	85
29259 66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	86 #if defined (HAVE_SUITESPARSE_SUITESPARSEQR_HPP)
66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	87 # include <suitesparse/SuiteSparseQR.hpp>
29268 d4d56704978e build: Search SPQR header without sub-directory (bug #59828). Markus Mützel <markus.muetzel@gmx.de> parents: 29259 diff changeset	88 #elif defined (HAVE_SUITESPARSEQR_HPP)
d4d56704978e build: Search SPQR header without sub-directory (bug #59828). Markus Mützel <markus.muetzel@gmx.de> parents: 29259 diff changeset	89 # include <SuiteSparseQR.hpp>
29259 66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	90 #endif
66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	91
31760 aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	92 // Cope with API differences between SuiteSparse versions
21160 b5b531ba93ce build: Use configure-time test to check CXSparse version. Rik <rik@octave.org> parents: 21152 diff changeset	93
19207 4d460b124be3 Fix compilation error when building without SuiteSparse Mike Miller <mtmiller@ieee.org> parents: 19139 diff changeset	94 #if defined (SUITESPARSE_VERSION)
31760 aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	95 # if (SUITESPARSE_VERSION >= SUITESPARSE_VER_CODE (7, 0))
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	96 # define SUITESPARSE_NAME(name) SuiteSparse_ ## name
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	97 # define SUITESPARSE_SET_FCN(name) SuiteSparse_config_ ## name ## _set
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	98 # define SUITESPARSE_ASSIGN_FPTR(f_name, f_var, f_assign) \
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	99 SUITESPARSE_SET_FCN(f_name) (f_assign)
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	100 # define SUITESPARSE_ASSIGN_FPTR2(f_name, f_var, f_assign) \
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	101 SUITESPARSE_SET_FCN(f_name) (SUITESPARSE_NAME (f_assign))
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	102 # elif (SUITESPARSE_VERSION >= SUITESPARSE_VER_CODE (4, 3))
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	103 # define SUITESPARSE_NAME(name) SuiteSparse_ ## name
31760 aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	104 # define SUITESPARSE_ASSIGN_FPTR(f_name, f_var, f_assign) \
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	105 (SuiteSparse_config.f_name = f_assign)
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	106 # define SUITESPARSE_ASSIGN_FPTR2(f_name, f_var, f_assign) \
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	107 (SuiteSparse_config.f_name = SUITESPARSE_NAME (f_assign))
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	108 # else
31760 aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	109 # define SUITESPARSE_ASSIGN_FPTR(f_name, f_var, f_assign) \
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	110 (f_var = f_assign)
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	111 # define SUITESPARSE_ASSIGN_FPTR2(f_name, f_var, f_assign) \
aaffac4fbe30 Adapt for API changes in SuiteSparse 7.0.0 or newer (bug #63684). Markus Mützel <markus.muetzel@gmx.de> parents: 31706 diff changeset	112 (f_var = CHOLMOD_NAME (f_assign))
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	113 # endif
5512 7c8767d0ffc0 [project @ 2005-10-27 02:20:17 by jwe] jwe parents: diff changeset	114 #endif
19139 afd6179d2616 allow building with new version of SuiteSparse (bug #43063) John W. Eaton <jwe@octave.org> parents: 17822 diff changeset	115
23390 1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	116 // Function names depend on integer type.
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	117
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	118 #if defined (HAVE_AMD)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	119 # if defined (OCTAVE_ENABLE_64)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	120 # define AMD_NAME(name) amd_l ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	121 # else
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	122 # define AMD_NAME(name) amd ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	123 # endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	124 #endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	125
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	126 #if defined (HAVE_CCOLAMD)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	127 # if defined (OCTAVE_ENABLE_64)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	128 # define CCOLAMD_NAME(name) ccolamd_l ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	129 # define CSYMAMD_NAME(name) csymamd_l ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	130 # else
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	131 # define CCOLAMD_NAME(name) ccolamd ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	132 # define CSYMAMD_NAME(name) csymamd ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	133 # endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	134 #endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	135
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	136 #if defined (HAVE_CHOLMOD)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	137 # if defined (OCTAVE_ENABLE_64)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	138 # define CHOLMOD_NAME(name) cholmod_l_ ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	139 # else
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	140 # define CHOLMOD_NAME(name) cholmod_ ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	141 # endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	142 #endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	143
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	144 #if defined (HAVE_COLAMD)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	145 # if defined (OCTAVE_ENABLE_64)
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	146 # define COLAMD_NAME(name) colamd_l ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	147 # define SYMAMD_NAME(name) symamd_l ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	148 # else
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	149 # define COLAMD_NAME(name) colamd ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	150 # define SYMAMD_NAME(name) symamd ## name
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	151 # endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	152 #endif
1ae9f4c1f48a define all suitesparse NAME macros in oct-sparse.h John W. Eaton <jwe@octave.org> parents: 23220 diff changeset	153
21176 791dcb32b657 revamp sparse QR factorizatino classes John W. Eaton <jwe@octave.org> parents: 21160 diff changeset	154 #if defined (HAVE_CXSPARSE)
21229 a83e7a384ee0 create and install a subset of config.h in octave-config.h John W. Eaton <jwe@octave.org> parents: 21213 diff changeset	155 # if defined (OCTAVE_ENABLE_64)
21177 a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	156 # define CXSPARSE_DNAME(name) cs_dl ## name
a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	157 # define CXSPARSE_ZNAME(name) cs_cl ## name
a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	158 # else
a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	159 # define CXSPARSE_DNAME(name) cs_di ## name
a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	160 # define CXSPARSE_ZNAME(name) cs_ci ## name
a10f60e13243 style fixes in liboctave/numeric directory John W. Eaton <jwe@octave.org> parents: 21176 diff changeset	161 # endif
19139 afd6179d2616 allow building with new version of SuiteSparse (bug #43063) John W. Eaton <jwe@octave.org> parents: 17822 diff changeset	162 #endif
21176 791dcb32b657 revamp sparse QR factorizatino classes John W. Eaton <jwe@octave.org> parents: 21160 diff changeset	163
21210 4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	164 #if defined (HAVE_UMFPACK)
21229 a83e7a384ee0 create and install a subset of config.h in octave-config.h John W. Eaton <jwe@octave.org> parents: 21213 diff changeset	165 # if defined (OCTAVE_ENABLE_64)
21210 4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	166 # define UMFPACK_DNAME(name) umfpack_dl_ ## name
4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	167 # define UMFPACK_ZNAME(name) umfpack_zl_ ## name
4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	168 # else
4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	169 # define UMFPACK_DNAME(name) umfpack_di_ ## name
4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	170 # define UMFPACK_ZNAME(name) umfpack_zi_ ## name
4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	171 # endif
21176 791dcb32b657 revamp sparse QR factorizatino classes John W. Eaton <jwe@octave.org> parents: 21160 diff changeset	172 #endif
21210 4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	173
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	174 #if (defined (HAVE_AMD) \|\| defined (HAVE_CCOLAMD) \
209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	175 \|\| defined (HAVE_CHOLMOD) \|\| defined (HAVE_COLAMD) \
29259 66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	176 \|\| defined (HAVE_CXSPARSE) \|\| defined (HAVE_SPQR) \
66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	177 \|\| defined (HAVE_UMFPACK))
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	178
31605 e88a07dec498 maint: Use macros to begin/end C++ namespaces. Rik <rik@octave.org> parents: 30796 diff changeset	179 OCTAVE_BEGIN_NAMESPACE(octave)
e88a07dec498 maint: Use macros to begin/end C++ namespaces. Rik <rik@octave.org> parents: 30796 diff changeset	180
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	181 # if defined (OCTAVE_ENABLE_64)
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	182 typedef SuiteSparse_long suitesparse_integer;
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	183 # else
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	184 typedef int suitesparse_integer;
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	185 # endif
209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	186
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	187 extern OCTAVE_API suitesparse_integer *
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	188 to_suitesparse_intptr (octave_idx_type *i);
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	189
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	190 extern const OCTAVE_API suitesparse_integer *
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	191 to_suitesparse_intptr (const octave_idx_type *i);
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	192
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	193 extern OCTAVE_API octave_idx_type *
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	194 to_octave_idx_type_ptr (suitesparse_integer *i);
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	195
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	196 extern const OCTAVE_API octave_idx_type *
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	197 to_octave_idx_type_ptr (const suitesparse_integer *i);
29259 66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	198
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	199 inline octave_idx_type
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	200 from_suitesparse_long (SuiteSparse_long x)
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	201 {
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	202 if (x < std::numeric_limits<octave_idx_type>::min ()
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	203 \|\| x > std::numeric_limits<octave_idx_type>::max ())
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	204 (*current_liboctave_error_handler)
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	205 ("integer dimension or index out of range for Octave's indexing type");
29259 66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	206
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	207 return static_cast<octave_idx_type> (x);
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	208 }
29259 66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	209
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	210 inline octave_idx_type
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	211 from_size_t (std::size_t x)
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	212 {
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	213 // std::size_t is guaranteed to be unsigned
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	214 if (x > std::numeric_limits<octave_idx_type>::max ())
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	215 (*current_liboctave_error_handler)
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	216 ("integer dimension or index out of range for Octave's index type");
29259 66f162b6fa03 Replacement of CXSPARSE by SPQR for QR factorization (bug #57033). Simon Hau <simon.hau79@gmail.com> parents: 29230 diff changeset	217
31607 aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	218 return static_cast<octave_idx_type> (x);
aac27ad79be6 maint: Re-indent code after switch to using namespace macros. Rik <rik@octave.org> parents: 31605 diff changeset	219 }
31605 e88a07dec498 maint: Use macros to begin/end C++ namespaces. Rik <rik@octave.org> parents: 30796 diff changeset	220
e88a07dec498 maint: Use macros to begin/end C++ namespaces. Rik <rik@octave.org> parents: 30796 diff changeset	221 OCTAVE_END_NAMESPACE(octave)
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	222
21210 4f7d3989c462 move UMFPACK_DNAME and UMFPACK_ZNAME macros to oct-sparse.h John W. Eaton <jwe@octave.org> parents: 21177 diff changeset	223 #endif
23391 209e749363a2 safe cast between SuiteSparse_long and octave_idx_type pointers (bug #50510) John W. Eaton <jwe@octave.org> parents: 23390 diff changeset	224 #endif

Mercurial > octave

annotate liboctave/util/oct-sparse.h @ 31760:aaffac4fbe30 stable