Mercurial > hg > octave-lyh
changeset 10105:018d92ad0730
fix prototypes for zherk and cherk
| author | John W. Eaton <jwe@octave.org> |
|---|---|
| date | Thu, 14 Jan 2010 03:10:46 -0500 |
| parents | 20b74e630faf |
| children | edbe47bc0f88 |
| files | liboctave/CMatrix.cc liboctave/ChangeLog liboctave/fCMatrix.cc |
| diffstat | 3 files changed, 9 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/liboctave/CMatrix.cc +++ b/liboctave/CMatrix.cc @@ -126,8 +126,8 @@ F77_FUNC (zherk, ZHERK) (F77_CONST_CHAR_ARG_DECL, F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, const octave_idx_type&, - const Complex&, const Complex*, const octave_idx_type&, - const Complex&, Complex*, const octave_idx_type& + const double&, const Complex*, const octave_idx_type&, + const double&, Complex*, const octave_idx_type& F77_CHAR_ARG_LEN_DECL F77_CHAR_ARG_LEN_DECL);
--- a/liboctave/ChangeLog +++ b/liboctave/ChangeLog @@ -1,3 +1,8 @@ +2010-01-14 John W. Eaton <jwe@octave.org> + + * CMatrix.cc: Fix prototype for zherk. + * fCMatrix.cc: Fix prototype for cherk. + 2010-01-14 John W. Eaton <jwe@octave.org> * oct-rl-edit.c (octave_rl_set_name): Save arg before setting
--- a/liboctave/fCMatrix.cc +++ b/liboctave/fCMatrix.cc @@ -125,8 +125,8 @@ F77_FUNC (cherk, CHERK) (F77_CONST_CHAR_ARG_DECL, F77_CONST_CHAR_ARG_DECL, const octave_idx_type&, const octave_idx_type&, - const FloatComplex&, const FloatComplex*, const octave_idx_type&, - const FloatComplex&, FloatComplex*, const octave_idx_type& + const float&, const FloatComplex*, const octave_idx_type&, + const float&, FloatComplex*, const octave_idx_type& F77_CHAR_ARG_LEN_DECL F77_CHAR_ARG_LEN_DECL);