Mercurial > octave-nkf

diff src/DLD-FUNCTIONS/rand.cc @ 11662:a4d0680f4dda release-3-0-x

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
save state separately for each MT random number generator
author John W. Eaton <jwe@octave.org>
date Tue, 26 Feb 2008 05:30:39 -0500
parents 9bc096bc59d4
children 72830070a17b
line wrap: on
line diff
--- a/src/DLD-FUNCTIONS/rand.cc	Tue Feb 26 02:51:32 2008 -0500
+++ b/src/DLD-FUNCTIONS/rand.cc	Tue Feb 26 05:30:39 2008 -0500
@@ -113,7 +113,7 @@
 	      }
 	    else if (s_arg == "state" || s_arg == "twister")
 	      {
-		retval = octave_rand::state ();
+		retval = octave_rand::state (fcn);
 	      }
 	    else if (s_arg == "uniform")
 	      {
@@ -250,7 +250,7 @@
 		  ColumnVector (args(idx+1).vector_value(false, true));
 
 		if (! error_state)
-		  octave_rand::state (s);
+		  octave_rand::state (s, fcn);
 	      }
 	    else
 	      error ("%s: unrecognized string argument", fcn);