[Changeset]: Typo in dSparse.cc (DPBCON -> DGBCON)

[David Bateman]

Trivial patch.

D.

--
David Bateman                                David.Bateman@...
Motorola Labs - Paris                        [phone] (Ph)
Parc Les Algorithmes, Commune de St Aubin    [phone] (Mob)
91193 Gif-Sur-Yvette FRANCE                  [phone] (Fax)

The information contained in this communication has been classified as:

[x] General Business Information
[ ] Motorola Internal Use Only
[ ] Motorola Confidential Proprietary


# HG changeset patch
# User David Bateman <dbateman@...>
# Date 1210781038 -7200
# Node ID fe52385fe6a325a5e6d5018cd222955c7abc16ff
# Parent  80c6707d0a901822ce4396d006cb35c57714de82
Typo DPBCON -> DGBCON

diff --git a/liboctave/ChangeLog b/liboctave/ChangeLog
--- a/liboctave/ChangeLog
+++ b/liboctave/ChangeLog
@@ -1,3 +1,8 @@ 2008-05-13  David Bateman  <dbateman@fre
[phone]  David Bateman  <dbateman@...>
+
+ * dSparse.cc: Replace some DGBCON with GPBCON where they are
+ incorrectly used.
+
 2008-05-13  David Bateman  <dbateman@...>
 
  * idx-vector.cc (IDX_VEC_REP::idx_vector_rep (const boolNDArray&)):
diff --git a/liboctave/dSparse.cc b/liboctave/dSparse.cc
--- a/liboctave/dSparse.cc
+++ b/liboctave/dSparse.cc
@@ -4457,7 +4457,7 @@ SparseMatrix::bsolve (MatrixType &mattyp
   Array<octave_idx_type> iz (nr);
   octave_idx_type *piz = iz.fortran_vec ();
 
-  F77_XFCN (dpbcon, DGBCON,
+  F77_XFCN (dpbcon, DPBCON,
     (F77_CONST_CHAR_ARG2 (&job, 1),
      nr, n_lower, tmp_data, ldm,
      anorm, rcond, pz, piz, err
@@ -4705,7 +4705,7 @@ SparseMatrix::bsolve (MatrixType &mattyp
   Array<octave_idx_type> iz (nr);
   octave_idx_type *piz = iz.fortran_vec ();
 
-  F77_XFCN (dpbcon, DGBCON,
+  F77_XFCN (dpbcon, DPBCON,
     (F77_CONST_CHAR_ARG2 (&job, 1),
      nr, n_lower, tmp_data, ldm,
      anorm, rcond, pz, piz, err
@@ -5025,7 +5025,7 @@ SparseMatrix::bsolve (MatrixType &mattyp
   Array<octave_idx_type> iz (nr);
   octave_idx_type *piz = iz.fortran_vec ();
 
-  F77_XFCN (dpbcon, DGBCON,
+  F77_XFCN (dpbcon, DPBCON,
     (F77_CONST_CHAR_ARG2 (&job, 1),
      nr, n_lower, tmp_data, ldm,
      anorm, rcond, pz, piz, err
@@ -5176,7 +5176,7 @@ SparseMatrix::bsolve (MatrixType &mattyp
   Array<octave_idx_type> iz (nr);
   octave_idx_type *piz = iz.fortran_vec ();
 
-  F77_XFCN (dpbcon, DGBCON,
+  F77_XFCN (dpbcon, DPBCON,
     (F77_CONST_CHAR_ARG2 (&job, 1),
      nr, n_lower, tmp_data, ldm,
      anorm, rcond, pz, piz, err
@@ -5325,7 +5325,7 @@ SparseMatrix::bsolve (MatrixType &mattyp
   Array<octave_idx_type> iz (nr);
   octave_idx_type *piz = iz.fortran_vec ();
 
-  F77_XFCN (dpbcon, DGBCON,
+  F77_XFCN (dpbcon, DPBCON,
     (F77_CONST_CHAR_ARG2 (&job, 1),
      nr, n_lower, tmp_data, ldm,
      anorm, rcond, pz, piz, err

_______________________________________________
Bug-octave mailing list
Bug-octave@...
https://www.cae.wisc.edu/mailman/listinfo/bug-octave

[John W. Eaton]

On 14-May-2008, David Bateman wrote:

| Trivial patch.

I applied it to the default and release-3-0-x branches.

Thanks,

jwe
_______________________________________________
Bug-octave mailing list
Bug-octave@...
https://www.cae.wisc.edu/mailman/listinfo/bug-octave