Mercurial > mxe-octave
view src/of-signal-1-fixes.patch @ 4653:00e61c4a5657
fixes for package build errors due to API changes
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Mon, 09 Apr 2018 12:12:44 -0400 |
parents | 50aebe534e42 |
children | 85ac971a1bf0 |
line wrap: on
line source
diff -uNr a/src/cl2bp.cc b/src/cl2bp.cc --- a/src/cl2bp.cc 2015-05-25 20:22:36.842410900 -0400 +++ b/src/cl2bp.cc 2018-04-09 12:48:37.336964071 -0400 @@ -84,27 +84,27 @@ const int m = args(0).int_value(true); if (error_state) { - gripe_wrong_type_arg("cl2bp", args (0)); + err_wrong_type_arg("cl2bp", args (0)); return retval; } const double w1 = args(1).double_value(); if (error_state) { - gripe_wrong_type_arg("cl2bp", args (1)); + err_wrong_type_arg("cl2bp", args (1)); return retval; } const double w2 = args(2).double_value(); if (error_state) { - gripe_wrong_type_arg("cl2bp", args (2)); + err_wrong_type_arg("cl2bp", args (2)); return retval; } const ColumnVector up_vector(args(3).vector_value()); if (error_state) { - gripe_wrong_type_arg("cl2bp", args (3)); + err_wrong_type_arg("cl2bp", args (3)); return retval; } const ColumnVector lo_vector(args(4).vector_value()); if (error_state) { - gripe_wrong_type_arg("cl2bp", args (4)); + err_wrong_type_arg("cl2bp", args (4)); return retval; } if (up_vector.length() != 3 || lo_vector.length() != 3) { @@ -121,7 +121,7 @@ const int L = args(5).int_value(true); if (error_state) { - gripe_wrong_type_arg("cl2bp", args (5)); + err_wrong_type_arg("cl2bp", args (5)); return retval; } if (L > 1000000) { diff -uNr a/src/medfilt1.cc b/src/medfilt1.cc --- a/src/medfilt1.cc 2015-05-25 20:22:36.846411059 -0400 +++ b/src/medfilt1.cc 2018-04-09 12:48:37.336964071 -0400 @@ -186,14 +186,14 @@ return retval; } - if (args(0).is_complex_type()) + if (args(0).iscomplex()) { error("medfilt1 cannot process complex vectors"); return retval; } int n=3; // length of the filter (default 3) - if (nargin > 1) n = NINT(args(1).double_value()); + if (nargin > 1) n = octave::math::nint(args(1).double_value()); if (n < 1) { error ("medfilt1 filter length must be at least 1"); diff -uNr a/src/remez.cc b/src/remez.cc --- a/src/remez.cc 2015-05-25 20:22:36.846411059 -0400 +++ b/src/remez.cc 2018-04-09 12:48:37.340963884 -0400 @@ -784,7 +784,7 @@ return retval; } - int numtaps = NINT (args(0).double_value()) + 1; // #coeff = filter order+1 + int numtaps = octave::math::nint (args(0).double_value()) + 1; // #coeff = filter order+1 if (numtaps < 4) { error("remez: number of taps must be an integer greater than 3"); return retval; @@ -841,7 +841,7 @@ if (args(4).is_string() && !args(3).is_string()) stype = args(4).string_value(); else if (args(4).is_real_scalar()) - density = NINT(args(4).double_value()); + density = octave::math::nint(args(4).double_value()); else { error("remez: incorrect argument list"); return retval; @@ -850,7 +850,7 @@ if (nargin > 5) { if (args(5).is_real_scalar() && !args(4).is_real_scalar()) - density = NINT(args(5).double_value()); + density = octave::math::nint(args(5).double_value()); else { error("remez: incorrect argument list"); return retval; diff -uNr a/src/sosfilt.cc b/src/sosfilt.cc --- a/src/sosfilt.cc 2015-05-25 20:22:36.846411059 -0400 +++ b/src/sosfilt.cc 2018-04-09 12:52:45.933287424 -0400 @@ -13,10 +13,9 @@ // You should have received a copy of the GNU General Public License along with // this program; if not, see <http://www.gnu.org/licenses/>. -#include <octave/config.h> #include <octave/defun-dld.h> #include <octave/error.h> -#include <octave/gripes.h> +#include <octave/errwarn.h> #include <octave/oct-obj.h> #include <octave/pager.h> #include <octave/quit.h> @@ -52,7 +51,7 @@ if (error_state) { - gripe_wrong_type_arg("sosfilt",args(0)); + err_wrong_type_arg("sosfilt",args(0)); return retval; } @@ -66,7 +65,7 @@ if (error_state) { - gripe_wrong_type_arg("sosfilt",args(1)); + err_wrong_type_arg("sosfilt",args(1)); return retval; } diff -uNr a/src/upfirdn.cc b/src/upfirdn.cc --- a/src/upfirdn.cc 2015-05-25 20:22:36.846411059 -0400 +++ b/src/upfirdn.cc 2018-04-09 12:52:37.249695083 -0400 @@ -13,10 +13,9 @@ // You should have received a copy of the GNU General Public License along with // this program; if not, see <http://www.gnu.org/licenses/>. -#include <octave/config.h> #include <octave/defun-dld.h> #include <octave/error.h> -#include <octave/gripes.h> +#include <octave/errwarn.h> #include <octave/oct-obj.h> #include <octave/pager.h> #include <octave/quit.h> @@ -105,7 +104,7 @@ if (error_state) { - gripe_wrong_type_arg ("upfirdn", args (1)); + err_wrong_type_arg ("upfirdn", args (1)); return retval; } @@ -113,7 +112,7 @@ if (error_state) { - gripe_wrong_type_arg ("upfirdn", args (2)); + err_wrong_type_arg ("upfirdn", args (2)); return retval; } @@ -121,7 +120,7 @@ if (error_state) { - gripe_wrong_type_arg ("upfirdn", args (3)); + err_wrong_type_arg ("upfirdn", args (3)); return retval; } @@ -131,19 +130,19 @@ Matrix x = args (0).matrix_value (); if (error_state) { - gripe_wrong_type_arg ("upfirdn", args (0)); + err_wrong_type_arg ("upfirdn", args (0)); return retval; } Matrix y = upfirdn (x, h, p, q); retval (0) = y; } - else if (args (0).is_complex_type ()) + else if (args (0).iscomplex ()) { ComplexMatrix x = args (0).complex_matrix_value (); if (error_state) { - gripe_wrong_type_arg ("upfirdn", args (0)); + err_wrong_type_arg ("upfirdn", args (0)); return retval; } @@ -152,7 +151,7 @@ } else { - gripe_wrong_type_arg ("upfirdn", args (0)); + err_wrong_type_arg ("upfirdn", args (0)); return retval; }