Mercurial > octave-nkf

changeset 17252:dac81d4b8ce1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
assert.m: Fix typo stopping comparison of imaginary non-infinite values. * scripts/testfun/assert.m: Fix typo stopping comparison of imaginary non-infinite values.
author Rik <rik@octave.org>
date Wed, 14 Aug 2013 12:05:51 -0700
parents 684ccccbc15d
children e3870f594d8b
files scripts/testfun/assert.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/testfun/assert.m	Wed Aug 14 11:42:35 2013 -0700
+++ b/scripts/testfun/assert.m	Wed Aug 14 12:05:51 2013 -0700
@@ -270,7 +270,7 @@
         B_null_real(exclude) = 0;
         A_null_imag = imag (A);
         B_null_imag = imag (B);
-        exclude = ! isfinite (A_null_real) & ! isfinite (B_null_real);
+        exclude = ! isfinite (A_null_imag) & ! isfinite (B_null_imag);
         A_null_imag(exclude) = 0;
         B_null_imag(exclude) = 0;
         A_null = complex (A_null_real, A_null_imag);