Mercurial > hg > octave-max

changeset 11775:bd72c5e49dcb release-3-0-x

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Typo DPBCON -> DGBCON
author David Bateman <dbateman@free.fr>
date Wed, 14 May 2008 18:03:58 +0200
parents 3c08ffee1137
children 78d3faa70aaa
files liboctave/ChangeLog liboctave/dSparse.cc
diffstat 2 files changed, 8 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/liboctave/ChangeLog
+++ b/liboctave/ChangeLog
@@ -1,5 +1,8 @@
 2008-05-19  David Bateman  <dbateman@free.fr>
 
+	* dSparse.cc: Replace some DGBCON with GPBCON where they are
+	incorrectly used.
+
 	* idx-vector.cc (IDX_VEC_REP::idx_vector_rep (const boolNDArray&)):
 	If len is zero size the index vector in the same manner as if len
 	is not zero.
--- a/liboctave/dSparse.cc
+++ b/liboctave/dSparse.cc
@@ -4514,7 +4514,7 @@
 		      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
@@ -4790,7 +4790,7 @@
 		      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
@@ -5145,7 +5145,7 @@
 		      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
@@ -5322,7 +5322,7 @@
 		      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
@@ -5495,7 +5495,7 @@
 		      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