Mercurial > octave
diff src/DLD-FUNCTIONS/rand.cc @ 2985:aa9d0c0e0458
[project @ 1997-05-16 06:54:18 by jwe]
author | jwe |
---|---|
date | Fri, 16 May 1997 06:55:52 +0000 |
parents | 295f037b4b3e |
children | 38de16594cb4 |
line wrap: on
line diff
--- a/src/DLD-FUNCTIONS/rand.cc Fri May 16 05:14:34 1997 +0000 +++ b/src/DLD-FUNCTIONS/rand.cc Fri May 16 06:55:52 1997 +0000 @@ -381,14 +381,14 @@ if (! initialized) do_initialization (); - begin_unwind_frame ("randn"); + unwind_protect::begin_frame ("randn"); // This relies on the fact that elements are popped from the // unwind stack in the reverse of the order they are pushed // (i.e. current_distribution will be reset before calling // reset_rand_generator()). - add_unwind_protect (reset_rand_generator, 0); + unwind_protect::add (reset_rand_generator, 0); unwind_protect_int (current_distribution); current_distribution = normal_dist; @@ -397,7 +397,7 @@ retval = do_rand (args, nargin); - run_unwind_frame ("randn"); + unwind_protect::run_frame ("randn"); } return retval;