Mercurial > hg > octave-nkf

diff liboctave/Sparse.cc @ 6814:8c89a644df8a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-08-14 17:30:59 by jwe]
author jwe
date Tue, 14 Aug 2007 17:30:59 +0000
parents 75d99621f850
children 2e7f62e52c13
line wrap: on
line diff
--- a/liboctave/Sparse.cc
+++ b/liboctave/Sparse.cc
@@ -734,8 +734,12 @@
 
   if (dims2.length () > 2)
     {
+      (*current_liboctave_warning_handler)
+	("reshape: sparse reshape to N-d array smashes dims");
+
       for (octave_idx_type i = 2; i < dims2.length(); i++)
-	dims2 (1) *= dims2(i);
+	dims2(1) *= dims2(i);
+
       dims2.resize (2);
     }