diff options
author | tege <tege@gmplib.org> | 2000-04-21 02:28:54 +0200 |
---|---|---|
committer | tege <tege@gmplib.org> | 2000-04-21 02:28:54 +0200 |
commit | 1017cc20a6022c56b4cc164bd3ea0ec4aa9d2806 (patch) | |
tree | 62b08cff56fecb3c20ca9581a3bf79827adcaa18 /mpz | |
parent | 809072bdcc5c17b4fefe48f86124a5565a95cc9b (diff) | |
download | gmp-1017cc20a6022c56b4cc164bd3ea0ec4aa9d2806.tar.gz |
Remember TMP_MARK/TMP_FREE...
Diffstat (limited to 'mpz')
-rw-r--r-- | mpz/pprime_p.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/mpz/pprime_p.c b/mpz/pprime_p.c index 4030722cc..d488ebd3d 100644 --- a/mpz/pprime_p.c +++ b/mpz/pprime_p.c @@ -153,6 +153,8 @@ mpz_millerrabin (n, reps) unsigned long int k; gmp_randstate_t rstate; int is_prime; + TMP_DECL (marker); + TMP_MARK (marker); MPZ_TMP_INIT (nm1, SIZ (n) + 1); mpz_sub_ui (nm1, n, 1L); @@ -164,7 +166,10 @@ mpz_millerrabin (n, reps) mpz_set_ui (x, 210L); mpz_powm (y, x, nm1, n); if (mpz_cmp_ui (y, 1L) != 0) - return 0; + { + return 0; + TMP_FREE (marker); + } MPZ_TMP_INIT (q, SIZ (n)); @@ -186,6 +191,7 @@ mpz_millerrabin (n, reps) gmp_randclear (rstate); + TMP_FREE (marker); return is_prime; } |