Mercurial > octave-nkf
diff liboctave/CmplxCHOL.cc @ 11495:8a5e980da6aa
style fixes
| author | John W. Eaton <jwe@octave.org> |
|---|---|
| date | Thu, 13 Jan 2011 02:09:02 -0500 |
| parents | 12884915a8e4 |
| children | 141b3fb5cef7 |
line wrap: on
line diff
--- a/liboctave/CmplxCHOL.cc Wed Jan 12 22:09:57 2011 +0100 +++ b/liboctave/CmplxCHOL.cc Thu Jan 13 02:09:02 2011 -0500 @@ -58,26 +58,28 @@ #ifdef HAVE_QRUPDATE F77_RET_T - F77_FUNC (zch1up, ZCH1UP) (const octave_idx_type&, Complex*, const octave_idx_type&, - Complex*, double*); + F77_FUNC (zch1up, ZCH1UP) (const octave_idx_type&, Complex*, + const octave_idx_type&, Complex*, double*); F77_RET_T - F77_FUNC (zch1dn, ZCH1DN) (const octave_idx_type&, Complex*, const octave_idx_type&, + F77_FUNC (zch1dn, ZCH1DN) (const octave_idx_type&, Complex*, + const octave_idx_type&, Complex*, double*, + octave_idx_type&); + + F77_RET_T + F77_FUNC (zchinx, ZCHINX) (const octave_idx_type&, Complex*, + const octave_idx_type&, const octave_idx_type&, Complex*, double*, octave_idx_type&); F77_RET_T - F77_FUNC (zchinx, ZCHINX) (const octave_idx_type&, Complex*, const octave_idx_type&, - const octave_idx_type&, Complex*, double*, - octave_idx_type&); + F77_FUNC (zchdex, ZCHDEX) (const octave_idx_type&, Complex*, + const octave_idx_type&, const octave_idx_type&, + double*); F77_RET_T - F77_FUNC (zchdex, ZCHDEX) (const octave_idx_type&, Complex*, const octave_idx_type&, - const octave_idx_type&, double*); - - F77_RET_T - F77_FUNC (zchshx, ZCHSHX) (const octave_idx_type&, Complex*, const octave_idx_type&, - const octave_idx_type&, const octave_idx_type&, - Complex*, double*); + F77_FUNC (zchshx, ZCHSHX) (const octave_idx_type&, Complex*, + const octave_idx_type&, const octave_idx_type&, + const octave_idx_type&, Complex*, double*); #endif }