Mercurial > octave

diff src/DLD-FUNCTIONS/kron.cc @ 11570:57632dea2446

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
attempt better backward compatibility for Array constructors
author John W. Eaton <jwe@octave.org>
date Wed, 19 Jan 2011 17:55:56 -0500
parents 01f703952eff
children 12df7854fa7c
line wrap: on
line diff
--- a/src/DLD-FUNCTIONS/kron.cc	Wed Jan 19 15:12:59 2011 -0500
+++ b/src/DLD-FUNCTIONS/kron.cc	Wed Jan 19 17:55:56 2011 -0500
@@ -58,7 +58,7 @@
   octave_idx_type nra = a.rows (), nrb = b.rows ();
   octave_idx_type nca = a.cols (), ncb = b.cols ();
 
-  MArray<T> c (nra*nrb, nca*ncb);
+  MArray<T> c (dim_vector (nra*nrb, nca*ncb));
   T *cv = c.fortran_vec ();
 
   for (octave_idx_type ja = 0; ja < nca; ja++)
@@ -82,7 +82,7 @@
   octave_idx_type nra = a.rows (), nrb = b.rows (), dla = a.diag_length ();
   octave_idx_type nca = a.cols (), ncb = b.cols ();
 
-  MArray<T> c (nra*nrb, nca*ncb, T());
+  MArray<T> c (dim_vector (nra*nrb, nca*ncb), T());
 
   for (octave_idx_type ja = 0; ja < dla; ja++)
     for (octave_idx_type jb = 0; jb < ncb; jb++)