# HG changeset patch # User David Bateman # Date 1210781038 -7200 # Node ID 4c3665e65bcd28dc694d9a6ba7c26bdb3247d192 # Parent c10d77387d96f1185e565284b5e92471af7e43fc Typo DPBCON -> DGBCON diff -r c10d77387d96 -r 4c3665e65bcd liboctave/ChangeLog --- a/liboctave/ChangeLog Sun May 18 01:26:04 2008 -0400 +++ b/liboctave/ChangeLog Wed May 14 18:03:58 2008 +0200 @@ -1,3 +1,8 @@ +2008-05-19 David Bateman + + * dSparse.cc: Replace some DGBCON with GPBCON where they are + incorrectly used. + 2008-05-13 David Bateman * idx-vector.cc (IDX_VEC_REP::idx_vector_rep (const boolNDArray&)): diff -r c10d77387d96 -r 4c3665e65bcd liboctave/dSparse.cc --- a/liboctave/dSparse.cc Sun May 18 01:26:04 2008 -0400 +++ b/liboctave/dSparse.cc Wed May 14 18:03:58 2008 +0200 @@ -4457,7 +4457,7 @@ Array 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 @@ Array 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 @@ Array 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 @@ Array 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 @@ Array 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