Mercurial > hg > octave-nkf

diff scripts/testfun/assert.m @ 17690:79d6af38b96f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Backout cset 1d41b1910531 now that problem with real/image for sparse fixed. * scripts/testfun/assert.m: Undo special treatment of sparse matrices.
author Rik <rik@octave.org>
date Fri, 18 Oct 2013 14:25:29 -0700
parents 1d41b1910531
children d63878346099
line wrap: on
line diff
--- a/scripts/testfun/assert.m
+++ b/scripts/testfun/assert.m
@@ -284,13 +284,8 @@
         exclude = errseen | ! isfinite (A_null_imag) & ! isfinite (B_null_imag);
         A_null_imag(exclude) = 0;
         B_null_imag(exclude) = 0;
-        if (issparse (A) || issparse (B))
-          A_null = sparse (complex (full (A_null_real), full (A_null_imag)));
-          B_null = sparse (complex (full (B_null_real), full (B_null_imag)));
-        else
-          A_null = complex (A_null_real, A_null_imag);
-          B_null = complex (B_null_real, B_null_imag);
-        endif
+        A_null = complex (A_null_real, A_null_imag);
+        B_null = complex (B_null_real, B_null_imag);
         if (isscalar (tol))
           mtol = tol * ones (size (A));
         else