~logan/ubuntu/trusty/suitesparse/4.2.1-3ubuntu1

« back to all changes in this revision

Viewing changes to CHOLMOD/MATLAB/spsym.c

  • Committer: Bazaar Package Importer
  • Author(s): Christophe Prud'homme
  • Date: 2007-05-29 09:36:29 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20070529093629-zowquo0b7slkk6nc
Tags: 3.0.0-2
* suitesparse builds properly twice in a row
* Bug fix: "suitesparse - FTBFS: Broken build depens: libgfortran1-dev",
  thanks to Bastian Blank (Closes: #426349).
* Bug fix: "suitesparse_3.0.0-1: FTBFS: build-depends on
  libgfortran1-dev", thanks to Steve Langasek (Closes: #426354).

Show diffs side-by-side

added added

removed removed

Lines of Context:
3
3
/* ========================================================================== */
4
4
 
5
5
/* -----------------------------------------------------------------------------
6
 
 * CHOLMOD/MATLAB Module.  Version 1.3.  Copyright (C) 2005-2006,
7
 
 * Timothy A. Davis
 
6
 * CHOLMOD/MATLAB Module.  Copyright (C) 2005-2006, Timothy A. Davis
8
7
 * The CHOLMOD/MATLAB Module is licensed under Version 2.0 of the GNU
9
8
 * General Public License.  See gpl.txt for a text of the license.
10
9
 * CHOLMOD is also available under other licenses; contact authors for details.
29
28
    double dummy = 0 ;
30
29
    cholmod_sparse Amatrix, *A ;
31
30
    cholmod_common Common, *cm ;
32
 
    int result, quick, option, xmatched, pmatched, nzoffdiag, nzdiag ;
 
31
    Int result, quick, option, xmatched, pmatched, nzoffdiag, nzdiag ;
33
32
 
34
33
    /* ---------------------------------------------------------------------- */
35
34
    /* start CHOLMOD and set parameters */ 
36
35
    /* ---------------------------------------------------------------------- */
37
36
 
38
37
    cm = &Common ;
39
 
    cholmod_start (cm) ;
 
38
    cholmod_l_start (cm) ;
40
39
    sputil_config (SPUMONI, cm) ;
41
40
 
42
41
    /* ---------------------------------------------------------------------- */
47
46
    {
48
47
        mexErrMsgTxt ("usage: [s xmatch pmatch nzoff nzd] = spsym (A,quick)") ;
49
48
    }
50
 
    if (!mxIsSparse (pargin [0]) || !mxIsDouble (pargin [0]))
 
49
    if (!mxIsSparse (pargin [0]))
51
50
    {
52
51
        mexErrMsgTxt ("A must be sparse and double") ;
53
52
    }
80
79
    nzoffdiag = 0 ;
81
80
    nzdiag = 0 ;
82
81
 
83
 
    result = cholmod_symmetry (A, option, &xmatched, &pmatched, &nzoffdiag,
 
82
    result = cholmod_l_symmetry (A, option, &xmatched, &pmatched, &nzoffdiag,
84
83
        &nzdiag, cm) ;
85
84
 
86
85
    /* ---------------------------------------------------------------------- */
98
97
    /* free workspace */
99
98
    /* ---------------------------------------------------------------------- */
100
99
 
101
 
    cholmod_finish (cm) ;
102
 
    cholmod_print_common (" ", cm) ;
 
100
    cholmod_l_finish (cm) ;
 
101
    cholmod_l_print_common (" ", cm) ;
103
102
}