Mercurial > hg > octave-nkf
changeset 13258:be74491c20e8
Correct typo in input validation of polynomial functions (Bug #33252)
* ppder.m, ppint.m, ppjumps.m, ppval.m: Correct typo placing negation (!)
only on first isstruct argument rather than combined (isstruct && strcmp)
condition.
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Fri, 30 Sep 2011 09:20:08 -0700 |
parents | e052c36bf14f |
children | b6efe55f97c7 |
files | scripts/polynomial/ppder.m scripts/polynomial/ppint.m scripts/polynomial/ppjumps.m scripts/polynomial/ppval.m |
diffstat | 4 files changed, 5 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/polynomial/ppder.m +++ b/scripts/polynomial/ppder.m @@ -32,7 +32,7 @@ m = 1; endif - if !(isstruct (pp) && strcmp (pp.form, "pp")) + if (! (isstruct (pp) && strcmp (pp.form, "pp"))) error ("ppder: PP must be a structure"); endif
--- a/scripts/polynomial/ppint.m +++ b/scripts/polynomial/ppint.m @@ -28,7 +28,7 @@ if (nargin < 1 || nargin > 2) print_usage (); endif - if (! isstruct (pp) && strcmp (pp.form, "pp")) + if (! (isstruct (pp) && strcmp (pp.form, "pp"))) error ("ppint: PP must be a structure"); endif
--- a/scripts/polynomial/ppjumps.m +++ b/scripts/polynomial/ppjumps.m @@ -29,7 +29,7 @@ print_usage (); endif - if (! isstruct (pp) && strcmp (pp.form, "pp")) + if (! (isstruct (pp) && strcmp (pp.form, "pp"))) error ("ppjumps: PP must be a structure"); endif
--- a/scripts/polynomial/ppval.m +++ b/scripts/polynomial/ppval.m @@ -37,8 +37,8 @@ if (nargin != 2) print_usage (); endif - if (! isstruct (pp) && strcmp (pp.form, "pp")) - error ("ppval: expects a pp-form structure"); + if (! (isstruct (pp) && strcmp (pp.form, "pp"))) + error ("ppval: first argument must be a pp-form structure"); endif ## Extract info.