Mercurial > hg > octave-lyh

diff liboctave/array/Sparse.cc @ 17293:f519560bfcb4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Use Octave spacing conventions in cset 79d4b6089968. * liboctave/array/Sparse.cc: Use spacing conventions in %!tests, wrap long lines. * scripts/general/private/__isequal__.m: Use true/false rather than logical(1)/logical(0) for clarity.
author Rik <rik@octave.org>
date Tue, 20 Aug 2013 06:56:51 -0700
parents 79d4b6089968
children
line wrap: on
line diff
--- a/liboctave/array/Sparse.cc
+++ b/liboctave/array/Sparse.cc
@@ -2794,17 +2794,21 @@
 %! assert (s, sparse ([], [], [], 0, 1));
 
 ## Test (bug #37321)
-
-%!test a=sparse (0,0); assert (all (a)==sparse ([1]))
-%!test a=sparse (0,1); assert (all (a)==sparse ([1]))
-%!test a=sparse (1,0); assert (all (a)==sparse ([1]))
-%!test a=sparse (1,0); assert (all (a,2)==sparse ([1]))
-%!test a=sparse (1,0); assert (isequal (size (all (a,1)),[1 0]))
-%!test a=sparse (1,1); assert (all (a)==sparse ([0])), assert (isequal (size (all (a)),[1 1]))
-%!test a=sparse (2,1); assert (all (a)==sparse ([0])), assert (isequal (size (all (a)),[1 1]))
-%!test a=sparse (1,2); assert (all (a)==sparse ([0])), assert (isequal (size (all (a)),[1 1]))
-%!test a=sparse (2,2); assert (isequal(all (a),sparse ([0 0])))
-
+%!test a=sparse (0,0); assert (all (a) == sparse ([1]));
+%!test a=sparse (0,1); assert (all (a) == sparse ([1]));
+%!test a=sparse (1,0); assert (all (a) == sparse ([1]));
+%!test a=sparse (1,0); assert (all (a,2) == sparse ([1]));
+%!test a=sparse (1,0); assert (size (all (a,1)), [1 0]);
+%!test a=sparse (1,1);
+%! assert (all (a) == sparse ([0]));
+%! assert (size (all (a)), [1 1]);
+%!test a=sparse (2,1);
+%! assert (all (a) == sparse ([0]));
+%! assert (size (all (a)), [1 1]);
+%!test a=sparse (1,2);
+%! assert (all (a) == sparse ([0]));
+%! assert (size (all (a)), [1 1]);
+%!test a=sparse (2,2); assert (isequal (all (a), sparse ([0 0])));
 
 */