Mercurial > octave

changeset 27680:f998e243fa78 stable

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
mat2str.m: Fix for logical matrix (add transpose)
author Andreas Weber <octave@josoansi.de>
date Wed, 13 Nov 2019 11:11:49 +0100
parents 18fea1c5b21a
children 20b075f88f0a 2d1af61d8f5e
files scripts/strings/mat2str.m
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/strings/mat2str.m	Thu Oct 31 14:48:22 2019 +0900
+++ b/scripts/strings/mat2str.m	Wed Nov 13 11:11:49 2019 +0100
@@ -113,7 +113,7 @@
       t = x.';
       s = sprintf (fmt, [real(t(:))'; imag(t(:))']);
     elseif (x_islogical)
-      t = v(x+1);
+      t = v(x.'+1);
       s = cstrcat (sprintf (fmt, t{:}));
     else
       s = sprintf (fmt, x.');
@@ -143,6 +143,7 @@
 %!assert (mat2str (true), "true")
 %!assert (mat2str (false), "false")
 %!assert (mat2str (logical (eye (2))), "[true false;false true]")
+%!assert (mat2str (logical ([0 1; 0 0])), "[false true;false false]")
 
 ## Test input validation
 %!error mat2str ()