Mercurial > octave

diff liboctave/oct-rand.cc @ 9647:54f45f883a53

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
optimize & extend randperm
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 16 Sep 2009 13:41:49 +0200
parents eb63fbe60fab
children 829e69ec3110
line wrap: on
line diff
--- a/liboctave/oct-rand.cc	Tue Sep 15 21:19:15 2009 +0200
+++ b/liboctave/oct-rand.cc	Wed Sep 16 13:41:49 2009 +0200
@@ -390,7 +390,7 @@
 
   if (n >= 0 && m >= 0)
     {
-      retval.resize (n, m);
+      retval.clear (n, m);
 
       if (n > 0 && m > 0)
 	fill (retval.capacity(), retval.fortran_vec(), a);
@@ -408,7 +408,7 @@
 
   if (! dims.all_zero ())
     {
-      retval.resize (dims);
+      retval.clear (dims);
 
       fill (retval.capacity(), retval.fortran_vec(), a);
     }
@@ -423,7 +423,7 @@
 
   if (n > 0)
     {
-      retval.resize (n);
+      retval.clear (n);
 
       fill (retval.capacity (), retval.fortran_vec (), a);
     }