diff options
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | arith.c | 2 |
2 files changed, 5 insertions, 1 deletions
@@ -1,5 +1,9 @@ 2011-12-13 Kaz Kylheku <kaz@kylheku.com> + * arith.c (expt): Fix broken bignum x fixnum combination. + +2011-12-13 Kaz Kylheku <kaz@kylheku.com> + * Makefile (repatch): New phony target. (distclean): Remove mpi directory. @@ -862,7 +862,7 @@ val expt(val anum, val bnum) return anum; n = make_bignum(); if (sizeof (int_ptr_t) <= sizeof (mp_digit)) { - mp_expt_d(mp(bnum), b, mp(n)); + mp_expt_d(mp(anum), b, mp(n)); } else { mp_int tmpb; mp_init(&tmpb); |