diff options
author | Kevin Ryde <user42@zip.com.au> | 2000-06-17 02:55:23 +0200 |
---|---|---|
committer | Kevin Ryde <user42@zip.com.au> | 2000-06-17 02:55:23 +0200 |
commit | 5989cd6301e69ea8c994dbced807a11437205f35 (patch) | |
tree | 7fa40cacd9ae590fcaa8109b8b9f3234de5833f2 | |
parent | abf7eebbbe51551cf2378ebf55baaab06c4324a1 (diff) | |
download | gmp-5989cd6301e69ea8c994dbced807a11437205f35.tar.gz |
* mpz/perfsqr.c: Fix so that zero is considered a perfect square.
(Was wrongly calling mpn_perfect_square_p with size==0.)
-rw-r--r-- | mpz/perfsqr.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/mpz/perfsqr.c b/mpz/perfsqr.c index cdf1b5a27..62a0c3f99 100644 --- a/mpz/perfsqr.c +++ b/mpz/perfsqr.c @@ -37,5 +37,9 @@ mpz_perfect_square_p (a) if (asize < 0) return 0; + /* Zero is a perfect square. */ + if (asize == 0) + return 1; + return mpn_perfect_square_p (a->_mp_d, asize); } |