Mercurial > octave-nkf
diff liboctave/floatCHOL.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/floatCHOL.cc Wed Jan 12 22:09:57 2011 +0100 +++ b/liboctave/floatCHOL.cc Thu Jan 13 02:09:02 2011 -0500 @@ -58,26 +58,28 @@ #ifdef HAVE_QRUPDATE F77_RET_T - F77_FUNC (sch1up, SCH1UP) (const octave_idx_type&, float*, const octave_idx_type&, - float*, float*); + F77_FUNC (sch1up, SCH1UP) (const octave_idx_type&, float*, + const octave_idx_type&, float*, float*); F77_RET_T - F77_FUNC (sch1dn, SCH1DN) (const octave_idx_type&, float*, const octave_idx_type&, + F77_FUNC (sch1dn, SCH1DN) (const octave_idx_type&, float*, + const octave_idx_type&, float*, float*, + octave_idx_type&); + + F77_RET_T + F77_FUNC (schinx, SCHINX) (const octave_idx_type&, float*, + const octave_idx_type&, const octave_idx_type&, float*, float*, octave_idx_type&); F77_RET_T - F77_FUNC (schinx, SCHINX) (const octave_idx_type&, float*, const octave_idx_type&, - const octave_idx_type&, float*, float*, - octave_idx_type&); + F77_FUNC (schdex, SCHDEX) (const octave_idx_type&, float*, + const octave_idx_type&, const octave_idx_type&, + float*); F77_RET_T - F77_FUNC (schdex, SCHDEX) (const octave_idx_type&, float*, const octave_idx_type&, + F77_FUNC (schshx, SCHSHX) (const octave_idx_type&, float*, + const octave_idx_type&, const octave_idx_type&, const octave_idx_type&, float*); - - F77_RET_T - F77_FUNC (schshx, SCHSHX) (const octave_idx_type&, float*, const octave_idx_type&, - const octave_idx_type&, const octave_idx_type&, - float*); #endif }