← Back to branch summary

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

« back to all changes in this revision

Viewing changes to CHOLMOD/Supernodal/cholmod_super_solve.c

  • Committer: Bazaar Package Importer
  • Author(s): Rafael Laboissiere
  • Date: 2009-02-24 11:08:12 UTC
  • mfrom: (7.2.2 sid)
  • Revision ID: james.westby@ubuntu.com-20090224110812-hawvr3dh5kjbvlae
http://bugs.debian.org/516725
debian/control: Add an epoch to the version number of
libsuitesparse-3.0.2 in replaces/conflicts for libcolamd-3.2.0
(really, closes: #516725)

Show diffs side-by-side

added added

removed removed

Lines of Context:
CHOLMOD/Supernodal/cholmod_super_solve.c
54
54
    cholmod_common *Common
55
55
)
56
56
{
57
 
    int blas_ok = TRUE ;
58
 
 
59
57
    /* ---------------------------------------------------------------------- */
60
58
    /* check inputs */
61
59
    /* ---------------------------------------------------------------------- */
108
106
    {
109
107
 
110
108
        case CHOLMOD_REAL:
111
 
            blas_ok = r_cholmod_super_lsolve (L, X, E, Common) ;
 
109
            r_cholmod_super_lsolve (L, X, E, Common) ;
112
110
            break ;
113
111
 
114
112
        case CHOLMOD_COMPLEX:
115
 
            blas_ok = c_cholmod_super_lsolve (L, X, E, Common) ;
 
113
            c_cholmod_super_lsolve (L, X, E, Common) ;
116
114
            break ;
117
115
    }
118
116
 
119
 
    if (CHECK_BLAS_INT && !blas_ok)
 
117
    if (CHECK_BLAS_INT && !Common->blas_ok)
120
118
    {
121
119
        ERROR (CHOLMOD_TOO_LARGE, "problem too large for the BLAS") ;
122
120
    }
123
 
    return (blas_ok) ;
 
121
    return (Common->blas_ok) ;
124
122
}
125
123
 
126
124
 
149
147
    cholmod_common *Common
150
148
)
151
149
{
152
 
    int blas_ok = TRUE ;
153
 
 
154
150
    /* ---------------------------------------------------------------------- */
155
151
    /* check inputs */
156
152
    /* ---------------------------------------------------------------------- */
203
199
    {
204
200
 
205
201
        case CHOLMOD_REAL:
206
 
            blas_ok = r_cholmod_super_ltsolve (L, X, E, Common) ;
 
202
            r_cholmod_super_ltsolve (L, X, E, Common) ;
207
203
            break ;
208
204
 
209
205
        case CHOLMOD_COMPLEX:
210
 
            blas_ok = c_cholmod_super_ltsolve (L, X, E, Common) ;
 
206
            c_cholmod_super_ltsolve (L, X, E, Common) ;
211
207
            break ;
212
208
    }
213
209
 
214
 
    if (CHECK_BLAS_INT && !blas_ok)
 
210
    if (CHECK_BLAS_INT && !Common->blas_ok)
215
211
    {
216
212
        ERROR (CHOLMOD_TOO_LARGE, "problem too large for the BLAS") ;
217
213
    }
218
 
 
219
 
    return (blas_ok) ;
 
214
    return (Common->blas_ok) ;
220
215
}
221
216
#endif