Mercurial > octave
diff libinterp/corefcn/matrix_type.cc @ 30712:61134c8dd8e8
maint: Use documented pattern for disabling BIST assert test.
* matrix_type.cc (Fmatrix_type): Use pattern '%!#" to comment out and disable a
BIST test.
author | Rik <rik@octave.org> |
---|---|
date | Sat, 05 Feb 2022 21:44:56 -0800 |
parents | 83f9f8bda883 |
children | e88a07dec498 |
line wrap: on
line diff
--- a/libinterp/corefcn/matrix_type.cc Thu Feb 03 17:46:18 2022 -0800 +++ b/libinterp/corefcn/matrix_type.cc Sat Feb 05 21:44:56 2022 -0800 @@ -541,13 +541,13 @@ %!assert (matrix_type (1i*speye (10,11)([2:10,1],:)), "Permuted Diagonal") %!assert (matrix_type (1i*speye (11,10)), "Diagonal") %!assert (matrix_type (1i*speye (11,10)([2:11,1],:)), "Permuted Diagonal") -%#!assert (matrix_type ([[speye(10,10);sparse(1,10)],[[1i,1i];sparse(9,2);[1i,1i]]]), "Upper") -%#!assert (matrix_type ([[speye(10,10);sparse(1,10)],[[1i,1i];sparse(9,2);[1i,1i]]](:,[2,1,3:12])), "Permuted Upper") +%!#assert (matrix_type ([[speye(10,10);sparse(1,10)],[[1i,1i];sparse(9,2);[1i,1i]]]), "Upper") +%!#assert (matrix_type ([[speye(10,10);sparse(1,10)],[[1i,1i];sparse(9,2);[1i,1i]]](:,[2,1,3:12])), "Permuted Upper") %!assert (matrix_type ([speye(11,9),[1i;sparse(8,1);1i;0]]), "Upper") %!assert (matrix_type ([speye(11,9),[1i;sparse(8,1);1i;0]](:,[2,1,3:10])), %! "Permuted Upper") -%#!assert (matrix_type ([speye(10,10),sparse(10,1);[1i;1i],sparse(2,9),[1i;1i]]), "Lower") -%#!assert (matrix_type ([speye(10,10),sparse(10,1);[1i;1i],sparse(2,9),[1i;1i]]([2,1,3:12],:)), "Permuted Lower") +%!#assert (matrix_type ([speye(10,10),sparse(10,1);[1i;1i],sparse(2,9),[1i;1i]]), "Lower") +%!#assert (matrix_type ([speye(10,10),sparse(10,1);[1i;1i],sparse(2,9),[1i;1i]]([2,1,3:12],:)), "Permuted Lower") %!assert (matrix_type ([speye(9,11);[1i,sparse(1,8),1i,0]]), "Lower") %!assert (matrix_type ([speye(9,11);[1i,sparse(1,8),1i,0]]([2,1,3:10],:)), %! "Permuted Lower")