1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 05:50:26 +02:00

* numbers.c (scm_gcd): change "k" to a long from an int.

Otherwise it fails on the alpha.  However, we might rather choose
this size conditionally.
This commit is contained in:
Rob Browning 2001-09-21 17:56:31 +00:00
parent 27070f900d
commit 1aaa208e93

View file

@ -383,7 +383,7 @@ scm_gcd (SCM x, SCM y)
} else if (yy == 0) {
result = u;
} else {
int k = 1;
long k = 1;
long t;
/* Determine a common factor 2^k */