summaryrefslogtreecommitdiff
path: root/mpz/pprime_p.c
diff options
context:
space:
mode:
authorKevin Ryde <user42@zip.com.au>2000-04-29 00:19:21 +0200
committerKevin Ryde <user42@zip.com.au>2000-04-29 00:19:21 +0200
commit2f9727d588f7741f349791ec5dacef726c538719 (patch)
tree0e93d349e9e272c3c5344b42ae832d573b75e8f9 /mpz/pprime_p.c
parentb856b597ab91c14af5e63dbfd43f3a171516ac8f (diff)
downloadgmp-2f9727d588f7741f349791ec5dacef726c538719.tar.gz
Provide dual ANSI/K&R function definitions.
Diffstat (limited to 'mpz/pprime_p.c')
-rw-r--r--mpz/pprime_p.c25
1 files changed, 22 insertions, 3 deletions
diff --git a/mpz/pprime_p.c b/mpz/pprime_p.c
index d488ebd3d..a9460adbd 100644
--- a/mpz/pprime_p.c
+++ b/mpz/pprime_p.c
@@ -30,13 +30,17 @@ MA 02111-1307, USA. */
#include "gmp-impl.h"
#include "longlong.h"
-static int isprime ();
-static int mpz_millerrabin ();
+static int isprime _PROTO ((unsigned long int t));
+static int mpz_millerrabin _PROTO ((mpz_srcptr n, int reps));
int
+#if __STDC__
+mpz_probab_prime_p (mpz_srcptr n, int reps)
+#else
mpz_probab_prime_p (n, reps)
mpz_srcptr n;
int reps;
+#endif
{
mp_limb_t r;
@@ -123,8 +127,12 @@ mpz_probab_prime_p (n, reps)
}
static int
+#if __STDC__
+isprime (unsigned long int t)
+#else
isprime (t)
unsigned long int t;
+#endif
{
unsigned long int q, r, d;
@@ -141,12 +149,18 @@ isprime (t)
return 0;
}
-static int millerrabin ();
+static int millerrabin _PROTO ((mpz_srcptr n, mpz_srcptr nm1,
+ mpz_ptr x, mpz_ptr y,
+ mpz_srcptr q, unsigned long int k));
static int
+#if __STDC__
+mpz_millerrabin (mpz_srcptr n, int reps)
+#else
mpz_millerrabin (n, reps)
mpz_srcptr n;
int reps;
+#endif
{
int r;
mpz_t nm1, x, y, q;
@@ -196,6 +210,10 @@ mpz_millerrabin (n, reps)
}
static int
+#if __STDC__
+millerrabin (mpz_srcptr n, mpz_srcptr nm1, mpz_ptr x, mpz_ptr y,
+ mpz_srcptr q, unsigned long int k)
+#else
millerrabin (n, nm1, x, y, q, k)
mpz_srcptr n;
mpz_srcptr nm1;
@@ -203,6 +221,7 @@ millerrabin (n, nm1, x, y, q, k)
mpz_ptr y;
mpz_srcptr q;
unsigned long int k;
+#endif
{
unsigned long int i;