# HG changeset patch # User jwe # Date 812107189 0 # Node ID 5f5d117aac3eae505fa190fc5897febd579ab7bb # Parent f8d8b6aa31aa671596a54ffdd25560c7a794a2ea [project @ 1995-09-26 09:14:22 by jwe] diff --git a/liboctave/DASSL.cc b/liboctave/DASSL.cc --- a/liboctave/DASSL.cc +++ b/liboctave/DASSL.cc @@ -198,8 +198,7 @@ int ddassl_f (const double& time, double *state, double *deriv, - double *delta, int& ires, double *rpar UNUSED, - int *ipar UNUSED) + double *delta, int& ires, double *, int *) { Vector tmp_deriv (nn); Vector tmp_state (nn); @@ -225,9 +224,8 @@ } int -ddassl_j (const double& time, double *state UNUSED, - double *deriv UNUSED, double *pd, const double& cj, - double *rpar UNUSED, int *ipar UNUSED) +ddassl_j (const double& time, double *, double *, double *pd, const + double& cj, double *, int *) { Vector tmp_state (nn); Vector tmp_deriv (nn); diff --git a/liboctave/LPsolve.cc b/liboctave/LPsolve.cc --- a/liboctave/LPsolve.cc +++ b/liboctave/LPsolve.cc @@ -33,7 +33,7 @@ #include "dColVector.h" Vector -LPsolve::minimize (double& objf, int& inform, Vector& lambda) +LPsolve::minimize (double&, int&, Vector&) { return Vector (); } diff --git a/liboctave/LSODE.cc b/liboctave/LSODE.cc --- a/liboctave/LSODE.cc +++ b/liboctave/LSODE.cc @@ -156,7 +156,7 @@ } int -lsode_f (const int& neq, const double& time, double *state, +lsode_f (const int& neq, const double& time, double *, double *deriv, int& ierr) { ColumnVector tmp_deriv (neq); @@ -179,8 +179,8 @@ } int -lsode_j (const int& neq, const double& time, double *state, - const int& ml, const int& mu, double *pd, const int& nrowpd) +lsode_j (const int& neq, const double& time, double *, + const int&, const int&, double *pd, const int& nrowpd) { Matrix tmp_jac (neq, neq); diff --git a/liboctave/NPSOL.cc b/liboctave/NPSOL.cc --- a/liboctave/NPSOL.cc +++ b/liboctave/NPSOL.cc @@ -71,7 +71,7 @@ int npsol_objfun (int& mode, const int& n, double *xx, double *objf, - double *objgrd, int* nstate) + double *objgrd, int *) { Vector tmp_x (n); @@ -117,8 +117,8 @@ int npsol_confun (int& mode, const int& ncnln, const int& n, - const int& nrowj, int* needc, double *xx, - double *cons, double *cjac, int* nstate) + const int& nrowj, int *, double *xx, double *cons, + double *cjac, int *) { Vector tmp_x (n); Vector tmp_c (ncnln); @@ -361,7 +361,7 @@ } NPSOL& -NPSOL::option (char *s) +NPSOL::option (char *) { cerr << "This function no longer has any effect.\n" << "Use the NPSOL_option class instead\n"; diff --git a/liboctave/QPSOL.cc b/liboctave/QPSOL.cc --- a/liboctave/QPSOL.cc +++ b/liboctave/QPSOL.cc @@ -57,7 +57,7 @@ } int -qphess (const int& n, const int& nrowh, const int& ncolh, +qphess (const int& n, const int& nrowh, const int&, const int& jthcol, double *hess, double *x, double *hx) { if (jthcol > 0)