Mercurial > mxe-octave
view src/of-linear-algebra-4-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 | |
children |
line wrap: on
line source
diff -uNr a/src/gsvd.cc b/src/gsvd.cc --- a/src/gsvd.cc 2015-01-24 14:54:11.000000000 -0500 +++ b/src/gsvd.cc 2018-04-09 14:25:44.604821251 -0400 @@ -23,8 +23,8 @@ #include "defun-dld.h" #include "error.h" -#include "gripes.h" -#include "oct-obj.h" +#include "errwarn.h" +#include "ovl.h" #include "pr-output.h" #include "utils.h" @@ -211,7 +211,7 @@ ? GSVD::sigma_only : (nargout > 5) ? GSVD::std : GSVD::economy ); - if (argA.is_real_type () && argB.is_real_type ()) + if (argA.isreal () && argB.isreal ()) { Matrix tmpA = argA.matrix_value (); Matrix tmpB = argB.matrix_value (); @@ -253,7 +253,7 @@ } } } - else if (argA.is_complex_type () || argB.is_complex_type ()) + else if (argA.iscomplex () || argB.iscomplex ()) { ComplexMatrix ctmpA = argA.complex_matrix_value (); ComplexMatrix ctmpB = argB.complex_matrix_value (); @@ -296,8 +296,8 @@ } else { - gripe_wrong_type_arg ("gsvd", argA); - gripe_wrong_type_arg ("gsvd", argB); + err_wrong_type_arg ("gsvd", argA); + err_wrong_type_arg ("gsvd", argB); return retval; } }