Mercurial > octave-nkf

diff src/oct-map.cc @ 5593:edaf21425386

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-01-12 20:57:27 by jwe]
author jwe
date Thu, 12 Jan 2006 20:57:27 +0000
parents 61d6cebd243b
children c7d5a534afa5
line wrap: on
line diff
--- a/src/oct-map.cc	Thu Jan 12 17:55:22 2006 +0000
+++ b/src/oct-map.cc	Thu Jan 12 20:57:27 2006 +0000
@@ -90,9 +90,15 @@
 Octave_map::transpose (void) const
 {
   assert (ndims () == 2);
+
   dim_vector dv = dims ();
 
-  Octave_map retval (dim_vector (dv(1), dv(0)));
+  octave_idx_type nr = dv(0);
+  octave_idx_type nc = dv(1);
+
+  dim_vector new_dims (nc, nr);
+
+  Octave_map retval (new_dims);
 
   for (const_iterator p = begin (); p != end (); p++)
     retval.assign (key(p), Cell (contents(p).transpose ()));