Mercurial > hg > octave-lyh

diff scripts/general/accumarray.m @ 10775:6892c5562950

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix bug in accumarray
author Jaroslav Hajek <highegg@gmail.com>
date Thu, 08 Jul 2010 13:51:37 +0200
parents b178769f31ca
children be55736a0783
line wrap: on
line diff
--- a/scripts/general/accumarray.m
+++ b/scripts/general/accumarray.m
@@ -205,7 +205,7 @@
         A = reshape (A, sz);
       endif
 
-      if (fillval != zero && isnan (fillval) != isnan (zero))
+      if (fillval != zero && ! (isnan (fillval) || isnan (zero)))
         mask = true (size (A));
         mask(subs) = false;
         A(mask) = fillval;
@@ -228,7 +228,7 @@
         A = reshape (A, sz);
       endif
 
-      if (fillval != zero && isnan (fillval) != isnan (zero))
+      if (fillval != zero && ! (isnan (fillval) || isnan (zero)))
         mask = true (size (A));
         mask(subs) = false;
         A(mask) = fillval;