Mercurial > hg > octave-nkf

changeset 12796:886256714823

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
codesprint: Correct missing comma in tests for flipdim.m * flipdim.m: Add missing comma. Add missing sz=size() statement.
author Rik <octave@nomad.inbox5.com>
date Sat, 16 Jul 2011 10:21:41 -0700
parents 9e7ebbaf69ff
children 71265f725b11
files scripts/general/flipdim.m
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/general/flipdim.m
+++ b/scripts/general/flipdim.m
@@ -43,6 +43,7 @@
   endif
 
   nd = ndims (x);
+  sz = size (x);
   if (nargin == 1)
     ## Find the first non-singleton dimension.
     (dim = find (sz > 1, 1)) || (dim = 1);
@@ -59,8 +60,8 @@
 %!error flipdim ();
 %!error flipdim (1, 2, 3);
 
-%!assert (flipdim ([1,2;3,4]), flipdim ([1,2;3,4], 1));
-%!assert (flipdim ([1,2;3,4], 2) [2,1;4,3]);
+%!assert (flipdim ([1,2;3,4]), flipdim ([1,2 ; 3,4], 1));
+%!assert (flipdim ([1,2;3,4], 2), [2,1;4,3]);
 %!assert (flipdim ([1,2;3,4], 3), [1,2;3,4]);
 
 ## FIXME -- we need tests for multidimensional arrays.