Mercurial > hg > octave-nkf
changeset 4662:55211d6748c4
[project @ 2003-11-25 05:51:29 by jwe]
author | jwe |
---|---|
date | Tue, 25 Nov 2003 05:51:29 +0000 |
parents | 12b6fbd57436 |
children | bf7272f8ba8c |
files | liboctave/ChangeLog liboctave/DASPK.cc liboctave/DASRT.cc liboctave/ODESSA.cc liboctave/lo-mappers.cc src/ChangeLog src/load-save.cc |
diffstat | 7 files changed, 14 insertions(+), 12 deletions(-) [+] |
line wrap: on
line diff
--- a/liboctave/ChangeLog +++ b/liboctave/ChangeLog @@ -5,6 +5,10 @@ Report index values. * Array.cc (Array<T>::index): Delete unused arg names. + * ODESSA.cc (odessa_j): Likewise. + * DASRT.cc (ddasrt_f, ddasrt_g): Likewise. + * DASPK.cc (ddaspk_psol): Likewise. + * lo-mappers.cc (imag): Likewise. * dim-vector.h (dim_vector::all_ones): New function.
--- a/liboctave/DASPK.cc +++ b/liboctave/DASPK.cc @@ -105,11 +105,10 @@ //C WP, IWP, B, EPLIN, IER, RPAR, IPAR) static int -ddaspk_psol (const int& neq, const double& time, const double *state, - const double *deriv, const double *savr, - const double& cj, const double *wght, double *wp, - int *iwp, double *b, const double& eplin, int& ier, - double *, int*) +ddaspk_psol (const int&, const double&, const double *, + const double *, const double *, const double&, + const double *, double *, int *, double *, + const double&, int&, double *, int*) { BEGIN_INTERRUPT_WITH_EXCEPTIONS;
--- a/liboctave/DASRT.cc +++ b/liboctave/DASRT.cc @@ -65,7 +65,7 @@ static int ddasrt_f (const double& t, const double *state, const double *deriv, - double *delta, int& ires, double *rpar, int *ipar) + double *delta, int& ires, double *, int *) { BEGIN_INTERRUPT_WITH_EXCEPTIONS; @@ -123,7 +123,7 @@ static int ddasrt_g (const int& neq, const double& t, const double *state, - const int& ng, double *gout, double *rpar, int *ipar) + const int& ng, double *gout, double *, int *) { BEGIN_INTERRUPT_WITH_EXCEPTIONS;
--- a/liboctave/ODESSA.cc +++ b/liboctave/ODESSA.cc @@ -105,8 +105,8 @@ static int odessa_j (int* neq, const double& t, double *state, - double *par, const int& ml, const int& mu, double *pd, - const int& nrowpd) + double *par, const int& /* ml */, const int& /* mu */, + double *pd, const int& nrowpd) { BEGIN_INTERRUPT_WITH_EXCEPTIONS;
--- a/liboctave/lo-mappers.cc +++ b/liboctave/lo-mappers.cc @@ -65,7 +65,7 @@ } double -imag (double x) +imag (double) { return 0.0; }
--- a/src/ChangeLog +++ b/src/ChangeLog @@ -6,7 +6,6 @@ * ov.h (octave_value::all_strings): Pass second arg to rep function. * DLD-FUNCTIONS/dasrt.cc (dasrt_user_f): Delete unused arg names. - * load-save.cc (do_load): Likewise. * ls-utils.cc (get_save_type): Likewise. * parse.y (Fassignin): Likewise. * utils.cc (empty_arg): Likewise.
--- a/src/load-save.cc +++ b/src/load-save.cc @@ -375,7 +375,7 @@ octave_value do_load (std::istream& stream, const std::string& orig_fname, bool force, load_save_format format, oct_mach_info::float_format flt_fmt, - bool list_only, bool swap, bool verbose, bool /* import */, + bool list_only, bool swap, bool verbose, bool import, const string_vector& argv, int argv_idx, int argc, int nargout) { octave_value retval;