Mercurial > octave
diff liboctave/numeric/LSODE.cc @ 31549:ed7b17c7ddf3 stable
maint: Strip trailing spaces and add missing EOL to all files.
* README, NEWS.6.md, RELEASE_CHECKLIST.md, README.md, besselj.cc, Array.h,
LSODE.cc, set.m, audiorecorder.m, play.m, set.m, patch.m:
Strip trailing spaces.
* command-widget.cc, led-indicator.cc, led-indicator.h:
Add missing EOL to files.
author | Rik <rik@octave.org> |
---|---|
date | Fri, 25 Nov 2022 21:38:22 -0800 |
parents | 18a6c1408626 |
children | 597f3ee61a48 |
line wrap: on
line diff
--- a/liboctave/numeric/LSODE.cc Fri Nov 25 21:23:54 2022 -0800 +++ b/liboctave/numeric/LSODE.cc Fri Nov 25 21:38:22 2022 -0800 @@ -81,7 +81,7 @@ } static F77_INT -lsode_j (const F77_INT& neq, const double& time, double *, +lsode_j (const F77_INT& neq, const double& time, double *, const F77_INT& ml, const F77_INT& mu, double *pd, const F77_INT& nrowpd) { @@ -102,8 +102,8 @@ for (F77_INT i = 0, j = mu; i <= ml; j == 0 ? i++ : j--) // walk down the subdiagonal in tmp_jac for (F77_INT k = i, l = j; k < neq && l < neq; k++, l++) - pd[nrowpd * l + k + mu - l] = tmp_jac (k, l); - + pd[nrowpd * l + k + mu - l] = tmp_jac (k, l); + return 0; }