=================================================================== RCS file: /home/cvs/OpenXM_contrib/gmp/mpz/Attic/urandomm.c,v retrieving revision 1.1.1.1 retrieving revision 1.1.1.2 diff -u -p -r1.1.1.1 -r1.1.1.2 --- OpenXM_contrib/gmp/mpz/Attic/urandomm.c 2000/09/09 14:13:00 1.1.1.1 +++ OpenXM_contrib/gmp/mpz/Attic/urandomm.c 2000/12/01 05:45:13 1.1.1.2 @@ -39,7 +39,10 @@ mpz_urandomm (rop, rstate, n) mp_ptr tp; mp_size_t nbits, size; int count; + TMP_DECL (marker); + TMP_MARK (marker); + /* FIXME: Should check for n == 0 and report error */ size = SIZ (n); @@ -70,4 +73,6 @@ mpz_urandomm (rop, rstate, n) while (mpz_cmp (t, p) >= 0); mpz_mod (rop, t, n); + + TMP_FREE (marker); }